aaa是一个私有成员,在类外面不能访问到。你已经定义了一个属性,用这个就可以。
dim ttt as new test
label1.text=test.GetClass