如何使用CUBEMEMBERPROPERTY创建一个函数？

Question

我无法将其作为function而不是输入所有内容。这是我创建的成员函数。

Public Function cSalesChannel(Optional s As Integer)
If s > 0 Then
    cSalesChannel = "[DimGeography].[Location].[SalesChannel].&[" & s & "]"
Else
    cSalesChannel = "[DimGeography].[Location].[Country].[England]"
End If
End Function

cubememberproperty也有property，这就是我被卡住的地方。

 Public Function cRegion(Optional s As Integer)
If s > 0 Then
    cRegion = "[DimGeography].[Location].[SalesChannel].&[" & s & "];[DimGeography].[Location].[SalesChannel].[Region]"
Else
    cRegion = "[DimGeography].[Location].[Country].[England]"
End If
End Function

我无法正确地完成分隔符;和property。

所有帮助都很棒