VBA編譯錯誤：未找到方法或數據成員

everyone。這是我的代碼。調試時它說：「VBA編譯錯誤：方法或數據成員找不到」，並強調線：Familienkutsche.strFarbe =「布勞」如果我outcomment它，它說，關於後面的線一樣的東西。它不喜歡什麼？一切都寫在一塊，所以爲什麼他不承認任何「strFarbe」或「Geschwindigkeit」？話雖如此，如果我刪除Familienkutsche，只是離開.strFarbe =「布勞」一切正常。先謝謝你。VBA編譯錯誤：未找到方法或數據成員

Option Explicit 

Public strFarbe As String 
Private bytTempo As Byte 
Private blnTempoSperre As Boolean 

Public Property Let Geschwindigkeit(Speed As Long) 
If (Speed > 250) Then 
    bytTempo = 250 
    blnTempoSperre = True 
Else 
    bytTempo = Speed 
    blnTempoSperre = False 
End If 
End Property 

Public Property Get Geschwindigkeit() As Long 
    Geschwindigkeit = bytTempo 
End Property 

Public Property Get abgeriegelt() As Boolean 
    abgeriegelt = blnTempoSperre 
End Property 



Public Sub Autos() 
Dim Familienkutsche As Auto 
Let Familienkutsche = New Auto 

Familienkutsche.strFarbe = "Blau" 
Familienkutsche.Geschwindigkeit = 320 
Debug.Print Familienkutsche.Geschwindigkeit 
Debug.Print Familienkutsche.abgeriegelt 
End Sub

來源

2015-11-08 Lola

這不會編譯; '讓Familienkutsche =新Auto'應該是'Set Familienkutsche = New Auto' –

嗨，亞歷克斯。感謝您的快速回復。我做了建議的更改，但它仍然不能編譯並返回相同的錯誤。 =（（（（ – Lola

是一個'Class'？ – PatricK

你的代碼的第一部分必須是在類模塊Auto。

Public Sub Autos()必須在標準模塊。然後，它的工作原理（與改變Let到Set）。

輸出：

250 
Wahr

來源

2015-11-09 00:43:45 Andre

內這些代碼謝謝你，安德烈那的確是問題。我寫的整個代碼在另一個模塊，而不是在類汽車之一。 – Lola

你能不能解釋一下爲什麼正是第一部分，而不是，比方說，第二個在那裏我居然提新奧特 – Lola

@Lola：你* *定義一個類模塊類模塊名稱是類的名字 - 在這裏'Auto'要？實際使用的類，實例化它（'設置Familienkutsche =新Auto'），這通常發生在一個標準模塊中的功能或子有許多網頁描述這個更詳細，例如：http：//www.cpearson。 com/excel/classes.aspx – Andre

VBA編譯錯誤：未找到方法或數據成員

回答

相關問題