《Visual Basic 6.0程序设计案例教程 教学课件 ppt 作者 宫强 模块四》由会员分享,可在线阅读,更多相关《Visual Basic 6.0程序设计案例教程 教学课件 ppt 作者 宫强 模块四(23页珍藏版)》请在金锄头文库上搜索。
1、模块四 Visual Basic 6.0 程序结构,任务一 输出语句的使用,任务三 判断键盘输入字符的类型,任务四 累积和,任务五 求人口数,任务二 计算圆的周长及面积,任务六 打印“九九表”,任务分析: 练习使用输出语句。 理论知识: 顺序结构是按照程序或者程序段书写顺序执行的语句结构。,语句A,语句B,一、赋值语句 j=3*4 二、数据输出语句 Print a Print (x+y)3 Print Tab(25);800 三、清除语句 Form1.Cls,1、创建窗体 2、窗体添加图片框和按钮控件 ,设置属性 3、代码编写,返回,任务分析: 从输入框中输入圆的半径,计算圆的周长及面积。题中
2、要求使用输入框输入圆的半径,所以不能在窗体中使用某控件输入半径,那么就应该使用数据输入语句。,理论知识: 一、数据输入语句 InputBox(“请输入圆的半径”, “计算圆的周长和面积“) 二、消息框 MsgBox “计算已完成“, , “例题“,1、创建窗体 2、窗体添加标签框、文本框和按钮控件 ,设置属性 3、代码编写,返回,任务分析: 键盘输入某字符,判断其是何种类型。 实现判断结构必须采用选择控制结构。对于字符的类型划分成三类:字母、数字、其它。所以我们采用Select Case结构较为简单。,理论知识: 一、单分支条件语句,理论知识: 二、双分支条件语句,理论知识: 三、多分支语句(
3、 ElseIf ),理论知识: 三、多分支语句(Seleet Case),1、创建窗体 2、窗体添加标签框、文本框和按钮控件 ,设置属性 3、代码编写,返回,任务分析: 编写程序,求1100的累加和。 使用循环结构实现累计求和过程。,理论知识: 循环是在指定的条件下多次重复执行一组语句。For/Next循环控制结构。,1、代码编写 Private Sub Form_Click() Dim I as Integer, s as Integer s = o For I = 1 To 100 s = s + i Next i Print “1至100的 累加和为:”; s End Sub,返回,任务
4、分析: 我国有13亿人口,按人口年增长0.8%计算,多少年后我国人口超过26亿。本任务中求的是终值,所以不能使用For/Next循环。此时使用Do/Loop较为简单。解此问题两种方法,可根据公式:26=13*(1+0.008)n。,理论知识: For/Next循环主要用于已知循环次数的情况下,若事先不知道循环次数,可以使用Do/Loop循环语句。,1、代码编写 Private Sub Command1_Click() x = 13 n = 0 Do While x 26 x = x * 1.008 n = n + 1 Loop Print n, x End Sub,返回,任务分析: 单击“打印九九乘法表”的按钮,将在本窗体输出九九乘法表。 打印九九表时,既有行的变化,又有列的变化,所以使用循环嵌套能实现。外层循环控制行数,内层循环控制列数。,理论知识: 一个循环体内又包含了一个完整的循环结构称为循环的嵌套,又叫做多重循环。 在嵌套结构中,对嵌套的层数没有限制,有几层嵌套就说是几重循环,如二重循环、三重循环、四重循环等。通常把嵌套在一个循环体内部的循环部分称为内循环,把嵌套了其他循环的循环部分称为外循环。,1、创建窗体 2、窗体添加按钮控件 ,设置属性 3、代码编写,返回,