VB数组问题

2025-06-22 07:56:56

推荐回答（3个）

回答1：

定义数组时默认数组元素的值都是0，当j=4时程序执行最后一次循环，j=5时则不进入循环执行下一条语句，print b(j) ,即执行print b(5),所以是0啊

回答2：

你说的最后结果b(j)=0 实际是b(5)=0 因为你的J循环是1 TO 4，循环后J=5，而B(5)你并没有赋值，所以默认是0

回答3：

Public Property Let StateColor(ByVal newColor As OLE_COLOR)
mStateColor = newColor
PropertyChanged "StateColor"
DrawState
End Property

Private Sub DrawState()
Shape1.BorderColor = mStateColor
Line1.BorderColor = mStateColor
Line2.BorderColor = mStateColor
End Sub