资源描述：
《vb程序设计第四章 基本的控制结构》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、第四章基本的控制结构顺序结构（Sequence）选择结构（Selection）循环结构（Repetition）其它辅助控制语句常用算法（一）Summary顺序结构按照各语句出现的先后顺序执行包括：赋值语句输入/输出语句4.1顺序结构赋值语句是任何程序设计的最基本语句。语法结构：变量名＝表达式其中：变量名：已经定义（声明）的变量名称表达式：任何类型表达式（算术、逻辑、函数等等），类型与变量名的类型一致。1赋值语句赋值语句的作用：先计算等号右边表达式的值，然后赋给等号左边的变量。VB赋值语句的两项任务给
2、变量赋值给控件的属性赋值例如：sngRate!=0.1‘将0.1赋给单精度变量sngRatetxtName.Text=“Hu”赋值处理当赋值等号左右数值类型不相同时，强制转换成左边变量的类型（精度）n%=3.5‘结果为4（四舍五入）当赋值等号左边是数值类型，而右边表达式是数字字符串，则VB自动转换成数值类型再赋值，如表达式不是数字字符串，则出错。n%=“123”‘结果为123，与n%=Val(“123”)效果一样n%=“1a23”‘出现“类型不匹配”错误当逻辑类型赋值给数值类型时，True转换为－1
3、，False转换为0；反之，当数值型赋值给逻辑类型，则非零转换为True，0转换为False。任何非字符类型赋值给字符类型，自动转换为字符类型。注意：尽量采用转换函数进行转换，避免VB系统自动转换。这样能避免出现意想不到的错误。VB系统会自动判断赋值符号“=“和关系运算符等于符号”=“。赋值符号”=“左边只能是变量，不能是常量、或者表达式。赋值语句：intX=intX+1VB与用户之间的数据交互通过两个函数和一个过程完成。函数有返回值，过程没有返回值。（第六章）函数：InputBox()，MsgBo
4、x()过程：MsgBox2人机交互函数和过程语法：变量名＝InputBox(提示[,标题][,默认][,x坐标位置][,y坐标位置])其中：提示：字符串表达式，显示信息。如果要显示多行，则在每行未加上回车Chr(13)和换行Chr(10)，或者，加上VB系统常数vbCrLf。1InputBox函数标题：字符串表达式，在对话框的标题显示。如果省略，则显示应用程序的名称。默认：字符串表达式。当对话框中没有输入时，则该默认值作为输入的内容。x坐标位置，y坐标位置：整数表达式，确定对话框左上角在屏幕上的位置
5、，屏幕左上角为坐标原点，单位：twip。1000twip=1inch。打开一个标准对话框，等待用户输入内容，用户单击“确定（OK）”或者按回车键，则该函数返回输入的值，其类型为字符型。例如：DimstrNameAsString*40,strS1AsStringstrS1="请输入你的姓名"+vbCrLf+"然后回车确定"strName=InputBox(strS1,"输入框",,100,100)InputBox函数的作用语法：变量名＝MsgBox(提示[,按钮][,标题])其中：提示：与InputB
6、ox函数相同标题：与InputBox函数相同按钮：整数表达式，决定信息框按钮的数目和类型及其图标类型。参见P77，表1.4.12MsgBox()函数分组内部常数按钮值描述vbOkOnlyvbOkCancelvbAbortRetryIgnorevbYesNoCancelvbYesNovbRetryCancel012345“确定”“确定”、“取消”“终止”、“重试”,“忽略”“是”、“否”、“取消”“是”、“否”“重试”、“取消”按钮数目表1.4.1“按钮”设置值及其意义vbCriticalvbQues
7、tionvbExclamationvbInformation16324864红色STOP标志询问信息图标？警告信息图标！信息图标i按钮类型vbDefaultButton1vbDefaultButton2vbDefaultButton30256512第一个按钮为默认第二个按钮为默认第三个按钮为默认默认按钮vbApplicationModevbSystemMode04096应用模式系统模式模式注意：四组方式可以组合使用。一般采用内部常数形式，而不采用按钮值形式。例如：I=MsgBox(“密码错误”,vb
8、RetryCancel+vbExclamation,”输入密码”)I=MsgBox(“密码错误”,53,”输入密码”)模式：若应用模式建立对话框，则必须响应对话框才能继续当前的应用程序，但可以切换到其它应用程序。若应用系统模式建立对话框，则所有的应用程序都被挂起，直到用户响应对话框为止。内部常数按钮值被单击的按钮vbOkvbCancelvbAbortvbRetryvbIgnorevbYesVBNo1234567确定取消终止重试忽略是否表1.4.2MsgBox函数返回值
