在前两期,我们介绍了VB的集成开发环境和常用的控件,这一期我们将讲解如何编写代码和一些常常用到的VB自带的函数。函数是编写程序的重要组成部分,在任何一种高级语言中,函数都是必不可少的,所以要学会编程,首先就得学好函数,灵活地使用函数。
在VB中,常用的函数有三种(如

表),除了表中列出的这些函数外,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。执行到这一句代码的效果如

1。
MsgBox为标准的输出框函数。MsgBox同样有5个参数。第一个参数与InputBox的第一个参数相同,第二个参数即是输出框的按钮,第三个参数则为输出框的标题,其中的“&”表示将两边的字符串连接起来,vbCrLf表示回车,即换行符。vbOKOnly+vbInformation表示在输出框中显示一个“确定”按钮和一个感叹图标(如

2)。
单击“F5”键运行程序,单击“计算器”按钮,输入数字,即可算出其加、减、乘、除的结果来。程序编写好后,就单击“文件”菜单中的“保存工程”,把编写的程序保存下来,还可以单击“文件”菜单中的“生成工程1.EXE”,把编写的程序编译为EXE文件(可执行程序),不需要在VB中就可以执行了。
(编后语:学习编程,实践很重要。只有通过自己亲手编写程序、调试程序才能真正理解、掌握这些程序代码。