在VB6中我的程序添加了一个类模块，然后运行的时候，弹出对话框“对象变量或with块变量未设置”

应该不是类模块没有被引用，因为如果类模块没有被引用的话，会提示类似“用户定义类型未定义”的信息。弹出对话框“对象变量或with块变量未设置”，很可能是因为您在定义对象变量时没有引用（创建）对象实例，请参考对象类的定义形式：
1、直接定义和实例化(下面假设您要引用的类名称为myClass)
Dim A As New myClass '用关键字New直接声明
2、先定义后实例化
Dim A As myClass
Set A=New myClass '使用关键字Set和New

请仔细检查您的变量定义！