❶ VB 未找到方法或数据成员
你首先要保证你的form上有Command1、Command2、Command3
然后将代码改成Private
Sub
Command1_Click（）
Command2.Enabled
=
ture
Command3.Enabled
=
ture
End
Sub
就可以了
你的index没有设置，可能这就是你的未找到方法或数据成员的原因
❷ vb中未找到方法或数据成员是什么意思
Dim num As Integer
Dim flag As Boolean
Private Sub HScroll1_Change()
step.Text = HScroll1.Value
End Sub
Private Sub Image1_Click(Index As Integer)
If Not flag Then Exit Sub
Image1(Index).Top = 8500
Image1(Index).Left = Int(Rnd * 8000)
num = num + 50
score.Text = num
End Sub
Private Sub start_Click()
Randomize
Timer1.Interval = 50 * (6 - HScroll1.Value)
HScroll1.Enabled = False
For i = 0 To 4
Image1(i).Top = 8500
Image1(i).Left = Int(Rnd * 8000)
Next
num = 0
score.Text = num
flag = True
End Sub
Private Sub stop_Click()
Timer1.Interval = 0
HScroll1.Enabled = True
flag = False
End Sub
Private Sub Timer1_Timer()
For i = 0 To 4
Image1(i).Top = Image1(i).Top - 200
If Image1(i).Top <= 0 Then
MsgBox "您本次的得分是：" & Str(num)
Timer1.Interval = 0
End Sub
错误的产生几乎都是由于你把控件、函数或变量的名称写错了，这对于编程序来说是很致命的。你再仔细检查一遍！
另外，num和flag两个变量的定义要放在过程外面才能成为全局变量
❸ vb中编译错误：未找到方法或数据成员
从出错信息来看，你的窗体中确实存在MSComm1这个控件（或对象），但它并不是Microsoft
Comm
Control控件（具体是什么就不知道了），由于它不存在CommPort属性，所以就出错并提示“未找到方法或数据成员”了。
这种错误一般发生在这样的情况：
代码是从别的电脑复制过来的，但你的电脑上并没有Microsoft
Comm
Control控件（一般VB精简版会有这种情况），就会发生这样的错误了。