vb6.0 第二课

本文链接： https://blog.csdn.net/jywlchuang/article/details/102619719

vb6.0 第二课

一、算法
主要特性：有穷性、确定性、可行性、输入、输出

二、顺序结构
1、赋值语句
2、inputbox
3、msgbox
4、print

三、选择结构
（1） if 条件 then
语句1
else
语句2
end if

（2） if 条件 then
语句1
elseif 条件 then
语句2
elseif 条件 then
语句3
…
else
语句
end if

（3）select case
select case 测试表达式
case 表达式1
语句1
case 表达式2
语句2
…
case else
语句
end select
如：

a=val(text1.text)
Select Case a
          Case is = 100
                    Label1.Caption = "优"
          Case is >= 80
                    Label1.Caption = "良"
          Case is >= 60
                    Label1.Caption = "及格"
          Case Else
                    Label1.Caption = "不及格"
End Select

四、循环结构
1、for
for 循环变量＝初值 to 终值 step 步长
循环体
exit of
next 循环变量

2、For each next
for each 数组或集合中元素 in 数组或集合
循环体
exit for
next 数组或集合中元素

   dim myctl as control
   for each myctl  in me.controls   '遍历窗体中的控件
            print  myctl.name              '在窗体中显示控件名称
    next   myctl
    ```
 
 3、do  loop
     do while 条件
     循环体
     exit do
     loop
     当条件为真，执行循环体

4、do  loop while
     do 
     循环体
     exit do
     loop  while 条件
     当条件为真，跳出循环体（即终止循环）

5、do    loop until
     do 
     循环体
     exit do
     loop  until 条件
     当条件为真，跳出循环体（即终止循环）

6、  goto语句
       goto   行号或标签
       
7、复用语句  with    end with
       with  对象
         语句组
        end with
如：
    ```vb
With Form1
   .Caption = "程序设计"
   .BackColor = vbRed
   .Left = 1000
   End With

8、exit
（1）exit do：退出“do loop”
（2）exit for
（3）exit function
（4）exit su
（5）exit property：立即从包含语句的property过程中退出。

9、end
（1）end
（2）end function、end if 、end select 、end sub、end type、end with、end property

猜你喜欢