Command1_Click
是一个整体,表示的是这个函数的名称,下划线没有特殊的含义。
在函数后面的括号里是跟的参数表,
包括参数名,
参数类型以及参数的传递方式,
如果没有
参数则可以保持为空。前面的
private
表示此函数是私有的,
sub
代表这个函数兼有子过程
的特性。
整个的意思就是:当你用鼠标点击名为
Command1
的按钮时,就执行这一行下面的多行代
码,直到遇到
End Sub
结束
2
、先在
General
里声明窗体级全局变量:
Dim Num1, Num2 As Single
Dim StrNum1, StrNum2 As String
Dim FirstNum As Boolean
'
判断是否是数字开头
因为
Text1
里是存放字符串的,
所以要把输入的数据进行运算,
必须把字符
型变量转变为实型变量,分别用
Num1
、
Num2
和
StrNum1
、
StrNum2
进行存放。
3
、如何将字符型转换成实型?
a=Val(text1.text)
它的作用是将文本框中输入的字符转化为数值
dim shuzi as single
dim zifu as string
shuzi=12345
zifu=str(shuzi)
将文本框中的数值转换成字符
shuzi=val(zifu)
4
、窗体之间的相互调用:
If
„„
then
Load Form2
Form2.Show
Else
Load form3
Form3.show