读书人

奇怪的有关问题?高手帮忙

发布时间: 2012-03-08 13:30:13 作者: rapoo

奇怪的问题????高手帮忙
class form1
dim cla() as new class2
sub paint(...)
dim a as new class 2
a.draw()
end sub

sub button1click
cla(0).add(随机数)
刷新窗体
end sub

end class

class 2
dim data(100) as int32
dim i=0

sub add(d as int32)
data(i)=d
i+=1
end sub

sub draw
利用data数组画线
end sub


发现数组有数据但就是画不上去,请教高手??怀疑是画线的数组被清零,不知道是不是,使得话该如何解决?

[解决办法]
看这里:
sub paint(...)
dim a as new class 2
a.draw()
end sub

a是新创建的class2,没有初始化里面的数组啊?
[解决办法]
sub paint(...)
dim a as new class 2
a.draw()
end sub
重新实例化,数组中还没数据呢

读书人网 >VB Dotnet

热点推荐