1
類
我有兩個類xCustomer
和xProduct
KISS:字符串名稱來
Case Tables.xCustomer
Dim Count As Integer = (From t In New XPQuery(Of xCustomer)(DefaultSession) Select t.CustomerID).Count
Return Count + 1
Case Tables.xProduct
Dim Count As Integer = (From t In New XPQuery(Of xProduct)(DefaultSession) Select t.ProductID).Count
Return Count + 1
我如何可以簡化上述聲明,讓使用字符串類的轉換說?
例如,我想使用類似
昏暗測試作爲對象
測試= ReturnClassOfString( 「xCustomer」)
很高興看到我的wiki文章就派上用場了;-) – chrissie1