专升本VB程序设计教案 2011.docVIP

程序语言设计知识点总结 数据的输入input box和text） 文本框（text）的输入格式：a=Val(text1.text) text1.text的返回值为string类型，根据题目的要求，如果想通过text1得到一个字符串则不需要进行转换，如果想通过text1得到数值型数据则需要通过函数Val（）进行转换。 input box输入数据的格式为：a=Val(input box(“提示信息”，”标题栏”，默认值))。 同text，input box的返回值也为string类型。 2、数据的输出 1. print 输出对象格式[对象名].print[表达式列表] [,|;| ] spc(n)函数，表示插入由n个空格构成的字符串。 tab(n)函数，从左端开始右移动n列 ;(分号)，光标定位在上一个显示字符之后 ,(逗号)，光标定位在下个打印区域的开始位置，每个打印区域14列。 2. msgbox函数格式：msgbox 提示[,按钮[+图标]][,标题] 例：1求圆的面积（公式S=ΠR2）R从键盘输入选择结构（分支结构）程序设计 关系运算符和关系表达式 大于（）小于（）大于等于（=）小于等于（=）等于(=) 不等于（） 关系表达式的结果只有和，也就是关系只有成了和不成立的情况。 a=10,b=5,c=1 f=abc f=? 逻辑运算符和逻辑表达式 逻辑与（） 逻辑或（） 逻辑非（） 运算规则 以下实例中a=，b=a and b a, b中有一个表达式的值为假，则整个表达式的结果即为假。 f= a b f=? a=? b=? a b a, b中有一个表达式的值为真，则整个表达式的结果即为真 a 表达式a的值为0，则整个表达式的结果为1，反之亦然 if条件语句 基本形式 if（条件） 语句1End if 或者 If(条件) then 语句1 条件成，则执行语句1；条件不成立则执行语句2，不再执行语句1 嵌套形式 if（条件） 语句1 else if（条件） 语句2 else if（条件） 语句3 Else ….. 语句nEnd if End if End if End if 例、输入一个正整数判断该数是奇数还是偶数并输出判断结果 例、编程求n的绝对值 例、将用户输入的小写英文字母转换为大写，大写转换成小写 循环结构程序设计 1. Do………loop 循环 使用形式：一般用于循环次数不确定的情况do while 表达式 循环体当表达式成立时，执行循环体中的语句，循环体执行结束后再次判断表达式，成立，继续执行；成立，停止，循环结束。 do until 表达式 循环体 Loop 当表达式成立时，执行循环体中的语句，循环体执行结束后再次判断表达式，成立，继续执行；不成立，停止，循环结束。for循环 for循环主用用于循环次数已知的情况下，使用较多的循环形式 for。 14、编写程序，计算表达式： 数组 1．一维数组的定义 2. 数组的引用和赋值 数组在引用时下标从0开始赋值： 1.逐一赋值 a=1 a(2)=2 ……. 2.循环赋值 数组的循环赋值相当于对数组进行循环遍历 例：1.编程实现将1，2，3，4，5，…..10,输入到数组a[10]中，然后将这些数字逆序输出 2.从键盘上输入10个数，然后找出其中的最大值和最小值以及最大值和最小值的下标 3.二维数组 二维数组在理解上可以借助矩阵来理解，看成是由3行4列的矩阵构成的。 对于二维数组的操作可以借助循环的嵌套来实现，利用一个循环来控制二维数组的行，另外一个循环来控制二维数组的列。 for for j=1 to 4 a(i,j)=val(text1.text) next j next i 例：1.从键盘输入10个数，将他们按照从大到小的顺序输出 2.编程求菲波基数列的前20项的和（1，1，2，3，5，8，……） 3.求3*4矩阵中元素的最大值和最小值字符串的处理 常用函数例1.利用文本框text输入一字符串，将改字符串逆序输出。 2.用户输入的字符串，统计字符串中大写字母的个数,数字字符的个数 子、过程和自定义函数Private Sub Form_Click() Dim a%, b% a = Val(InputBox(请输入第一个数字)) b = Val(InputBox(请输入第二个数字)) Print max(a, b) End Sub Function max(x%, y%) As Integer max = IIf(x y, x, y) End Function 例：1.自编函数实现判断n是否为素