学会使用VB的常用函数

杜伟
2000年 第43期 

　　在前两期，我们介绍了VB的集成开发环境和常用的控件，这一期我们将讲解如何编写代码和一些常常用到的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中就可以执行了。
　　（编后语：学习编程，实践很重要。只有通过自己亲手编写程序、调试程序才能真正理解、掌握这些程序代码。

 