PC6下载站

分类分类

VB基础教程(顺序结构)第四章(2)

关注+2009-10-21作者:

                                             VB的控制结构  第四章(2)


 
顺序结构
 
 1.  赋值语句
     赋值语句是任何程序设计中最基本的语句,赋值语句都时顺序执行的。赋值语句的形式为:
      变量名 = 表达式
    它的作用是计算右边表达式的值,然后赋给左边的变量,表达式的类型应该与变量名的类型一致。
 2. 使用说明
  (1)当表达式为数值型而与变量精度不同时,强制转换成左边变量的精度;
  (2)当表达式是数字字符串,左边变量是数值类型,自动转换成数值类型再赋值,但当表达式中有非数字字符或空串,则出错。
   (3)任何非字符类型赋值给字符类型,自动转换为字符类型;
   (4)当逻辑型赋值给数值型时,True转换为 -1,False转换为0;反之,非0转换为True,0转换为False;
   (5)赋值号左边的变量只能是变量,不能是常量、常数符号、表达式,否则报错;
   (6)不能在一句赋值语句中,同时给各变量赋值;
   (7)在条件表达式中出现的 = 是等号,系统会根据 = 号的位置,自动判断是否为赋值号;
   (8)注意N=N+1 是累加中常见的赋值语句,表示将N变量中的值加1后再赋值给N。
N
执行了N=N+1后
N
5

6
4.3   选择结构(或称分支结构)
1.1. IF条件语句
 (1)If……Then语句(单分支结构 F)
   语句形式:
    1)
If
 
Then
        语句块
      End If


   2)If  表达式>  Then  语句>
     说明
:表达式一般为关系表达式、逻辑表达式,也可以为算术表达式,非0为True,0为False;
语句块可以是一句或多句,若用2)表示,则只能是一句语句,若多句,语句间需用冒号分隔,而且必须在一行上书写。
     例:已知两个数x和y,比较它们的大小,使得 x大于y:
     方法一:  if  x
             t=x
            x=y
            y=t
          end if

    方法二:  if  x
      注意:
将两个变量中的数进行交换时,必须借助于第三个变量才能实现。 [b][/b]
(2)
If
……Then……Else语句(双分支结构)

  语句形式:                                    
  1)If  表达式>  Then
      [b]

[color=#ff0000][b]语句块1>
   [/b]

[b]Else

     
[/b]
[b][b]
[color=#ff0000]语句块2>

[/b]
    End If

2) If  表达式>  Then  语句1>  Else  语句2>
例:

x2 -5     x≠0

3x +2    x=0

 
(3)If……Then……ElseIf语句(多分支结构)
语句形式:                               
  If  表达式1>  Then
     
[b][b]
[color=#ff0000]语句块1>

[/b]
    ElseIf  表达式2>  Then

     
[b][b]
[color=#ff0000]语句块2>

[/b]
      [b]……
      [ Else [/b]语句块 n+1 ]
  End If

注意
   1)不管有几个分支,程序执行了一个分支后,其余分支不再执行;
   2)ElseIf  不能写成Else  If
   3)当多分支中有多个表达式同时满足,则只执行第一个与之匹配的语句块
  例:已知变量strC中存放了一个字符,判断该字符是字母字符、数字字符还是其他字符。

(4)     If语句的嵌套
   
If语句的嵌套是指if 或else后面的语句块中又包含If语句。语句形式:
      If  表达式1>  Then
    If  表达式11>  Then

        ……
     End If
        ……
    End If
 注意:
   1)对于嵌套结构,为了增强程序的可读性,应该采用缩进形式书写;
   2)If语句形式若不在一行上书写,必须与End If配对,多个if嵌套,End If与它最接近的Emd If配对。 例: 已知x、y、z三个数,比较它们的大小并排序,使得x>y>z.

2. Select Case语句(情况语句)   是多分支语句的又一种形式,语句形式:
  Select Case  变量或表达式
       Case  表达式列表1

           语句块1
    
  Case  表达式列表2
          语句块2

         [b]  ……
      [Case Else [/b]
            语句块n+1]
   End Select

 说明:
1)变量或表达式可以是数值型或字符串表达式
        2)表达式列表I 可以是表达式、一组用逗号分隔的枚举值、表达式1 to 表达式2、Is关系运算符表达式;如:case  1 to 10  、   case  "a","w","e","t"  、 case  2,4,6,8,is>10
        3)并不是所有的多分支结构都可以用情况语句代替的。
  例:已知输入某课程的百分制成绩mark,要求显示对应五级制的评定,评定条件如下:



及格
不及格
80≤mark<90
70≤mark<80
60≤mark<70
60≤mark<70
60<mark

 
3. 条件函数
 (1)if函数
    函数形式: Iif(表达式,当条件为True时的值,当条件为False时的值
   
例:求X、Y中大的数,并放入变量Tmax中:   Tmax=Iif(X>Y, X, Y)
 (2)Choose函数
    函数形式:Choose(整数表达式,选项列表)
   如果整数表达式的值是1,则选择列表中的第1项,依次类推;如果小于1或大于列表项数时,则返回NULL。
   例: 根据nub为1 -4的值,换算成不同的运算符: OP= Choose(nub,“+”,“-”,“×”,“÷”)
4.3  循环结构
循环是在指定的条件下多次重复执行一组语句。VB中提供了两种类型的循环语句:
计数循环语句条件型循环语句
1. For循环语句(知道循环次数的计数型循环)
  语句形式: For  [b]循环变量 = 初值To 终值  [ Step  步长][/b]
           [b]语句块
       [Exit For]
         
语句块
       

[/b]Next  循环变量

 说明
:1) 循环变量必须为数值型
     2)步长一般为正,初值小于终值;若为负,初值大于终值;缺省步长为1;
    3)语句块可以是一句或多句语句,称为循环体;
    4)Exit For 表示当遇到该语句时,退出循环体;
      执行Next的下一句;
               [b][/b]循环次数=int((终值 - 初值)/步长+1)
    
5)退出循环后,循环变量的值保持退出时的值;
     6)在循环体内对循环变量可多次引用,但不要对其赋值,否则影响结果。
例1:计算1 ~ N的奇、偶数之和。(N为自然数)     例2:打印ASCII码表

2. Do……Loop循环(不知道循环次数的条件型循环)
  是用于控制循环次数未知的循环结构,语法形式有两种:
  形式1Do While …… Loop
     
[b]Do [ While | Until [/b]条件 ]
           
语句块
    
[ Exit  Do ]
           
语句块
     Loop

形式2
Do …… Loop While
     Do
      
语句块
   
[ Exit  Do ]
      
语句块
   
[b]Loop  [ While | Until [/b]条件 ]

[b][/b]
 说明:
   1)形式1为先判断后执行,有可能一次也不执行;
   2)形式2为先执行后判断,至少执行一次;
   3)关键字While 用于指明条件为真时就执行循环体中的语句,Until刚好相反;
   4)当省略了While|Until 条件字句,即循环结构仅由 Do……Loop关键字构成时,表示无条件循环,这时循环体内应该有Exit Do语句,否则为死循环;
   5)Exit Do 语句表示当遇到该语句时,退出循环,执行Loop的下一语句。
 例:我国现有人口13亿,按人口年增长率0.8%计算,多少年后我国人口超过26亿。
   计算公式 26=13(1+0.008)n
   图中的例子是按可变增长率和预计总人口数设计的。

3. 循环的嵌套
指在循环体内又包含了一个完整的循环结构。循环嵌套对For 循环和Do……Loop循环均适用。


:打印九九乘法表

 


 

展开全部

相关文章

更多+相同厂商

热门推荐

  • 最新排行
  • 最热排行
  • 评分最高
排行榜

    点击查看更多

      点击查看更多

        点击查看更多

        说两句网友评论

          我要评论...
          取消