VB简单计算代码.docx
VB简单计算代码一、设置控件属性text1:text=label1:caption=“/”text2:text=label2:caption=“=”text3:text=command1:caption=“计算”command2:caption=“清空”二、编写代码Private Sub Command1_ClickDim a As Single,b As Single,c As Single (single单精度，可以精确到十进制的7位,)a=Val(Text1.Text)b=Val(Text2.Text)c=a/bText3.Text=cEnd SubPrivate Sub Command2_ClickText1.Text=""Text2.Text=""Text3.Text=""End Sub1. 算术运算符VB中有八种运算符，按优先级别的高低顺序分别是：指数运算符：取负：-乘法*、除法/整除：取模：Mod加+、减-在书写VB算术表达式时应注意：可以用圆括弧改变表达式的运算顺序，括弧内的运算符总是先被运算。同级别的运算符在一起时，按自左向右顺序运算。指数运算符与取负运算符在一起时，先取负。比如3-2表示3的-2次方。为了提高表达式的可读性，应尽可能用“”标识出运算顺序。2. 关系运算符关系运算符主要用于对两个运算量进行关系比较。所谓运算量可以是常量、变量或算术表达式、函数等。通过关系运算符将两个运算量连接起来形成关系表达式，关系表达式的值是逻辑值，只有真True和假False两个值。在相应的场合，VB把0解释为False，而任何非0的解释为True。VB有六种关系运算符：大于 (>)小于 (<)等于 (=)不等于 大于等于 (>=)小于等于(<=)它们的优先级是相同的，按自左向右运算，即用于对字符串或数字型数据进行比较。当进行字符串比较时，其运算逻辑是：按自左至右的顺序，逐一比较两个字符串对应位置的ASCII码值，第一次遇到ASCII码值不同时，哪个值最大则哪个字符串就大。比如“abcd>”abCD”的值为True。关系表达式采用以下格式书写：运算量1 关系运算符 运算量23. 逻辑运算符逻辑运算符用于进行逻辑判断，用它们将算术表达式、关系表达式、常量、变量、函数连接起来就形成了逻辑表达式。任何一个逻辑表达式均具有True或 False值。VB提供了六个逻辑运算符，按优先顺序排列如下：逻辑非：Not逻辑与：And逻辑或：Or逻辑异或：Xor等价：Eqv隐含：Imp逻辑运算符使用说明：运算符 用法及说明Not(逻辑非) Not a 若a为True,则结果为False,否则结果为TrueAnd(逻辑与) a And b 仅当a与b同为True,结果为True,否则结果为FalseOr(逻辑或) A Or b 仅当a与b同为False,结果为False,否则结果为TrueXor(异或) A Xor b a,b不同时,结果为True,否则结果为FalseEqv(逻辑相等) A Eqv b a,b相同时,结果为True,否则结果为FalseImp(蕴涵) A Imp b 当且仅当a为True,同时b为False时,结果为False,否则结果为True4. 字符串连接符字符串是由两个双引号“”包括的字母和数字的组合体，字符串连接符的作用是将字符串常量、变量和函数连接起来，从而形成一个较大的字符串，主要要 “+”和“&”两个符号，它们的运算结果基本相同。比如：“Abcd”+”1234”将得到一个新的字符串“abcd1234”。3.4.8 常用函数1. 数值型函数函数名 功能 举例Abs 求绝对值 Text1.Text = Abs(-20) '返回20Atn 反正切函数 Cos 余弦函数 Exp 求指数 Fix 取整数，对负数较大的 Text4.Text = Fix(3.5) 返回3Text5.Text = Fix(-3.5) '返回-3Int 取整数，对负数较小的 Text2.Text = Int(3.5) '返回3Text3.Text = Int(-3.5) '返回-4Log 求对数 Rnd 产生一个01间的随机数 Sgn 求数字符号 Sin 正弦函数 Sqr 求平方根 Tan 正切函数
