VB教程 全套课件 vb-4

《VB教程 全套课件 vb-4》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、第四章基本的控制结构（8学时）4.1顺序结构4.2选择结构4.3循环结构4.4其它辅助控制语句4.5常用算法（一）4.6常见错误（顺序、条件、循环）一.赋值语句形式:[LET]变量名＝表达式作用:将表达式的值赋值给变量名.一般用于给变量赋值或对控件设定属性值.例:sRate!=0.1Text1.Text＝"欢迎使用VisualBasic6.0”当表达式的类型与变量的类型不一致时,强制转换成左边的精度iA%=10/3iA中的结果为3注意：虽然赋值号与关系运算符等于号都用“=”表示，VB系统会根据所处的位置自动判断是何种意义的符号。二.与用户交互函数和过程1.Inp

2、utBox函数InputBox(提示[，标题][，缺省][，x坐标位置][，y坐标位置])其中:提示提示信息,标题对话框标题,缺省输入区缺省值函数返回字符类型.例要在屏幕上显示如下的对话框:DimstrNameAsString*40，strS1AsString*40相应的语句如下:strName=InputBox(“请输入你的姓名”+vbCrLf+“然后单击确定”,“输入框”)也可以：strS1=“请输入你的姓名”+Chr(13)+Chr(10)+“然后单击确定”strName=InputBox(strS1，“输入框”，，100，100)当键盘输入“王晓明”后,

3、变量strName获得键盘输入的值.2.MsgBox函数和MsgBox过程函数形式:变量[%]=MsgBox(提示[,按钮][，标题])过程形式:MsgBox提示[,按钮][,标题]按钮值如下:函数返回所选按钮整数值:例3.2编一帐号和密码检验程序。要求:帐号不超过6位数字,有错,清除原内容再输入.密码输入时在屏幕上以“*”代替;若密码错，显示有关信息，选择“重试”按钮，清除原内容再输入，选择“取消”按钮，停止运行。分析:帐号6位,MaxLength为6,LostFocus判断数字IsNumeric函数密码PassWordChar为“*”,MsgBox函数设置密

4、码错对话框.常见错误数据合法性检查中引起程序的死循环PrivateSubText1_LostFocus()IfNotIsNumeric(Text1)ThenText1=""Text1.SetFocusEndIfEndSubPrivateSubText2_LostFocus()IfNotIsNumeric(Text2)ThenText2=""Text1.SetFocusEndIfEndSubIfText2<>""AndNotIsNumeric(Text2)Text1Text2Text1确定三.选择结构1.If…Then语句(单分支结构)If<表达式>Then语句块

5、EndIf或If<表达式>Then<语句>例:已知两个数x和y，比较它们的大小，使得x大于y.IfxThen<语句块1>Else<语句块2>EndIfIf<表达式>Then<语句1>Else<语句2>计算分段函数单分支结构实现:y=cos(x)－x^3+3*xIfx<>0Theny=sin(x)+sqrt(x*x+1)双分支结构实现:Ifx<>0Theny=sin(

6、x)+sqrt(x*x+1)Elsey=cos(x)－x^3+3*xEndIf3.If…Then…ElseIf语句(多分支结构)形式:If<表达式1>Then<语句块1>ElseIf<表达式2>Then<语句块2>…[Else语句块n+1]EndIf不管有几个分支,依次判断，当某条件满足，执行相应的语句块，其余分支不再执行；若条件都不满足，且有Else子句，则执行该语句块，否则什么也不执行。.ElseIf不能写成ElseIf。例已知百分制成绩mark，显示对应的五级制成绩哪些正确，哪些错误？4．If语句的嵌套If语句的嵌套是指If或Else后面的语句块中又包含I

7、f语句。形式如下：If<表达式1>ThenIf<表达式11>Then…EndIf…EndIf例：已知x,y,z三个数，使得x>y>z。用一个IF语句和一个嵌套的IF语句实现：Ifx

8、表>：与<变量或表达式>