for i = 0 to 9 x(i) = i next 用类似以上方式赋值数组元素 x(10) = [0,1,2,3,4,5,6,7,8,9] 这种在vb6中不允许
vb赋值给数组,有以下几种方式:第一种方式:Private Sub Command1_Click() Dim a(10) As Integer '定义数组a,下标最大值为10 For i = 0 To 10 a(i) = i'这里可以直接给数组赋值了 Print ＂a(＂ & i & ＂)的值＂ & a(i) '打印数组 Next End Sub 第二
s = cstr(a) redim b(len(s) - 1) for i = 1 to len(s) b(i - 1) = val(mid(s, i, 1)) next 注意:a是integer,不可能那么大的
数组必须先定义(声明),然后才能赋值.下面全面讲解数组的相关知识: 数组的概念1.引例 求100个学生的平均成绩及超过平均成绩的人数. 如果用一般变量来表示成绩,需要用100个变量,如:mark1、mary2、……mark100.若用数组,可
只能为数组中的逐个元素赋初值 参考:dim a(1 to 5) as integer a(1)=2 a(2)=4 a(3)=5 a(4)=33 a(5)=89
vb有2种方法可以一次性的将字符串放入数组中:方法一:a=array(＂abc＂,＂abcd＂,＂ttt＂)方法二:b=＂abc,abcd,ttt＂a=split(b,＂,＂)
无规律的定值就要你自己一个个赋值了,无规律的随机值可以用随机函数赋值 for i=0 to 3 a(i)=int(rnd) next i
简略写法只能一次性全部一起赋值,不能像c那样只赋前3个所以最简单的方法就是a(0)=1a(1)=2a(2)=3就ok其他元素是默认初始化为0的
有两种一个是通过循环复制,动态数组可以用ARRAY函数 '以下是通过循环给数组元素赋值Private Sub Command1_Click()Dim a(10) As Integer '定义有十个元素的数组aFor i = 1 To 10 a(i) = Int(Rnd * 100) '给数组元素赋随机值 Print a(i);
Dim A As VariantA = Array(10,20,30)B = A(2)array函数返回的是变体型 你要用该函数是不能给数组变量赋值