我建立了一个类god.cls,刚刚解决了问题现在又有新问题了！！！！

Question

ps:   有没有在类模板中访问普通的form窗体阿
   谢谢！

Answer 1

那当然有问题
Public Function upGood()
   Dim dds As god
   Set dds = New god
   dds.prGood      '问题就是这里每次调用都打不出0-100
End Function
看见 new 了吗，你在这里又重新申请了一个对象，你让它哪里来的值

Answer 2

你的dds是一个局部变量，
应该在模块的声明区
Dim dds As god