Imports System.Reflection Class MainClass Public Shared Sub Main() Dim t As Type = GetType(System.Data.DataSet) Dim s As String = t.Assembly.FullName.ToString() End Sub End Class