Question

VB问题，一个数组a(i)(共10个，每个有对应值)，让textbox的内容和数组里面第一个不为0的一样，怎么写代码

Answer 1

dim i as integer
for i = 1 to 10
if a(i)<>0 Then
text1.text=a(i)
exit for
end if
next i

Answer 2

For i = LBound(a) to UBound(a)
If a(i)<>0 Then
Textbox1.text=a(i)
Exit For
End If
Next

Answer 3

要求说得不明白

Answer 4

数组不能为零吗？输入 i ><0就ok了

Answer 5

不太明白。。