窗体二
Private Sub chuangtiyi_Click()
Form1.Show
End Sub
Private Sub Form_Load()
End Sub
Private Sub sanhao_Click()
Print "显示文字"
End Sub
Private Sub sihao_Click()
End
End Sub
Private Sub yihao_Click()
Image1.Stretch = True
Image1.Picture = LoadPicture("图片文件完整路径") '比如:
E:\c4a1cbd5d3eac0bdd5
01[1].jpgEnd Sub