《基本的控制结构》PPT课件.ppt

《《基本的控制结构》PPT课件.ppt》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第四章基本的控制结构4.1顺序结构4.2选择结构4.3循环结构4.4其他辅助控制语句4.5综合应用4.6程序调试4.7常见错误4.1顺序结构顺序结构就是各语句按出现的先后次序执行。一般的程序设计语言中，顺序结构的语句主要是赋值语句、输入/输出语句等。在VB中也有赋值语句；而输入/输出可以通过文本框控件、标签控件、InputBox函数、MsgBox函数或过程及Print方法等来实现。本章目录4.1.1赋值语句形式：[LET]变量名＝表达式或者[对象.]属性=属性值作用：将表达式的值赋值给变量名或属性名。一般用于给变量赋值或对控件设定属性

2、值。例：sum!=sum+xText1.Text＝"欢迎使用VisualBasic6.0"注意：当表达式值的精度与变量的精度不一致时，强制转换成左边的精度，如m%=10/3，则m中的结果为3当表达式是数字字符串，左边变量是数值类型，自动转换为数值类型再赋值，但表达式有非数字字符时，则出错。例如：n%=“123”n%=“12a3”当逻辑型赋值给数值型时，True转换为-1，False转换为0；反之当数值型赋值给逻辑型时，非0转换为True，0转换为False。任何非字符类型赋值给字符类型，自动转换为字符类型。虽然赋值号与关系运算符等于号

3、都用“=”表示，VB系统会根据所处的位置自动判断是何种意义的符号。赋值号左边只能是变量，不能是常量、常数符号或表达式。如：x+y=3,sin(x)=x+z理解n=n+1与s=s+x语句的含义。4.1.2数据的输入与输出1.标签和文本框控件标签可以输出信息，文本框即可输入也可输出信息。2.输入对话框InputBox函数InputBox[$](提示,[标题],[默认值],[Xpos],[Ypos])其中：1)提示:字符串，长度不超过1024个字符，用来提示用户输入。文本可自动换行。如想强制插入回车换行则用：Chr$(13)+Chr$(10

4、)或常数vbCrLf。2)标题：字符串，对话框标题，显示在对话框顶部的标题区。3)默认值:字符串，用来显示输入区的默认初值。4)Xpos，Ypos：是两个整数值，确定对话框在屏幕上的位置；如果省略，则对话框显示在屏幕中心线向下约1/3处。使用InputBox函数时的注意事项：1）默认值表示输入的初始默认值，如果直接按下回车键或单击“确定”按钮，函数的返回值（函数值）为该默认值。2）变量名=InputBox(参数表）函数值默认为字符类型。输入数值时，函数值可以利用Val函数转换为数值后，再参加运算。如果变量已被正确地定义了类型时，则不必

5、进行类型转换。3）输入数据后，按回车键或单击“确定”按钮表示确认，并返回在文本框中输入的数据；如果单击“取消”按钮（或按Esc键）时，则取消当前的输入，此时该函数返回一个空字符串。4）需要输入多个值，则必须多次执行或调用InputBox函数。例4.1利用InputBox输入基本工资和营业额，按营业额的5%提成，计算实发工资并显示。PrivateSubForm_Click()Dimsfgz！,jbgz！,yAsSinglejbgz=Val(InputBox("输入基本工资","计算工资",300))y=Val(InputBox("输入本

6、月营业额"))sfgz=jbgz+y*0.05Print"本月营业额为："&y&"基本工资为："&jbgzPrint"本月实发工资为："&sfgzEndSub作用：打开一个信息框，等待用户选择一个按钮。MsgBox函数返回所选按钮的值，MsgBox过程不返回值。MsgBox函数形式：MsgBox(提示,[按钮],[标题])MsgBox过程形式：MsgBox提示,[按钮],[标题]其中：按钮项是一整型表达式，决定信息框按钮的数目、类型及出现在信息框上的图标形式。3.消息对话框MsgBox函数和MsgBox过程MsgBox按钮设置第3个按

7、钮为默认512vbDefaultButton3第2个按钮为默认56vbDefaultButton2第1个按钮为默认0vbDefaultButton1默认按钮信息图标64vbInformation警告信息图标48vbExclamation询问信息图标32vbQuestion关键信息图标16vbCritical图标类型重试、取消按钮5vbRetryCancel是、否按钮4vbYesNo是、否、取消按钮3vbYesNoCancel终止、重试、忽略按钮2vbAboutRetryIgnore确定、取消按钮1vbOkCancel确定按钮0vbOk

8、Only按钮数目描述值内部常数分组MsgBox所选按钮返回值内部常数返回值被单击的按钮vbOk1确定vbCancel2取消vbAbort3终止vbRetry4重试vbIgnore5忽略vbYes6是vbNo7否例4.2编