常用语句与函数ppt课件.ppt
P27课前练习课前练习1.数据类型有：数据类型有：2.数值型包括：数值型包括：3.字符串数据用字符串数据用 字符括起来，日期型数据用字符括起来，日期型数据用 字符括起来字符括起来 4.布尔型数据的值为：布尔型数据的值为：5.定义常量的格式：定义常量的格式： 定义变量的格式：定义变量的格式：6.逻辑运算符优先级为：逻辑运算符优先级为：7.运算符的执行顺序：运算符的执行顺序： 算术运算符算术运算符 字符串连接运算符字符串连接运算符关系运算符关系运算符逻辑运算符逻辑运算符 Not And Or数值型，字符型，布尔型，日期型等数值型，字符型，布尔型，日期型等整型，长整型，单精度，双精度整型，长整型，单精度，双精度“ ”#True或或FalseConst 常量名常量名 As 类型类型=表达式表达式定义变量：定义变量： Dim As 1. 下列变量名中，合法的变量名是下列变量名中，合法的变量名是 ( ) A.C24 B.A B C.5AB D.1+2 2. 表达式表达式 (2*3)=5 And 12/3 =4的值为的值为 .3.A 为为 True， B 为为 False, 则则 “A and B” 和和 “A Or B” 的值分别是的值分别是 ( ) A. True， True B. True， False C. False， True D. False， FalseATrueC4. 执行下面的程序段后，执行下面的程序段后， b 的值为的值为_ a=300 b=20 a=a+b b=a b a=a b5. 数学关系数学关系3 x 10 表示成正确的表示成正确的 VB 表达式为表达式为 ( ) A.3=x10 B.3=x And x=3 Or x=3 And x 10300D一、赋值语句一、赋值语句 VB 中赋值语句用中赋值语句用“ = ”来实现。来实现。 “=”后面可以是常量、变量或表达式。后面可以是常量、变量或表达式。如：如： intBeginTime=Time() A= “北京北京” M=1a=b N=N+1二、二、 Print 语句语句 语法格式：语法格式： 对象名对象名.Print 表达式表达式 功能：在指定的对象上输出文本，如果不指定对象名，默认在当前窗体上输功能：在指定的对象上输出文本，如果不指定对象名，默认在当前窗体上输出。对象可以是窗体、图片框等。出。对象可以是窗体、图片框等。如如 Print “高一信息技术高一信息技术”只有只有Print 表示换行表示换行三、注释语句三、注释语句方法一：使用字符方法一：使用字符 如：如：c=a 把把a的值赋值给的值赋值给c方法二：使用方法二：使用Rem语句（注意换行单独书写）语句（注意换行单独书写） 如：如：c=a Rem 把把a的值赋值给的值赋值给c四、结束语句四、结束语句 End：结束一个程序的执行：结束一个程序的执行五、与用户交互函数五、与用户交互函数1.InputBox（）函数（）函数格式：格式：InputBox（提示信息（提示信息，标题，标题，默认值，默认值）2.MsgBox（）函数（）函数格式：格式：MsgBox（提示信息（提示信息，按钮，按钮，标题，标题）3. MsgBox语句语句 如：如：MsgBox 恭喜！完全正确恭喜！完全正确按钮参数：按钮参数：vbOKOnly vbOKCancel vbYesNo vbYesNoCancel 执行结果：返回一个数值执行结果：返回一个数值如：如： a= MsgBox(“你输入的数据不正确，是否继续你输入的数据不正确，是否继续”,vbYesNo,”提示框提示框”)执行结果：显示一个输入的对话框执行结果：显示一个输入的对话框 如：如：r=InputBox（”输入半径输入半径r”，”输入框输入框”，5）六、数学函数六、数学函数Abs（）（） 如：如：Abs（56.7）Sqr（）（） 如：如：Sqr（16）Sin（）（） 如：如：Sin（30*3.14/180）Int（）（） 如：如：Int（56.9）Rnd（）产生（）产生0，1）之间的随机数，和）之间的随机数，和Randomize结合使用结合使用七、字符串函数七、字符串函数Len（字符串）：求字符串的长度（字符串）：求字符串的长度 如：如：Len（”2007高一信息技术高一信息技术”） 结果为：结果为：Left（字符串，截取长度）：截取字符串左边部分（字符串，截取长度）：截取字符串左边部分 如：如：Left(2007高一信息技术高一信息技术,8) 结果为结果为:“2007高一信息高一信息”10结果为：结果为：56.7结果为：结果为：4结果为：结果为：0.499770102643102结果为：结果为：56如：如：Private Sub Command1_Click()Randomize 初始化随机数生成器初始化随机数生成器Label1.Caption = 获得幸运奖的是获得幸运奖的是 & Int(Rnd * 45) + 1)End Sub八、日期函数八、日期函数Date（）（）Time（）（）九、常用转换函数九、常用转换函数Val（）（） 如：如：Val（”123456”）Str（）（） 如：如：Str（789）Chr（）（） 如：如：Chr（65）Asc（）（）如：如：Private Sub Timer1_Timer()Label1.Caption = Time（）（）End Sub结果为：结果为：123456结果为：结果为：“789”结果为：结果为：A作业：作业：
