ПОЦЕЛУЙ: имя_строки классу

Question

У меня есть два класса xCustomer и xProduct

   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

Как мне упростить приведенные выше операторы, скажем, с помощью преобразования строки в класс?

Например, я хотел бы использовать что-то вроде

Тусклый тест как объект

Test = ReturnClassOfString ("xCustomer")

Answer 1

Возможно, используя отражение? Это должно помочь вам начать с размышления в целом: http://msdn.microsoft.com/en-us/magazine/cc163750.aspx

Это должно помочь вам в вашем актуальном вопросе: http://wiki.lessthandot.com/index.php/VB.Net:_Create_an_instance_of_class_from_a_string_using_reflection