用Load就行,但其Visible为False,所以要设其Visible为Ture
Private Sub Command1_Click()
Load Text1(1)
Text1(1).Left = Text1(0).Left
Text1(1).Top = Text1(0).Top + 800
Text1(1).Visible = True
End Sub
Private Sub Command1_Click()
Load Text1(1)
Text1(1).Left = Text1(0).Left
Text1(1).Top = Text1(0).Top + 800
Text1(1).Visible = True
End Sub
我是第一次贴帖子,
就遇到一个热心人,
谢谢。
stephenz