一个电脑程序经常需要使用常数和变数来进行运算。固定的数值如圆周率 Pi(3.142) 或固定利率之类的数值都被归纳为常数。至于那些经常变化或不固定的数值，我们把它们归纳为变数，其中的例子如年龄，个人收入，外汇，时间等等。
Const constantname As datatype=initializer
constantname 是我们自己制定的名称，datatype 是资料类型而 initializer 则是初始设定值。
如：
Const Num As Integer = 9.8
Const Pi As Single = 3.142
Const SchoolName As String = '中华中学“
变数是在程序运送时会改变的数据，而常数在运算时是固定不变的。虽然我们在开始时可给于变数一个数值（初始值），但在程序运作时它的数值是可以改变的。变数的宣告格式如下：
Dim VariableName as Datatype[=initializer]
例：
Dim Num As Single=1.234
Dim Num1,Num2 As Integer
Dim yourName As String
Dim starName As String='刘翔”
以 Dim 宣告各种变数 之后, 我们可以用以下的格式 赋值于这些变数 。
Variable=Expression
变数可以是一个已宣布的变数或控件的属性值. 它也可以是一个数学表达式, 一个字符串, 一个 布尔值 (对或错) 等等. 以下是一些例子:
firstNumber=100
secondNumber=firstNumber-99
userName='John Lyan'
userpass.Text = password
Label1.Visible = True
Command1.Visible = false
Label4.Caption = textbox1.Text
ThirdNumber = Val(usernum1.Text)
total = firstNumber + secondNumber+ThirdNumber
为了运算用户输入的数据, 我们需要应用各种数学的运算符. 在 Visual Basic中, 除了加和减 , 它的运算符跟普通数学符号不一样， 如表6.1.所显示
表 6.1: VB 的数学运算符
| 运算符 | 数学函数 | 例子 |
|---|---|---|
| ^ | 指数 | 2^4=16 |
| * | 乘法 | 4*3=12 |
| / | 除法 | 12/4=3 |
| Mod | 整数除后的余数 | 15 Mod 4=3 |
| \ | 整数除法(小数点被去掉） | 19\4=4 |
| + or & | 字串串连 | 'Visual'&'Basic'='Visual Basic' |
范例 6.1
Dim firstName As String
Dim secondName As String
Dim yourName As String
Private Sub Command1_Click()
firstName = Text1.Text
secondName = Text2.Text
yourName = secondName + ' ' + firstName
Label1.Caption = yourName
End Sub
在这个例子中，三个变数分别宣布为字符串. 变数 firstName 和 secondName 会把用户的输入的数据存入文本框Text1 和 text2, 而变数 yourName 则把以上两个变数的值加起来 ，然后在标签 Label1 上显示出来。
范例 6.2
Dim number1, number2, number3 as Integer
Dim total, average as variant
Private sub Form_Click
number1=val(Text1.Text)
number2=val(Text2.Text)
number3= val(Text3.Text)
Total=number1+number2+number3
Average=Total/5
Label1.Caption=Total
Label2.Caption=Average
End Sub
在以上的例子中, 有三个变数被宣示为整数和两个变数被宣示为variant 。 Variant 可以容纳任何数字数据类型. 该程序计算输入三个文本框的数字的总平均。
联系客服
