第2章 程序设计基础

黄冈师范学院计算机科学与技术学院 VisualBasic程序设计教案

Tan(x) Atn(x) Log(x) Exp(x) Sqr(x) Abs(x) Sgn(x) 求x的正切 求x的反正切 求自然对数lnx 求ex 求x的平方根 求x的绝对值 判断x的符号 Tan(5) Atn(5) Log(10) Exp(2) Sqr(16) Abs(3.6) Abs(-3.6) Sgn(589.63) Sgn(-12.3) Sgn(0) -3.38051500624659 1.37340076694502 2.30258509299405 7.38905609893065 4 3.6 3.6 1 -1 0 x以弧度为单位 x以弧度为单位 Log(x)与Exp(x)互为反函数 x不能为负数 正数返回本身； 负数返回-x 正数返回1； 负数返回-1 0返回0 2.4.2字符串函数

函数名 Left(s,n) Right(s,n) Mid(s,m [,n]) 功能 从s左边开始取出n个字符 从s右边开始取出n个字符 从s的第m位开始取出n个字符；省略n则表示取至s的末尾 Ltrim(s) Rtrim(s) String(n,s) 去掉s左边的所有空格 去掉s右边的所有空格 返回由s的首字母组成长度为n的新字符串 Space(n) StrReverse(s) Join(a [,d]) 产生由n个空格组成的字符串 将字符串反序 将a数组各元素用d做分隔符连接成字符串 StrConv(s,vbFromUnicode|vbUnicode) Len(s) LenB(s) Unicode码字符串和DBCS字符串相互转换 求s的长度 求s占用字节数 Len(\你好Hi\LenB(\你好Hi\4 8 Space(3) StrReverse(\a = Array(15, \Join(a, \StrConv(\\□y□\\□□□\\\Ltrim(\□□走吧\Rtrim(\□□□\String(6,\\走吧\\\实例 Left(\□Basic\Right(\□Basic\Mid(\□Basic\计算结果 \\\□Ba\

【例2-4】读程序，写出程序运行结果。

Private Sub Form_Click()

a$ = \ b$ = \

c$ = b$ & Mid$(a$, 7, 6) & Right$(a$, 11) Print c End Sub

I Like Basic Programing

2.4.3常用转换函数

转换函数用于数据类型或者形式之间的转换，主要有整型数、实型数、字符串之间的转换以及ASCII码同字符间的转换等；常见的转换函数如表2-5所示。

表2-5 常用转换函数

第 5 页 共 9 页

黄冈师范学院计算机科学与技术学院 VisualBasic程序设计教案

函数名 Str(x) Val(s) Asc(s) Chr(x) Lcase(s) Ucase(s) Int(x) 功能 将x转换成字符串 将s转换成数值 返回s首字母的ASCII码 将ASCII码转换成对应字符 将大写字母转换成小写 将小写字母转换为大写 返回小于等于x的最大整数 实例 str(76.23) Val(\Asc(\Asc(\chr(97) Lcase(\Ucase(\Int(1.6) Int(-1.6) Fix(1.6) Fix(-1.6) Cint(1.5) 计算结果 \86 97 97 \\\1 -2 1 -1 2 2 Fix(x) 截去x的小数部分 Cint(x) 四舍六入取整 Cint(2.5) 说明： （1）对于Str(x)，Str(-85)= \；Str(85)= \□85\。Str()函数将非负数转换成字符串后，字

符串左边有一个空格，表示符号位。所以len(str(85))=3，而不是2。 （2）对于Val(s)，s中有字符时，停止转换。val(\；val(\（3）Asc(s) 和Chr(x)互为反函数。Asc(Chr(97))=97 2.4.4日期／时间函数

日期/时间函数可以显示系统的日期和时间，并提供特定的时间、日期信息和格式。常见日期/时间函数如表2-6所示。

表2-6 常用日期/时间函数 函数名 Now() Time() Date() Second(s|n) Minute(s|n) Hour(s|n) Weekday(s|n) 2.4.5随机函数

1．Rnd函数 格式：Rnd[(x )]

功能：产生大于等于0小于1的随机单精度数。 例如：语句Print Rnd，在窗体上输出0.7055475。 说明：

（1）参数x是产生随机数的种子，可以省略。

当x≤0时，每次产生的随机数与前一次相同；

当x＞0或省略时，把前一个随机数作为种子，产生下一个随机数。

（2）Rnd函数经常与Int函数配合使用，产生a到b之间的整数（a为下限，b为上限）。

第 6 页 共 9 页

功能 返回系统日期和时间 返回系统时间 返回系统日期 返回秒 返回分钟 返回小时 返回星期代号 实例 Now() 或Now Time() 或Time Date() 或Date Second(#7:45:48 AM#) Minute(#7:45:48 AM#) Hour(#7:45:48 PM#) Day(\计算结果 2007-6-1 11:24:57 11:25:28 2007-6-1 48 45 19 1 黄冈师范学院计算机科学与技术学院 VisualBasic程序设计教案

公式为：Int((b-a+1)*Rnd+a)

【例2-5】设a = 5,b = 10, c = Int((b - a) * Rnd + a) + 1。计算变量c值的取值范围。 分析：由题意，c= Int((10 - 5) * Rnd + 5) + 1 =Int(5*Rnd+5)+1

由0≤Rnd＜1 可做如下推导：

0≤Rnd*5＜5 ? 5≤Rnd*5+5＜10 ? 5≤Int(Rnd*5+5) ≤9 ? 6≤Int(Rnd*5+5) +1≤10 所以c的取值范围为[6，10]。 2.4.6 判断函数（自学） 2.4.7 Shell函数（自学）

2.5运算符与表达式

1.

算术运算符

算术运算符用来对数值型数据进行相应的运算，Visual Basic中共有以下几种算术运算符。 运算符 （） ^ － * / \\ Mod ＋ － 2.字符串运算符

运算符 + & 含义 连接 通用连接 实例 a=\程序\a的值为\程序program \a=\程序\a的值为\程序1982\优先级 1 2 意义 括号 幂次方 负号 乘 除 整除 取余 加 减 优先级 1 2 3 4 4 5 6 7 7 实例 3*（1+2） 2^（4+2） 5*-2 5/2*4 5*4/3 5*4\\3 3 Mod 5 4+3-1.5 4-1.5+3 结果 9 64 -10 10 6.66666666666667 6 3 5.5 5.5 说明 单目运算 结果取整 说明：

“&”与“＋”的区别

【例2-6】在窗体上画两个文本框（Text1和Text2）和一个命令按钮（Command1），然后编写如下过程：

Private Sub Command1_Click()

a = Text1.Text + Text2.Text Print a End Sub

Private Sub Form_Load()

第 7 页 共 9 页

黄冈师范学院计算机科学与技术学院 VisualBasic程序设计教案

Text1.Text =\Text2.Text =\

End Sub

3.关系运算符 运算符 = > >＝ < <＝ <> Like Is 4.逻辑运算符 运算符 Not And Or Xor Eqv Imp 意义 优先级 取反 与 或 异或 等价 蕴含 1 2 3 3 4 5 说明 Not T= F Not F= T T And T= T T And F= F F And T= F F And F= F T Or T= T T Or F= T F Or T= T F Or F= F T Xor T= F F Xor F= F 同为假 T Xor F= T F Xor T= T 异为真 T Eqv T= T F Eqv F= T同为真 T Xor F= F F Xor T= F 异为假 T Imp F= F F Imp F= T T Imp T= T F Imp T= T 实例 Not(3>2) True And 3>2 \\我\结果 False True True False 意义 等于 大于 大于等于 小于 小于等于 不等于 字符串匹配 对象引用比较 实例 \＝\\\＝\45<714 \＝\我\\\ 结果 False True False True True True True 说明 小写字母大 数字比字母小 字母比汉字小 大小写字母不同 *表任意字符串 \我\True \我\True 2.5.2 表达式

将变量、常量、函数用不同类型的运算符连接起来就形成了相应的表达式，表达式都有一个确定的值和确定的数据类型。

1．Visual Basic中表达式的书写要遵循以下规则： （1）所有字符要写在同一行上，成线性排列； （2）乘号不能省略，例如3*x不能写成3x；

（3）根据运算符的优先顺序适当地加括号，且括号要成对出现 （4）连等不等式要分段书写。

2．数学表达式与Visual Basic表达式的转换： 3．运算优先顺序

2.6基本语句

2.6.1赋值语句

格式：变量名=表达式

第 8 页 共 9 页

黄冈师范学院计算机科学与技术学院 VisualBasic程序设计教案

对象名.属性名=表达式 说明：“=”为赋值符号，其功能是该语句将赋值号右边的值赋给左边的变量。赋值符号右边可以是常量、变量、函数以及表示式。

【例2-7】执行下面的程序段后，b的最终值为多少？

a=400 b=10 a=a+b b=a-b a=a-b

分析： 计算过程如下：a= a+b=400+10=410;b= a-b=410-10=400;a=a-b=410-400=10

执行完后b的值为400。 2.6.2注释、暂停与程序结束语句

1.注释语句

格式：

（1）' 注释内容 (英文输入法状态下的单引号) （2）Rem 注释内容 2.暂停语句

格式： Stop

说明：Stop可以置于程序中的任何地方，相当于执行“运行”菜单中的“中断”命令，执行到Stop时，Visual Basic自动打开立即窗口，方便编程人员调试和跟踪。程序调试成功后，生成.exe文件之前要删去所有的Stop语句。 3.结束语句

程序运行时遇到结束语句，就终止运行。 格式：End

2.7语句和程序

2.7.1书写程序的规则

（1）代码不区分字母大小写（除字符串双引号中的内容外） （1） 对于程序中的关键字（如Integer,If），首字母会被自动转换为大写，其他字母被

转换为小写。 （2） 若关键字由多个单词组成，自动将每个单词的首字母转换成大写。 （3） 如果是用户自己定义的变量、过程名，则以第一次定义的为准，以后的输入不

管如何输入都被自动转换为首次定义的形式。 （4） 语句书写自由 2.7.2命令格式的符号约定

（四）布置作业

1．课外预习

数据的输入与输出。 2．课外作业

（1）课后选择题与填空题； （2）综合题第1小题。

第 9 页 共 9 页