UC知道VB中listbox 数组赋值的问题
来源：百度知道 编辑：UC知道 时间：2024/09/26 13:56:19
我在以模块中定义
Public a(1024) As String
Public c As Integer
Public p As Integer
在form1中写
For i = 1 To (List.ListCount + 1)
a(i) = List.List(i)
Next i
c = List.ListCount
p = i
在form2中写
lbl1.Caption = CStr(a(Int((c + 1) * Rnd + 1)))
为什么总是显示类型不匹配？到底是谁的类型不匹配？
刚学VB，一堆问题
Public a(1024) As String
Public c As Integer
Public p As Integer
在form1中写
For i = 1 To (List.ListCount + 1)
a(i) = List.List(i)
Next i
c = List.ListCount
p = i
在form2中写
lbl1.Caption = CStr(a(Int((c + 1) * Rnd + 1)))
为什么总是显示类型不匹配？到底是谁的类型不匹配？
刚学VB，一堆问题
代码应该没问题，看了半天没看出问题，有一点lbl1是不是标签控件？
按F8单步执行，看下是哪条语句出了问题，就好查了
这些代码完全没有问题 你在尝试找找其他原因
lbl1.Caption
没有这个控件