主题：怎么样定义一个常数？

金字塔使用的是标准的VBS语法，至于你遇到的问题，由于我们没有能重现的环境，因此暂时无法帮你解答，你可以搜索一下网上的一些现有资料呢？

你是对类模块的使用上理解有问题的吧？

对于常量的定义要在函数过程中使用的，你不能让他成为一个函数的变量名字的。

我做个测试例子并改正了你的代码

类模块

Public Function PointList(MyMe)
    MyMe = MAX_LINE_COUNT
    MsgBox MyMe
End Function

调用范例

Sub Test()
   Set oo = New TestConst
   oo.PointList(0)
End Sub