Visual Basic 6.0程序设计 教学课件 作者 黄学平 主编Ⅲ-02 structure.ppt

《Visual Basic 6.0程序设计 教学课件 作者 黄学平 主编Ⅲ-02 structure.ppt》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

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

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

3、的值.2.MsgBox函数和MsgBox过程函数形式:变量[%]=MsgBox(提示[,按钮][，标题])过程形式:MsgBox提示[,按钮][,标题]按钮值如下:函数返回所选按钮整数值:例圆半径用inputbox输入，计算结果用msgbox输出。r=val(inputbox(“输入圆半径：”)s=3.14159*r*rmsgbox“圆的面积=”+str(s)三.选择结构1.If…Then语句(单分支结构)If<表达式>Then语句块EndIf或If<表达式>Then<语句>例:已知两个数x和y，比较它们的大小，使得x大于y.Ifx

4、t=xx=yy=tEndIf或IfxThen<语句块1>Else<语句块2>EndIfIf<表达式>Then<语句1>Else<语句2>计算分段函数单分支结构实现:y=cos(x)－x^3+3*xIfx<>0Theny=sin(x)+sqr(x*x+1)双分支结构实现:Ifx<>0Theny=sin(x)+sqrt(x*x+1)Elsey=cos(x)－x^3+3*xEndIf3.If…Then

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

6、f…EndIf例：已知x,y,z三个数，使得x>y>z。用一个IF语句和一个嵌套的IF语句实现：Ifx：与<变量或表达式>同类型的下面四种形式之一：表

7、达式例:“A”一组枚举表达式(用逗号分隔)2,4,6,8表达式1To表达式260To100Is关系运算符表达式Is<60数值型或字符串表达式例如：已知变量strC中存放了一个字符，判断该字符是字母字符、数字字符还是其他字符。用多分支结构实现:IfUcase(strC)>="A"AndUcase(strC)<="Z"ThenPrintstrC+"是字母字符"ElseIfstrC>="0"AndstrC<="9"ThenPrintstrC+"是数字字符"ElsePrintstrC+"其他字符"EndIf用SelectCase语句实现:SelectC

8、asestrCCase"a"To"z"，"A"To"Z"PrintstrC+"是字母字符"Case"0"To"9"PrintstrC+"是数字字符"C