VB-第6 数组与自定义类型.ppt

数组的概念 【例】声明5个变量，并赋值都为0. Private sub form_click() Dim a1, a2, a3, a4, a5 As Integer ‘定义5个变量 a1 = 0: a2 = 0: a3 = 0: a4 = 0: a5 = 0 ‘赋值 Print a1, a2, a3, a4, a5 End Sub 题意若为声明100个变量，赋值为0。是否如【例6-1】一样，声明100个变量，然后赋值？那样的工作量会很大。分析规律发现，声明变量和赋值操作都反复执行100次，是否可以采用循环实现呢？但是如何去构造循环语句呢？ 步骤3：编写事件过程。 Private Sub Text1_Change(Index As Integer) For Index = 0 To 10 ‘引入循环，对每个控件元素进行操作 If (Not IsNumeric(Text1(Index).Text)) Then Text1(Index).Text = End If Next Index End Sub * 一维数组的基本操作 (2) Array函数 Dim ib() As Variant ib = Array(abc, def, 67) For i = 0 To