❶ 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精簡版會有這種情況),就會發生這樣的錯誤了。