VB程序设计典型算法(重点难点) 下载本文

内容发布更新时间 : 2024/6/25 13:46:38星期一 下面是文章的全部内容请认真阅读。

Visual Basic 的基本控制结构

顺序结构

分支结构 循环结构 顺序结构——各语句依次顺序执行

此前所学的语句的存在方式都是顺序结构

不要忘记 ? 关于赋值语句:

变量名=表达式 对象名 . 属性名=表达式

先计算右边表达式的值,然后赋值给左边的变量。

如果表达式的精度不同于左边变量的精度,则强制将表达式结果的数据类型更改为变量的精度。

字符型数据(\)赋值给数值型变量时系统先自动将字符串转换为数值,再赋值;但是字符不可以赋值给数值变量。

非字符数据赋值给字符变量时将被转换为字符类型。 a=a+2 实现值的自增。 赋值符号=的左边必须是变量。

整体格式固定不能更改。

例:实现两个变量值的交换 temp=a : a=b : b=temp

分支结构——单分支、双分支、多分支

单分支结构(简单分支结构)

第一种形式 if <条件> then <语句> 第二种形式 if <条件> then 语句 … 语句 end if a=inputbox( \请问1+3=?\问题1\if a=4 then print \ou are smart !\ a=inputbox( \请问1+3=?\问题1\if a=4 then print \ b=msgbox (\还要继续做题吗?\条件 false Page 59 true 语句组 if b=6 then print \end if 练习:让用户输入两个(或3个)变量,设计程序,计算并输出最大的变量。 双分支结构(选择分支语句)

语句格式: if <条件> then 语句组1 else 语句组2 end if 练习如上例 多分支结构 ( 四种形式 )

Page 60 Page 59 条件 false 语句组1 true 语句组2 End if 形式一:(if语句的嵌套形式)

见上例

形式二:( if then elseif 语句)

语句格式: if <条件> then 语句组1 elseif <条件2> then 语句组2 Page 60~61 … [else 语句组] end if 形式三:(select case语句)

格式: select case <条件> case <条件的可能结果1> 语句组1 case <条件的可能结果2> 语句组2 …………………… case <条件的可能结果n> 语句组n [ case else 语句组1 ] end select 其中: ? 条件的可能结果可以是表达式

? 条件的可能结果可以是to 表达式,如:case 20 to 30 ? 条件的可能结果可以是is 比较式,如:case is >30

形式四:( iff 函数)

true

语句格式:

变量 = iif ( 条件,语句1,语句2 )

false

max = iif ( 3 > 6 , \不可能\ 练习:如教材page 46下,实现成绩等级评价。

Page 循环结构 (五种形式)

Page 63-64 形式一 ( for next 循环 )

语法格式: for 循环变量=初始值 to 终止值 [ step 步长 ] [语句组1] [exit for] [语句组2] next 循环变量 强制退出循环体 练习及分析:

1.求1~100之间所有整(奇)数的和。 2.求数n的阶乘n! cls n=val(inputbox(\请输入一个整数(<13):\求阶乘\sum=1 for i=1 to n step 1 sum=sum*i next i msgbox \您输入的是\,它的阶乘为:\的阶乘\3.见教材page64中 例3.6

注意事项:

嵌套时next 循环变量要与最近的for语句循环变量匹配

形式二 (while wend 循环) Page 65 语法格式: while <条件> [语句组] wend

练习及分析:改造上述例题利用公式求e的值 page 55 cls e=0 fenmu=1 n=1 while 1/fenmu>=0.000001 e=e+1/fenmu fenmu=fenmu*n