2018年山东省日照青山学校教科版高一信息技术选修一课件：2.2.4常用语句与函数 .pptVIP

5、常转换函数 Str( )函数和Val( )函数是一对反函数，前者将数字转化为字符串，后者将字符串转化为数字。Val( )函数从前向后截取出参数的数字部分，如前无数字，则返回0。 上机测试：P32实践 Private Sub Form_Click() Dim x As String, y As Integer Dim a As String, b As String, c As Integer x = 1 y = 123 a = Chr(Asc(x) + 5) b = Str(Val(x) + 5) c = Val(Str(y) + 5) Print a, b, c End Sub Private Sub Command1_Click() a = InputBox(输入人数, 请输入本班人数) If a 0 Or a 50 Then b = MsgBox(你输入的数值超出范围（1-50）, vbOKCancel, 错误提示) Else Randomize c = Int((Rnd * a) + 1) Print 中奖编号为:; c End If End Sub 四种语句 1、赋值语句 2、print 语句 3、注释语句 4、结束语句 五种函数 1、与用户交互函数 2、数学函数 3、字符串函数 4、日期函数 5、常用转换函数 VB中的赋值语句用“=”来实现 如：a=1 b=a 格式：变量 = 表达式 或 对象.属性= 表达式 功能：将右边表达式的值赋给左边的变量或属性 说明： 1、这里的“=”是赋值符号，是将表达式的值计算出来后再赋予该变量。 2、“=”左边只能是变量，右边可以是常量、变量或表达式。 3、变量被赋值前的值常称为”初始值“。 VB中字符串变量的初始值为空串； 数值型变量的初始值为0； 逻辑型变量的初始值为False 如：n=n + 1 C=2*3.14*r lblshow.caption=time() 1、请分析下面c的值： Private?Sub?Command1_Click()? ?? Dim?a?as?integer? ? ? Dim?b?as?integer? ?? Dim?c?as?integer? ?? a?=?5? ?? b?=4 ? ? c?=?a?+?b? Print c End?Sub 2、题1代码中若去掉a=5语句，求C的值 4 3、下列给出的赋值语句中正确的是（C）。 ?A、4?=?M??????B、#NAME???C、B=A－3????D、x?+?y?=?4?  9 格式：[对象名.]print [表达式列表] 功能：在指定的对象上输出文本、图形等相应的内容。 说明： 1、对象可以是窗体、图片框等，若不指定对象名，默认在当前窗体中输出。 2、表达式列表可以是一个或多个表达式，各表达式之间用”;”或”,”隔开。 3、print语句行末若没有分隔符”;”或”,”则print语句执行完成后自动换行 2、print 语句 用；隔开，各个内容紧跟着 用，隔开，按分区格式输出 窗体、图片框等 如：picture1.print “hello” Print “hello” 1、请你设计一个程序?，规范输出 a+b=3 Private?Sub?Command1_Click()? ??a=1:b=2? ???print?“a+b=“；a+b? End?Sub? [分析]前一个“a+b=”是字符串，后一个a+b是表达式，输出表达式的值（变量也是输出值） 上机实践 3、P28 Private Sub Form_Click() Print 北京, 奥运 Print 北京; 奥运 End Sub 2、P27 Private Sub Form_Click() Print ********************** Print 新北京 新奥运 Print ********************** End Sub 为了提高程序的可读性，通常需要在程序适当的位置加上必要的注释。 VB中注释语句的格式为： 1、在” ‘ “字符后加注释内容 如：r = inputbox(“输入r:”) ‘输入半径r 2、用Rem注释内容。（用Rem语句注释，应将Rem语句独立成行书写,不可像” ‘ “一样直接放在其他语句后面，否则VB将提示错误） 如：Rem 计算圆的周长 c=2*PI *r 3、注释语句 语法格式：End 功能：