程序设计基础课件

第四讲第四讲1主题定时器程序设计基础数据类型常量变量运算符表达式内部函数主题定时器2定时器Timer定时器控件用来有规律地间隔一段时间完成一定的操作。建议名称采用前缀tmr，如：tmrTimer。默认名称Timer1、Timer2……定时器的Interval属性，表示时钟间隔。单位：毫秒。如：间隔1秒，Interval设为1000。Interval设为0，时钟不起作用。时钟在运行阶段不可见，也无其他外观等属性定时器的Timer事件，唯一事件，按间隔自动触发。定时器Timer定时器控件用来有规律地间隔一段时间完成一定3举例时钟：通过定时器显示系统时间Time()函数课外研究：圆盘时钟移动字幕：通过定时器控制Label的移动（改变Label的Left属性）字幕的循环移动推出字幕：通过定时器改变Label的FontSize属性Label的居中字幕的定格：当字体变到一定大小后停止改变闪烁颜色：红兰交替显示“欢迎光临”课堂练习：红黄兰三色交替显示“欢迎光临”举例时钟：通过定时器显示系统时间Time()函数4如何控制定时器的启动与关闭定时器的Enabled属性（True|False）表示定时器可否使用，默认True。如果定时器的Interval属性为0，那么定时器也不起作用。思考题：计时器按“开始”进行计时、到时间（如10秒）则停止计时，显示时间到！如何计时？需要变量来保存用掉的时间变量？？？如何控制定时器的启动与关闭定时器的Enabled属性（Tru5程序设计基础程序设计基础6注释语句与程序书写规范作用：对程序代码进行注解格式

（1）Rem注释内容注意Rem是独立的语句

（2）由单引号’开始的注释内容，可以是独立的语句，也可以用于语句末尾注释语句为非执行语句，计算机自动改为绿色显示例：Rem下面进行窗体初始化MoveLeft-100’窗体从当前位置左移100Twips优秀的程序代码应该是易读的、可维护的、可扩充的，这些都离不开注释语句。总结：尽量一行一条语句一行多条语句和一条语句多行的写法结构化程序设计和缩进格式尽可能多的注释语句注释语句与程序书写规范作用：对程序代码进行注解7数据类型数据是指可以被计算机处理的信息数据有数值型数据和非数值型数据（如字符、时间等）数据分类的目的是为了快速处理数据和有效利用存储空间不同的数据类型占用不同的存储空间、表示的数值范围、格式都有不同的规定数据类型数据是指可以被计算机处理的信息8数据类型数值型整型Integer：2字节长整型Long：4字节单精度浮点数Single：4字节双精度浮点数Double：8字节货币型Currency：8字节字节型Byte：1字节字符型变长String（1个字符占1字节）定长String*size(size：1～65535)逻辑型Boolean：2字节日期时间型Date：8字节变体型Variant：16字节数据类型数值型9直接常量整形、长整型与字节常量十进制表示：与日常习惯相同八进制表示：&O开头十六进制表示：&H开头浮点型常量日常记数法：21.145、-0.012、.5指数记数法（科学记数法）：mE±n形式表示m×10±n；E可以用D代替；大小写一样字符串常量：用一对双引号“括起来的字符逻辑常量：True|False日期时间常量：用一对#括起来，可以表示日期、时间、或同时表示日期时间如：#2002-3-108:35:10PM#直接常量整形、长整型与字节常量10符号常量符号常量：在声明中用Const语句，语法：

Const符号常量名[As类型]=常量例：ConstPiAsSingle=3.14159Consta=3Constb=3*a符号常量的运用使程序简洁易维护系统的预定义常量如：vbRed、vbCr等符号常量符号常量：在声明中用Const语句，语法：

Cons11变量Variable变量在程序运行过程中值可以改变变量用于存储程序运行中的临时数据变量有一定类型、占用一定空间变量的运用通过变量名进行操作变量命名规则：字母打头，跟字母数字下划线、最长255个字符。变量名的前缀建议（略）变量Variable变量在程序运行过程中值可以改变12变量值的存取赋值语句：变量名=表达式复习：[对象名.]属性名=表达式注意：无论属性还是变量，出现在=右边表示取值，不变；出现在=左边存入新值，改变。例：t=34a=bs=a*bx=x+1

BackColor=vbRedHeight=Width*2FontSize=FontSize+4如何解决计时器问题?变量值的存取赋值语句：变量名=表达式t=34BackColo13其他问题？交换两个变量的值a←→b？两个变量中寻找大数？任意两个变量保持a>b？多个数中寻找最大数？多个数保持a>b>c>……其他问题？交换两个变量的值a←→b14变量声明变量声明的目的是说明变量的作用域和变量的类型，以便为变量分配内存空间和及时回收内存空间建议变量先声明再使用在[通用][声明]中写OptionExplicit语句或菜单[工具|选项]…[代码设置]

√要求变量声明变量声明变量声明的目的是说明变量的作用域和变量的类型，以便为15变量声明变量类型的显式说明:Dim语句，语法：

Dim变量名[As数据类型][,变量名[As数据类型]……]举例：DimaAsSingleDimbAsDateDimintCountAsInteger,strPhoneAsString*7注意： Dimm,nAsInteger（？）DimmAsInteger:nAsInteger（×）变量声明变量类型的显式说明:Dim语句，语法：

Dim变16Print语句Print输出空行Print<输出项>[,|;<输出项>……]；表示紧凑格式，表示标准输出格式例：Print“x=”;6,“y=”;9PrintPrint-123.5,1.6E+4Print语句Print17运算符和表达式由圆括号以及若干运算符将常量、变量以及函数连接组成的有意义的式子，称为表达式。常量、变量、函数本身也是表达式。算术运算符和表达式结果为数值+、-、*、/、^、\、MOD优先级：（）、^、*/、\、MOD、+-例：?2^3/3Mod9\4算术表达式必须在一行中书写，乘号*不能省略，注意()的运用，特殊符号的表示运算符和表达式由圆括号以及若干运算符将常量、变量以及函数连接18运算符和表达式字符串表达式和运算符&、+：表示连接；&支持自动转换例？“123”+“345”例？123+345例？Text1&123（假设Text1中输入了123或小李)例？Text1+123（假设Text1中输入了123或小李)日期时间运算符和表达式日期时间±数值→新日期时间例：？#3/1/2002#+1.5日期时间-日期时间→数值（相差天数）例：？#3/1/2002#-#2/1/2002#运算符和表达式字符串表达式和运算符19运算符和表达式关系表达式和运算符结果为逻辑值：True|False=、<>、<、>、>=、<=数值的比较按数轴取值字符的比较按ASCII码取值逐个比较、英文字母按字典顺序、数字按数值顺序、小写字母大于大写字母P.347附录1例？4>5/2例？”cat”>”dog”例？“101”<“99”运算符和表达式关系表达式和运算符20运算符和表达式逻辑表达式和运算符(表2-3)结果为逻辑值：True|FalseAnd逻辑与：两者都为真才为真Or逻辑或：两者有一个真就为真Not逻辑非：只有一个运算量，取反优先级：Not>And>Or例：？5>4AndNot4=2*2Or3<7注意：X>=0And<=10（×）0<=X<=10（×）运算符和表达式逻辑表达式和运算符(表2-3)21条件构造判断一个整数是偶数判断一个数是整数判断两个数中至少有一个>0判断两个数中只有一个>0判断平面上一个点在圆心为(0,0)，半径为2的圆内判断平面上一个点在中心为(0,0)，边长为2的正方形内条件构造判断一个整数是偶数22常用内部函数数学函数Sin(x)、Cos(x)、Tan(x)、Atn(x)Abs(x)、Log(x)、Exp(x)、Sqr(x)、Sgn(x)、Fix(x)、Int(x)Rnd(x)例子？Int(-9.7)?Fix(-9.7)写出大于x的最小整数（设x>0）产生∈[1，100]的随机整数Randomize语句Int(Rnd*(m-n+1))+n常用内部函数数学函数23常用内部函数字符串函数Trim(x)、Ltrim(x)、Rtrim(x)Left(x,n)、Right(x,n)、Mid(x,I,n)Len(x)Space(n)、String(n,ASCII码|x)Ucase(x)、Lcase(x)Instr(x,y)例子?Mid(“thepeople’srepublicofchina”,5,6)?Len(“浙江理工大学”)?String(6,”abc”)?Instr(“China”,“in”)?Instr(“China”,“ch”)常用内部函数字符串函数24常用内部函数日期时间函数Date、Time、NowHour(x)、Minute(x)、Second(x)类型转换函数Chr(n)、Asc(x)Str(x)、Val(x)例子？Val("123")+Val("456")?Str(1)+Str(2)?Chr(Asc("xyz")-2)常用内部函数日期时间函数25常用内部函数只能在Print语句中使用的函数Tab(x)Spc(x)例子PrintTab(2);"abc";Tab(5);"def"PrintSpc(2);"abc";Spc(5);"def"PrintSpace(2);"abc";Space(5);"def"X=Space(2)+"abc"+Space(5)+"def"

PrintX常用内部函数只能在Print语句中使用的函数26输入对话框InputBox函数作用：产生输入对话框，返回用户在对话框输入的信息格式：

变量名=InputBox([提示信息][,对话框标题][,默认值])返回值：输入框中输入的内容，字符型举例：问候程序计算程序编程时如果要用户从键盘输入数据就要用上InputBox函数！！！输入对话框InputBox函数作用：产生输入对话框，返回用户27消息对话框MsgBox函数作用：产生消息框格式：变量名=MsgBox([提示信息][[,对话框类型][,对话框标题]])同时定义图标和按钮时，数值取它们的和P.47表2-5P.48表2-6表2-7返回值：整数，对应用户的单击的按钮。P.49表2-8举例：提示程序：结束程序的确认提示：多行提示信息可以用Chr(13)[vbCr常量]或Chr(10)[vbLf常量]表示回车或换行MsgBox(“mynameis”+vbCr+“lisa”)也可以用Msgbox函数输出计算结果（注意转成字符型）消息对话框MsgBox函数作用：产生消息框28标签的快捷键运用在标签的Caption属性中可以用“&字母”设计快捷键因为标签本身不能获得焦点，所以该快捷键使得下一个焦点对象自动获得焦点控件的TabIndex属性用来描述<Tab>键的顺序，即获得焦点的顺序标签的快捷键运用在标签的Caption属性中可以用“&字母”29实验四编程练习一注意程序的三部曲（输入数据、处理数据、输出结果）用变量进行保存数据掌握输入数据和输出数据的各种方法多媒体片头作业：P.49习题二（一、二、三）做在书上实验四编程练习一30第四讲第四讲31主题定时器程序设计基础数据类型常量变量运算符表达式内部函数主题定时器32定时器Timer定时器控件用来有规律地间隔一段时间完成一定的操作。建议名称采用前缀tmr，如：tmrTimer。默认名称Timer1、Timer2……定时器的Interval属性，表示时钟间隔。单位：毫秒。如：间隔1秒，Interval设为1000。Interval设为0，时钟不起作用。时钟在运行阶段不可见，也无其他外观等属性定时器的Timer事件，唯一事件，按间隔自动触发。定时器Timer定时器控件用来有规律地间隔一段时间完成一定33举例时钟：通过定时器显示系统时间Time()函数课外研究：圆盘时钟移动字幕：通过定时器控制Label的移动（改变Label的Left属性）字幕的循环移动推出字幕：通过定时器改变Label的FontSize属性Label的居中字幕的定格：当字体变到一定大小后停止改变闪烁颜色：红兰交替显示“欢迎光临”课堂练习：红黄兰三色交替显示“欢迎光临”举例时钟：通过定时器显示系统时间Time()函数34如何控制定时器的启动与关闭定时器的Enabled属性（True|False）表示定时器可否使用，默认True。如果定时器的Interval属性为0，那么定时器也不起作用。思考题：计时器按“开始”进行计时、到时间（如10秒）则停止计时，显示时间到！如何计时？需要变量来保存用掉的时间变量？？？如何控制定时器的启动与关闭定时器的Enabled属性（Tru35程序设计基础程序设计基础36注释语句与程序书写规范作用：对程序代码进行注解格式

（1）Rem注释内容注意Rem是独立的语句

（2）由单引号’开始的注释内容，可以是独立的语句，也可以用于语句末尾注释语句为非执行语句，计算机自动改为绿色显示例：Rem下面进行窗体初始化MoveLeft-100’窗体从当前位置左移100Twips优秀的程序代码应该是易读的、可维护的、可扩充的，这些都离不开注释语句。总结：尽量一行一条语句一行多条语句和一条语句多行的写法结构化程序设计和缩进格式尽可能多的注释语句注释语句与程序书写规范作用：对程序代码进行注解37数据类型数据是指可以被计算机处理的信息数据有数值型数据和非数值型数据（如字符、时间等）数据分类的目的是为了快速处理数据和有效利用存储空间不同的数据类型占用不同的存储空间、表示的数值范围、格式都有不同的规定数据类型数据是指可以被计算机处理的信息38数据类型数值型整型Integer：2字节长整型Long：4字节单精度浮点数Single：4字节双精度浮点数Double：8字节货币型Currency：8字节字节型Byte：1字节字符型变长String（1个字符占1字节）定长String*size(size：1～65535)逻辑型Boolean：2字节日期时间型Date：8字节变体型Variant：16字节数据类型数值型39直接常量整形、长整型与字节常量十进制表示：与日常习惯相同八进制表示：&O开头十六进制表示：&H开头浮点型常量日常记数法：21.145、-0.012、.5指数记数法（科学记数法）：mE±n形式表示m×10±n；E可以用D代替；大小写一样字符串常量：用一对双引号“括起来的字符逻辑常量：True|False日期时间常量：用一对#括起来，可以表示日期、时间、或同时表示日期时间如：#2002-3-108:35:10PM#直接常量整形、长整型与字节常量40符号常量符号常量：在声明中用Const语句，语法：

Const符号常量名[As类型]=常量例：ConstPiAsSingle=3.14159Consta=3Constb=3*a符号常量的运用使程序简洁易维护系统的预定义常量如：vbRed、vbCr等符号常量符号常量：在声明中用Const语句，语法：

Cons41变量Variable变量在程序运行过程中值可以改变变量用于存储程序运行中的临时数据变量有一定类型、占用一定空间变量的运用通过变量名进行操作变量命名规则：字母打头，跟字母数字下划线、最长255个字符。变量名的前缀建议（略）变量Variable变量在程序运行过程中值可以改变42变量值的存取赋值语句：变量名=表达式复习：[对象名.]属性名=表达式注意：无论属性还是变量，出现在=右边表示取值，不变；出现在=左边存入新值，改变。例：t=34a=bs=a*bx=x+1

BackColor=vbRedHeight=Width*2FontSize=FontSize+4如何解决计时器问题?变量值的存取赋值语句：变量名=表达式t=34BackColo43其他问题？交换两个变量的值a←→b？两个变量中寻找大数？任意两个变量保持a>b？多个数中寻找最大数？多个数保持a>b>c>……其他问题？交换两个变量的值a←→b44变量声明变量声明的目的是说明变量的作用域和变量的类型，以便为变量分配内存空间和及时回收内存空间建议变量先声明再使用在[通用][声明]中写OptionExplicit语句或菜单[工具|选项]…[代码设置]

√要求变量声明变量声明变量声明的目的是说明变量的作用域和变量的类型，以便为45变量声明变量类型的显式说明:Dim语句，语法：

Dim变量名[As数据类型][,变量名[As数据类型]……]举例：DimaAsSingleDimbAsDateDimintCountAsInteger,strPhoneAsString*7注意： Dimm,nAsInteger（？）DimmAsInteger:nAsInteger（×）变量声明变量类型的显式说明:Dim语句，语法：

Dim变46Print语句Print输出空行Print<输出项>[,|;<输出项>……]；表示紧凑格式，表示标准输出格式例：Print“x=”;6,“y=”;9PrintPrint-123.5,1.6E+4Print语句Print47运算符和表达式由圆括号以及若干运算符将常量、变量以及函数连接组成的有意义的式子，称为表达式。常量、变量、函数本身也是表达式。算术运算符和表达式结果为数值+、-、*、/、^、\、MOD优先级：（）、^、*/、\、MOD、+-例：?2^3/3Mod9\4算术表达式必须在一行中书写，乘号*不能省略，注意()的运用，特殊符号的表示运算符和表达式由圆括号以及若干运算符将常量、变量以及函数连接48运算符和表达式字符串表达式和运算符&、+：表示连接；&支持自动转换例？“123”+“345”例？123+345例？Text1&123（假设Text1中输入了123或小李)例？Text1+123（假设Text1中输入了123或小李)日期时间运算符和表达式日期时间±数值→新日期时间例：？#3/1/2002#+1.5日期时间-日期时间→数值（相差天数）例：？#3/1/2002#-#2/1/2002#运算符和表达式字符串表达式和运算符49运算符和表达式关系表达式和运算符结果为逻辑值：True|False=、<>、<、>、>=、<=数值的比较按数轴取值字符的比较按ASCII码取值逐个比较、英文字母按字典顺序、数字按数值顺序、小写字母大于大写字母P.347附录1例？4>5/2例？”cat”>”dog”例？“101”<“99”运算符和表达式关系表达式和运算符50运算符和表达式逻辑表达式和运算符(表2-3)结果为逻辑值：True|FalseAnd逻辑与：两者都为真才为真Or逻辑或：两者有一个真就为真Not逻辑非：只有一个运算量，取反优先级：Not>And>Or例：？5>4AndNot4=2*2Or3<7注意：X>=0And<=10（×）0<=X<=10（×）运算符和表达式逻辑表达式和运算符(表2-3)51条件构造判断一个整数是偶数判断一个数是整数判断两个数中至少有一个>0判断两个数中只有一个>0判断平面上一个点在圆心为(0,0)，半径为2的圆内判断平面上一个点在中心为(0,0)，边长为2的正方形内条件构造判断一个整数是偶数52常用内部函数数学函数Sin(x)、Cos(x)、Tan(x)、Atn(x)Abs(x)、Log(x)、Exp(x)、Sqr(x)、Sgn(x)、Fix(x)、Int(x)Rnd(x)例子？Int(-9.7)?Fix(-9.7)写出大于x的最小整数（设x>0）产生∈[1，100]的随机整数Randomize语句Int(Rnd*(m-n+1))+n常用内部函数数学函数53常用内部函数字符串函数Trim(x)、Ltrim(x)、Rtrim(x)Left(x,n)、Right(x,n)、Mid(x,I,n)Len(x)Space(n)、String(n,ASCII码|x)Ucase(x)、Lcase(x)Instr(x,y)例子?Mid(“thepeople’srepublicofchina”,5,6)?Len(“浙江理工大学”)?String(6,”abc”)?Instr(“China”,“in”)?Instr(“China”,“ch”)常用内部函数字符串函数54常用内部函数日期时间函数Date、Time、NowHour(x)、Minute(x)、Secon