计算机高职专业VB知识要点003 VB基础知识，案例：逐行输出

上课笔记：

等于号什么时候用？

1.用于赋值。等于号的左边是变量，右边是某个值

2.用于判断。一般用于判断if条件语句等等。等于号的两侧都是某个值。

函数运用的时候什么时候用括号？

当我们需要某个函数的返回值的时候，需要用到括号。例如msgbox需要返回用户选择的是、否、取消等按钮的结果的时候。

当函数执行某种个普通功能的时候，不需要括号。例如列表框listbox在增加一项的时候addItem函数，此时一般不需要括号。

注意事项：

控件在使用的时候，我们要注意区分属性或者是方法。

如果是控件的属性，那么我们是可以使用等于号=来进行赋值的。

如果是控件的方法，那么我们使用的时候就直接使用方法传参数的形式。

frm文件包含什么？

这是一个窗体文件，包含所有的代码和窗体、控件的属性配置。我们可以采用记事本打开的方式看到所有的配置和运行代码。

mod关键词代表什么？

mod关键词用于取余数，例如 7 mod 2 结果为 1

mod往往用于分组的情况。

哪些主要符号表述数据类型？

用符号来表示数据类型

integer %

long &

single !

double #

string $

dim自动声明变量

声明举例：

dim a% 表示声明一个整型变量a

dim a as integer 同上面一个意思

如果说不写dim声明，会在sub级别自动补充声明。

静态变量static

使用static来声明，可以持续保持这个变量的值。不会因为在sub过程中因为有声明代码而重新重置为默认值。

短整型变量类型integer 或%表示的最大数值32767

数值类型的变量在声明后，会默认初始化值为0

static关键词生命周期在整个程序。

某个form窗体的通用中的全局变量生命周期在当前的form窗体。

布尔类型变量boolean 的值只有true（真）或者false（假）

随机数相关注意：

Randomize表示随机数种子，它以默认当前的系统时间作为种子。作用就是增大随机数不同的概率。

rnd才是表示具体的某个随机数，范围是[0,1)

随机颜色函数结合使用

rgb函数返回的是一种颜色。参数分别是红、绿、蓝。颜色值的范围是0~255之间的整数。

int函数表示向下取整：表示取比当前的数小的最接近的整数

控件的Visible属性表示是否可见。true表示可见、false表示不可见。

符号 \ 表示取整数部分。例如 5\3 结果 1

案例：逐行显示输出

软件设计界面：

源代码分享：

Dim f As Boolean
Private Sub Command1_Click()
If Timer1.Enabled = False Then
   Timer1.Enabled = True
   Command1.Caption = "停止" '(1)
Else
   Timer1.Enabled = False '(2)
   Command1.Caption = "启动"
End If
End Sub
Private Sub Form_Load()
Randomize
 For i = 0 To 41
    Label1(i).Visible = False
    Label1(i).BackColor = RGB(Int(256 * Rnd), Int(256 * Rnd), Int(256 * Rnd))
  Next i
End Sub

Private Sub Timer1_Timer()
Dim i%
Static n% 'Static (3)
If n = 7 Then 'If (4) Then
   f = False
ElseIf n = 0 Then
   f = True
End If
If f Then
  For i = 0 To 41
    If n = i \ 6 Then 'If (5) Then
      Label1(i).Visible = True
    Else
      Label1(i).Visible = False
    End If
  Next i
  n = n + 1 ' n = (6)
Else
  n = n - 1
  For i = 41 To 0 Step -1 ' For i = (7) To 0 Step -1
    If n = i \ 6 Then
      Label1(i).Visible = True
    Else
      Label1(i).Visible = False
    End If
  Next i
  
End If
End Sub

运行效果截图：