实验名称;比较两个数的大小
1 打开电脑桌面上的vb软件。
2单击工具中的command button按钮,在form1中的合适位置,单击鼠标左键拖曳,直到出现小窗口为止。修改caption为"排序了".
3单击工具中的text box,按照同样的方法在form1中建立一个窗口。
4双击command button,在弹出的对话框中输入编程:
clls
me.font.size=50
dim a as integer
dim b as integer
a=(rnd*1000)
b=(int*1000)
if a<b then
me.text1.text="a<b"
else
me.text1.text="a>=b"
if a=b then
me.text1.text="a=b"
else
me.text1.text="a>b"
end if
end if
5点击运行。再点击排序了,既可以在小窗口中看到a=b 或a<b或 a>b。
15电气郄慧敏15050341023