学会使用VB的常用函数
在VB中,常用的函数有三种(如^43020401c^表),除了表中列出的这些函数外,VB中还有其它很多函数,如Kill等。当然,VB还允许用户自己定义函数。
下面我们向大家介绍一个使用常见函数的实例:
程序要求用户输入两个数字,并计算出这两个数字相加、相减、相乘、相除的结果。首先新建一个工程,在Form1窗体上引入一个CommandBotton(命令按钮)控件(默认名称为Command1),在属性窗口中将Caption的值改为“计算器(C)”(注意:你在按钮上看到的C有一个下划线,表明可以使用“Alt+C”来代替鼠标单击该控件,但实际在Caption属性窗口中输入的是“计算器(&C)”),然后双击Command1控件,在出现的代码编辑窗口中输入如下代码(黑体为系统自动生成的代码):
Private Sub Command1_Click()
Dim A As Integer ′定义变量。可以把变量理解为一个存放数据、字符串的容器
Dim B As Integer ′定义A和B两个变量的目的在于存放用户将输入的数据
A=InputBox(″输入第一个数:″,″计算器″)
B=InputBox(″输入第二个数:″,″计算器″)
C1=A+B ′这是一个表达式,将A与B的值相加的结果赋给C1这个变量
C2=A-B ′将相减的结果赋值给C2
C3=A*B ′将相乘的结果赋值给C3。
C4=A/B ′将相除的结果赋值给C4。
MsgBox ″相加的结果是:″ & C1 & vbCrLf & ″相减的结果是:″ & C2 & vbCrLf & ″相乘的结果是:″ & C3 & vbCrLf & ″相除的结果是:″ & C4,vbOKOnly+vbInformation,″计算结果″
End Sub
Command1_Click()表示当鼠标单击Command1控件时发生单击事件随即执行其中的程序代码。
InputBox为标准的输入框函数。InputBox有5个参数,其中最常用的有3个,第一个参数Prompt作为对话框的提示文本,第二个参数Title则是该输入框的标题,第三个参数则是用来在文本框中显示缺省文本。这一句的意思就是:显示出输入框,将用户输入的内容赋值给变量A。执行到这一句代码的效果如^43020401a^1。
MsgBox为标准的输出框函数。MsgBox同样有5个参数。第一个参数与InputBox的第一个参数相同,第二个参数即是输出框的按钮,第三个参数则为输出框的标题,其中的“&”表示将两边的字符串连接起来,vbCrLf表示回车,即换行符。vbOKOnly+vbInformation表示在输出框中显示一个“确定”按钮和一个感叹图标(如^43020401b^2)。
单击“F5”键运行程序,单击“计算器”按钮,输入数字,即可算出其加、减、乘、除的结果来。程序编写好后,就单击“文件”菜单中的“保存工程”,把编写的程序保存下来,还可以单击“文件”菜单中的“生成工程1.EXE”,把编写的程序编译为EXE文件(可执行程序),不需要在VB中就可以执行了。
(编后语:学习编程,实践很重要。只有通过自己亲手编写程序、调试程序才能真正理解、掌握这些程序代码。