'<methodname2>' kısmi yöntemini uygulamak için 'methodname1>' yöntemi '<Private' olarak bildirilmelidir

Kısmi bir yöntemin uygulanması bildirilmelidir Private. Örneğin, aşağıdaki kod bu hataya neden olur.

Partial Class Product  
  
    ' Declaration of the partial method.  
    Partial Private Sub valueChanged()  
    End Sub  
  
End Class  
Partial Class Product  
  
    ' Implementation of the partial method, with Private missing,
    ' causes this error.
    'Sub valueChanged()  
    '    MsgBox(Value was changed to " & Me.Quantity)  
    'End Sub  
  
End Class  

Hata Kimliği: BC31441

Bu hatayı düzeltmek için

  1. Aşağıdaki örnekte gösterildiği gibi kısmi yöntemin uygulanmasında erişim değiştiricisini Private kullanın.
Private Sub valueChanged()  
    MsgBox("Value was changed to " & Me.Quantity)  
End Sub  

Ayrıca bkz.