Private Sub Command1_Click()
Clipboard.Clear
Clipboard.SetData Picture1.Picture
Picture1.Picture = Picture2.Picture
Picture2.Picture = Clipboard.GetData
End Sub

Private Sub Form_Load()
Command1.Caption = "文本转换"
End Sub

Private Sub Picture1_load()
Picture1.Picture = "VB事操作方便的可视化编程环境"
End Sub

那应该 如何修改 谢谢