资源简介

(共17张PPT)
【案例4】 九 九 表
　　案例效果
　　涵盖知识
　　操作步骤
　　案例小结
　　实训练习
涵盖知识
1. Print方法
窗体、图片、打印机对象都具有Print方法，调用Print方法的格式：
[<对象名>.]Print[<表达式表>][{；|，}]
对象名为可选项，省略则默认为当前窗体。表达式表中的表达式可以是算术表达式、字符串表达式、关系表达式或布尔表达式，各表达式之间用逗号“，”或分号“；”分隔。使用逗号时为分区显示格式，以14个字符位置为单位将一个输入行分为若干个区，一个区只显示一个表达式的值；使用分号时为紧凑显示格式，后一项紧跟前一项输出。
涵盖知识
2. 循环结构
1) For-Next 循环
其结构的格式如下：
For <循环变量>=<初值> To <终值>[Step<步长>]
[<语句组1>]
[Exit For]
[<语句组2>]
Next [<循环变量>]
<循环变量>是一个数值型变量，起循环计数的作用。
<初值>和<终值>即循环的初值和终值，为数值表达式。
<步长>即循环变量的增量，为数值表达式。值为正时，循环变量将增加一个步长；值为负时，则减少一个步长。值为“1”时，Step<步长>可省略。
涵盖知识
2) Do-Loop循环
(1) Do While-Loop循环。
格式：
Do While<条件式>
[<语句组1>]
[Exit Do]
[<语句组2>]
Loop
先判断<条件>成立否，若成立则循环，不成立则退出循环。
涵盖知识
(2) Do Until-Loop循环。
格式：
Do Until<条件式>
[<语句组1>]
[Exit Do]
[<语句组2>]
Loop
先判断<条件>成立否，若不成立则循环，成立则退出循环。
涵盖知识
(3) Do-Loop While循环。
Do
[<语句组1>]
[Exit Do]
[<语句组2>]
Loop While<条件式>
先循环，再判断，成立则循环，不成立则退出循环。
涵盖知识
(4) Do-Loop Until循环。
Do
[<语句组1>]
[Exit Do]
[<语句组2>]
Loop Until<条件式>
先循环，再判断，不成立则循环，成立退出循环。
涵盖知识
3. Function过程
1) 定义
格式：[Static][Public|Private]Function<过程名>([<参数表>])[As<类型>]
[<语句组>]
[<过程名>＝<表达式>]
[Exit Function]
[<语句组>]
[<过程名>=<表达式>]
End Function
涵盖知识
3. Function过程
2) 建立方法
直接在通用窗口中输入代码。在代码窗口的所有过程之外，按Function过程的定义格式输入 。
使用“添加过程”命令。选择“工具”菜单中的“添加过程”命令，打开对话框，在“名称”框内输入要建立的过程名，如fact，进行相应选择，单击“确定”按钮，回到模块代码窗口，
涵盖知识
3. Function过程
3) 调用
Function的调用比较简单，可以像使用Visual Basic内部函数一样来调用。
调用格式：<过程名>([<实参表>])
其中，<过程名>为要调用的Function过程名，<实参表>为要传递给Function过程的常量、变量或表达式，各参数间用逗号隔开，如果是数组，在数组名之后必须跟一对空括号。
例如：Text2.Text = sum (n)
涵盖知识
4. Sub过程
1) 定义
格式：
[Static][Public|Private]Sub<过程名>[ (<参数表>)]
[<语句组>]
[Exit Sub]
[<语句组>]
End Sub
涵盖知识
2) 调用
Sub过程的调用有两种方法，一种是把过程的名字放在一个Call语句中，一种是把过程名作为一个语句来使用。
(1) 用Call调用过程。
格式：Call <过程名>[（<实参表>）]
例如：Call fact(x,f)
Call Mul(n, sum2)
(2) 把过程名作为一个语句使用。
格式：<过程名>[<实参表>]
例如：fact x,f
操作步骤
启动Visual Basic，设计程序界面
设置对象属性
对象名
对象属性名
属性值
Form1
Name
Form1
Caption
示例４：九九表
Command1
Name
Command1
Caption
计算
Font
宋体、五号
Command２
Name
Command２
Caption
九九表
Font
宋体、五号
Text1、Text2、Text3
Name
Text1、Text2、Text3
Font
宋体、五号
Label1
Caption
请输入n值：
Font
宋体、五号
Label2
Caption
1+2+…+n=
Font
宋体、五号
Label3
Caption
n!=
Font
宋体、五号
操作步骤
3) 写代码
操作步骤
4) 保存程序，并生成可执行文件
将本题保存为一个名为“九九表.frm”的窗体文件和一个名为“九九表.vbp”的工程文件，并生成一个名为“九九表.exe”的可执行文件。
案例小结
本案例主要介绍了Print方法的使用、程序结构的循环结构语句格式要求、过程与函数的定义。重点是要对各种实际情况进行合理循环语句的选择。
实训练习
(1) 编写程序，求1/(12)+1/(22)+1/(32)+．．．+1/(n2)的值，直到最后一项的值小于0.001为止。界面自行设计。
(2) 编写一个判断自然数是否为质数的Function过程，在窗体上打印出［100,200］之间的所有质数，并求出它们的和。
(3) 编写一个求一元二次方程ax2+bx+c=0 (a不等于0)的实根的Sub过程，要求能判断有无实根、实根的个数并求出实根。

展开更多......

收起↑