ＶＢ中控制结构的应用实例.docVIP

ＶＢ中控制结构的应用实例 　　摘要：Visual Basic语言符合结构化程序设计原则，程序代码由顺序结构、选择结构和循环结构组成，这三种程序结构统称为控制结构。控制结构是编写程序代码的基础。本文论述了控制结构的几个应用实例。 　　关键词：VB；控制结构；程序设计 　　中图分类号：TP311文献标识码：A文章编号：1009-3044(2008)20-30256-03 　　 　　Control Structure Application Example in VB 　　QU Shen-ming, XIE Yuan 　　(Computing Center of Henan University, Kaifeng 475004, China) 　　Abstract: Visual Basic language conforms to the structurization programming principle, the procedure code is composed by the sequence structure, the choice structure and the recurrent structure, these three kind of program structure is called as the control structure. The control structure is the basis for writting program code. This paper discusses several examples of the control structure. 　　Key words: Visual Basic; Control Structure; Program Design 　　 　　1 引言 　　 　　Visual Basic采用可视化编程技术、面向对象的事件驱动编程机制，可以快速开发数据库、多媒体和网络应用程序，是目前广泛使用的程序设计语言之一。 　　Visual Basic语言符合结构化程序设计[1]原则，程序代码由顺序结构、选择结构和循环结构组成，这三种程序结构统称为控制结构。控制结构是编写程序代码的基础。顺序结构是一种最简单、最常用的程序结构，选择结构和循环结构都要用到顺序结构。顺序结构中的语句按先后顺序执行，每个语句执行一次。在实际应用中，常常需要对给定的条件进行分析、比较和判断，并根据判断结果采取不同的操作。在Visual Basic中，这样的问题通过选择结构来解决，选择结构可以控制程序的执行流程。在实际应用中，也会经常遇到一些操作并不复杂，但需要反复多次处理的问题。使用循环结构的程序，可以解决这类问题。所谓循环结构，就是当满足设定的循环条件时，重复执行一个语句序列。本文介绍几个实例[2,3]，说明如何使用选择结构和循环结构解决实际问题。 　　 　　2 应用实例 　　 　　2.1 输出设计 　　例1：在窗体上输出“九九乘法表”，显示结果如图1所示。 　　 　　程序代码如下： 　　Private Sub Form_Click() 　　Print Tab(40); 九九乘法表 　　Print Tab(40); __________ 　　For i = 1 To 9 　　For j = 1 To i 　　k = i × j = i*j 　　Print Tab(j*8); k; 　　Next j 　　Print 　　Next i 　　End Sub 　　代码中用到了For…Next循环嵌套，关于For…Next循环语句，几点说明如下： 　　(1)循环变量是一个数值变量，初值、终值和步长是数值表达式； 　　(2)Next子句中的循环变量与For子句中的循环变量必须是同一个变量； 　　(3)For…Next循环用于循环次数已知的情况，循环次数=((终值-初值)/步长+1)。 　　初学VB者设计程序代码时常犯如下错误： 　　(1)初值和终值写成非数值表达式； 　　(2)Next子句中的循环变量与For子句中的循环变量不是同一个变量。 　　例2：编写程序，显示图2所示的“数字金字塔”。 　　图2 数字金字塔 　　程序代码如下： 　　Private Sub Form_Click() 　　Print 　　For i = 1 To 9 　　For j = 1 To 30-3*i 　　Print ; 　　Next j 　　For k = 1 To i 　　Print k; 　　Next k 　　For k = i-1 To 1 Step-1 　　Print k;