在任意form类或模块中都可以创建类,跟建立函数和过程一样。 示例: public class form1 ‘创建一个属于form的子类,名称为【类名】。 public class 类名 ’定义类成员text public text as string end class ‘定义一个【类名】类的公共变量。 dim 类名1 as 类名 ’定义一个过程,使用【类名】类的text成员 public sub 过程 ‘实例化【类名1】 类名1=new 类名 类名1.text=“赋值” ’定义一个【新类】类的私用变量,并实例化。 dim 新类1 as new 新类 新类1.name=“一个字符串” 新类1.age=12 end sub end class ‘’‘创建一个与form同级的类,名称为【新类】 public class 新类 public sub new() end sub public name as string public age as integer end class 在模块中使用: public class module1 dim a as new form1.类名 end module追问