微信公众号 
图码生活

每天发布有五花八门的文章,各种有趣的知识等,期待您的订阅与参与
电脑报 1992-2001 十年文章全集
电脑报 1992-2001 十年文章全集
包含从 1992 年 - 2001 年间,两万余篇期刊文章,查询最少输入两个字符
随便看看
读取中
读取中
标题学会使用VB的常用函数
栏目软件世界
作者杜伟
发布2000年第43期
  在前两期,我们介绍了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中就可以执行了。
  (编后语:学习编程,实践很重要。只有通过自己亲手编写程序、调试程序才能真正理解、掌握这些程序代码。