1.不正确
成都创新互联长期为近1000家客户提供的网站建设服务，团队从业经验10年，关注不同地域、不同群体，并针对不同对象提供差异化的产品和服务；打造开放共赢平台，与合作伙伴共同营造健康的互联网生态环境。为平邑企业提供专业的成都做网站、网站建设，平邑网站改版等技术服务。拥有十多年丰富建站经验和众多成功案例,为您定制开发。
Dim abc As myClass，定义一个可以引用myClass类型对象的变量abc。这个abc变量存在于栈上。
abc=New myClass。New myClass创建myClass实例对象，这个对象存在于托管堆上。然后（同时）让abc引用（指向）这个对象。
abc变量在栈上，而对象在托管堆上。
abc储存的是对象的地址，而不是对象本身。
看下面的代码
Dim a As myClass,b As myClass,c As myClass
a=New myClass
b=a
c=a
整个过程中只创建了一个myClass对象，位于托管堆上。
三个myClass类型的变量a、b、c位于栈上，都指向了这一个myClass对象
2.类的成员分 实例成员 和 静态成员
实例成员 必须在实例对象上调用
静态成员 可以直接调用，不需要实例对象。
以后看到这种提示就说明从数据库中没有取到数据（一般情况下），你将sql语句单独在数据库中执行一下看是否有取到数据。
这个可能是你使用了初始值为NULL的字符串变量引起的吧？别忙处理字符串，你先查查Module1.myrow.Item(4)到底在SQL查询之后有没有成功得到非NULL值，如果为null，肯定会出现这个错误的，报错那行设个断点看看当时各项值是否符合计算要求再说
希望对你能有所帮助。
你没有将数组定义为一个新的实例：
dim
j
as
Integer
dim
a(100)
as
new
Phvalue
for
j=0
to
501
...................
以class2为例，如果你只需要一个class2实例，那么把它在class1成员中声明为共享成员即可。
Shared c2 As New Class2()
然后调用它的函数，
c2.func()
如果class2的这个函数不依赖于class2实例，那么直接将这个函数用Shared声明，
Public Shared Function func() As xxx
'xxxxx
End Function
然后在class1中引入，
Imports class2
直接调用即可。
func()
我想第二种更符合你的情况。
