长城VB_讲述.ppt

* * * * * * * * * 5 数据的输入输出－数据输入 功能：生成输入对话框 常用格式： InputBox(prompt[, title] [, default] [, xpos] [, ypos]) prompt－字符串，指定输入框中显示的信息 Title－指定输入框的标题，缺省值为工程名 Default－字符串，指定文本框中的初始内容，缺省为空。 xpos和ypos－数值表达式，成对出现或者成对缺省， 指定输入框左上角相对于屏幕的位置。 InputBox函数一次只能输入一个值 返回目录 5 数据的输入输出－数据输入 [例2.5] Private Sub Form_Click() Dim Username Username = InputBox(输入姓名后单击[确定], 输入) Print Username End Sub 返回目录 6 常用内部函数－数学函数 常用数学函数见教材表2.8 几点说明： 由基本函数可导出所需的数学函数 例如，Log(X)/Log(N)可求出以N为底的对数 对Rnd[(N)]，N的值决定了Rnd生成随机数的方式 N0：以N为随机种子，每次返回相同的随机数 N0或者缺省：产生序列中的下一个随机数 N=0：返回最近生成的随机数 返回目录 例如：随机产生1-selenum之间的数 Randomize (Timer) Selenum = 7 Rn = Int((Selenum) * Rnd + 1) 调用Rnd之前，使用Randomize语句可产生不相同的随机数数列 6 常用内部函数－字符串函数 常用字符串函数见教材表2.9 几点说明： 表2.9只对常用的字符串函数进行了简单的说明 使用Str函数将数字转成字符串时，字符串的首位 一定是空格或是正负号。例如， S1 = Str(67) 返回 67 S2 = Str(-67.5) 返回 -67.5 使用Val函数时，如果遇到不能识别为数字的字符， 则停止转换。例如， Val(“24 and 57”) 返回24 Val(not 57) 返回0 返回目录 6 常用内部函数－日期函数 函数名 功能简述 示例 Date/Time 返回系统日期或时间 Date 返回系统当前日期 Now 返回系统日期和时间 略 Year/ Month/Day (D) 返回年、月、日 Year(Now) 返回2003 WeekDay(D) 返回星期几 WeekDay(Now) 返回3 Hour(time) 返回小时数 Hour(Time) 返回21 常用的日期函数见下表。其中，D表示日期类型表达式。 返回目录 上述示例的当前日期时间是2003年3月18号、星期三、晚上9点10分。 6 常用内部函数－类型转换函数 函数名 返回类型 函数名 返回类型 CBool(X) Boolean CInt(X) Integer CDate(X) Date CLng(X) Long CCur(X) Currency CSng(X) Single 作用：强制将一个表达式转换成某种特定数据类型 返回目录 * * * * * * * * * * * * * * * * * * * * * * * * * * Visual Basic语言基础 学习目标： 掌握VB的编码规则 了解VB的数据类型 掌握变量、常量的声明和使用 掌握运算符和表达式的使用 掌握VB数据的输入与输出 了解VB的内部函数 第2章 Visual Basic语言基础 教学内容： 1 VB编码规则 2 VB的数据类型 3 变量与常量 4 运算符与表达式 5 数据的输入输出 6 VB的常用内部函数 1 VB编码规则 [例2.1] 单击窗体可输出内容交换后的a变量和b变量的值。 Private Sub Form_Click() Dim a As Integer, b As Integer, intTemp As Integer 声明变量 a = 10 变量赋值 b = 20 Print a变量和b变量内容交换前：; a; b 变量交换