111,093
社区成员




class VedioPlayer
sub play(file)
messagebox.show("这个是基类play")
end sub
class
class SwfPlayer
Inherits VedioPlayer
sub play()
messagebox.show("SwfPlayer.play")
end sub
class
dim player as VedioPlayer
dim sPlayer as new SwfPlayer
player.play()