Public Property Let setsqlstr(byval sqlstr) sql = sqlstr End Property 上面的是属性过程设置,用在class类中 比如 Class Test Public Property Let setsqlstr(byval sqlstr) sql = sqlstr End Property End Class 访问类时 Dim oTe Set oTe=New Test oTe.setsqlstr 这里的作用就是ASP中OOP面向对象的概念。