無法訪問VB.Net中的屬性的索引器

Question

我有一個屬性Cmd定義如下

Private _cmd As ADODB.Command

Public ReadOnly Property Cmd() As ADODB.Command
    Get
        Cmd = _cmd
    End Get
End Property

但是，當我嘗試像這樣使用它時：

y = x.Cmd("abc")

我得到：

重載解析失敗，因為沒有可訪問的“參數”接受此數量的參數。

但是，這可行：

y = (x.Cmd)("abc")

我可以更改我的屬性定義，以便用戶不需要parens？

Answer 1

除了binarycoder的解決方案之外，我建議您使用另一種解決方案。 如果要以這種方式使用代碼：

y = x.Cmd("abc")

您可以將Cmd屬性更改為如下所示：

Public ReadOnly Property Cmd(ByVal parameterName As String) As ADODB.Command
        Get
            Return _cmd.Parameters(parameterName)
        End Get
End Property

希望能幫助到你！

Answer 2

我可以更改我的屬性定義，以便用戶不需要parens？

否。問題的症結在於默認屬性（ Parameters ）不是索引屬性，而是返回ADODB.Parameters對象。 盡管ADODB.Parameters具有索引的Item屬性，但它太深了一層。 由於您無法更改ADODB ，因此可以考慮添加一個輔助方法。 然后，您可以使用此方法而不是您的屬性。

Public Function CmdParameter(ByVal parameterName As String) As ADODB.Parameter
    Return Cmd.Parameters(parameterName)
End Function