vb第03章VB教学试题.ppt

略讲，第七章祥讲 * * 演示变量的隐式声明和强制显式声明的区别 * Val中除了数字和E/D外，遇到其它符号都停止转换。 演示函数：立即窗口+？ * 演示函数：立即窗口+？ * * MOD的结果符号由第一个数决定，值为去除负号后相除的余数。 * 只要求 not and or * * * * 要强制显式声明变量，需要在窗体模块或标准模块的通用声明段中加入语句： Option Explicit 注意：该语句的作用范围仅限于其所在模块。 3．强制显式声明 2．隐式声明 如果一个变量未经定义而直接使用，则该变量为变体型变量。 P72.13 * 【例】 输入圆锥体的底面半径和高，计算圆锥体的底面积和体积。 * 代码设计： Private Sub Command1_Click() Const PI = 3.1416 Dim r As Single, h As Single r= Val(Text1.Text) h = Val(Text2.Text) Label5.Caption = PI * r ^ 2 Label6.Caption = 1 / 3 * PI * r ^ 2 * h End Sub * 内部函数是系统内部预定义的，主要是为了提高编程人员的开发效率。 调用格式为： 函数名([参数表]) 参数: 常量、变量或表达式。多个参数之间以逗号分隔，有些函数可以没有参数。 函数调用一般出现在表达式中，作为一个值参与表达式的运算或输出。 3.5 常用内部函数 2. 转换函数P64 Val( S)：将字符型S转换为数值型。 Str(N):将数值型N转换为字符型。 在结果字符串中，正数的数字前有一空格。 * Val( ”123”) Val(”1.23e3”) Val(”1.23d3”) Val(”123+456”) Str(-123) Str(123) * 数学函数用于各种数学运算，包括三角函数、求平方根、绝对值、对数、指数函数等。常用的数学函数见书P64 。 3. 数学函数 P72.12 * 日期和时间函数用于： 返回系统的日期和时间：date( ),time( ), now( ) 返回指定的日期和时间的一部分 对日期型数据进行运算等。 返回值的格式与操作系统的日期时间格式设置有关。 4 日期和时间函数P65 * 【例】设计数字时钟，每秒更新显示一次。 Timer1 Label1 Label2 Private Sub Timer1_Timer() Label1.Caption = date Label2.Caption = time End Sub * VB具有很强的字符串处理能力。 5 字符串函数P66 Mid(”howareyou!”,1,3) Mid(” howareyou!”,4,3) Mid(” howareyou! ”,7,4) Mid(” howareyou! ”,7) Left(” howareyou”,3) right(” howareyou”,4) Asc(”0”) Asc(”A”) Asc(”a”) Chr(100) Asc(chr(20)) Chr(asc(”ABCD”) Len(“123 ab 四川) replace(”howareyou!”,”are”,” are ”) * 7. 随机函数Rnd 函数P68 Rnd[(x)] 返回值： [0,1)之间的单精度随机数。 参数x： x0，则每次都用x作为随机数种子得到相同的结果； x0，则以上一个随机数作种子，产生序列中的下一个随机数； x=0，则产生与最近生成的随机数相同的数。 x省略时默认为x0. 生成[a,b]区间范围内的随机整数公式： Int((b-a+1)*Rnd+a) 例1：生成[1,99]之间的随机整数： Int(99*Rnd+1) 例2：生成(1,99)之间的随机整数: Int(97*Rnd+2) * 创建一种子值供 Rnd 函数使用，格式： Randomize [n] Randomize语句 n: 种子，省略时以系统时间作为种子。 例1：产生同样的随机数序列。 Private Sub Command1_Click() Print Rnd End Sub 例2：产生不同的随机数序列。 Private Sub Command1_Click() Randomize Pr