当前位置:文档之家› VB简单计算代码

VB简单计算代码

一、设置控件属性
text1(被除数):text=(空)
label1:caption=“/”
text2(除数):text=(空)
label2:caption=“=”
text3(商):text=(空)
command1:caption=“计算”
command2:caption=“清空”
二、编写代码
Private Sub Command1_Click()
Dim a As Single,b As Single,c As Single (single单精度,可以精确到十进制的7位,)
a=Val(Text1.Text)
b=Val(Text2.Text)
c=a/b
Text3.Text=c
End Sub

Private Sub Command2_Click()
Text1.Text=""
Text2.Text=""
Text3.Text=""
End Sub



1. 算术运算符
VB中有八种运算符,按优先级别的高低顺序分别是:
(1)指数运算符:^
(2)取负:-
(3)乘法*、除法/
(4)整除:\
(5)取模(取余):Mod
(6)加+、减-
在书写VB算术表达式时应注意:
(1)可以用圆括弧()改变表达式的运算顺序,括弧内的运算符总是先被运算。
(2)同级别的运算符在一起时,按自左向右顺序运算。
(3)指数运算符与取负运算符在一起时,先取负。比如3^-2表示3的-2次方。
(4)为了提高表达式的可读性,应尽可能用“()”标识出运算顺序。
2. 关系运算符
关系运算符主要用于对两个运算量进行关系比较。所谓运算量可以是常量、变量或算术表达式、函数等。通过关系运算符将两个运算量连接起来形成关系表达式,关系表达式的值是逻辑值,只有真True和假False两个值。在相应的场合,VB把0解释为False,而任何非0的解释为True。
VB有六种关系运算符:
大于 (>)
小于 (<)
等于 (=)
不等于 (<>)
大于等于 (>=)
小于等于(<=)
它们的优先级是相同的,按自左向右运算,即用于对字符串或数字型数据进行比较。
当进行字符串比较时,其运算逻辑是:按自左至右的顺序,逐一比较两个字符串对应位置的ASCII码值,第一次遇到ASCII码值不同时,哪个值最大则哪个字符串就大。比如“abcd>”abCD”的值为True。
关系表达式采用以下格式书写:
运算量1 关系运算符 运算量2
3. 逻辑运算符
逻辑运算符用于进行逻辑判断,用它们将算术表达式、关系表达式、常量、变量、函数连接起来就形成了逻辑表达式。任何一个逻辑表达式均具有True或 False值。
VB提供了六个逻辑运算符,按优先顺序排列如下:
(1)逻辑非:Not
(2)逻辑与:And
(3)逻辑或:Or
(4)逻辑异或:Xor
(5)等价:Eqv
(6)隐含:Imp
逻辑运算符使用说明:

运算符(名称) 用法及说明
Not(逻辑非) Not a 若a为True,则结果为False,否则结果为True
And(逻辑与) a And b 仅当a与b同为True,结果为True,否则结果为False
Or(逻辑或) A Or b 仅当a与b同为False,结果为False,否则结果为True
Xor(异或) A Xor b a,

b不同时,结果为True,否则结果为False
Eqv(逻辑相等) A Eqv b a,b相同时,结果为True,否则结果为False
Imp(蕴涵) A Imp b 当且仅当a为True,同时b为False时,结果为False,否则结果为True
4. 字符串连接符
字符串是由两个双引号“”包括的字母和数字的组合体,字符串连接符的作用是将字符串常量、变量和函数连接起来,从而形成一个较大的字符串,主要要 “+”和“&”两个符号,它们的运算结果基本相同。比如:“Abcd”+”1234”将得到一个新的字符串“abcd1234”。
3.4.8 常用函数
1. 数值型函数

函数名 功能 举例
Abs 求绝对值 Text1.Text = Abs(-20) '返回20
Atn 反正切函数
Cos 余弦函数
Exp 求指数
Fix 取整数,对负数较大的 Text4.Text = Fix(3.5) ‘返回3
Text5.Text = Fix(-3.5) '返回-3
Int 取整数,对负数较小的 Text2.Text = Int(3.5) '返回3
Text3.Text = Int(-3.5) '返回-4
Log 求对数
Rnd 产生一个0~1间的随机数
Sgn 求数字符号
Sin 正弦函数
Sqr 求平方根
Tan 正切函数

相关主题
文本预览
相关文档 最新文档