Private Sub Command1_Click() Me.Image1.Picture = LoadPicture("")
End Sub 清空
Image1.Picture = LoadPicture("图片路径")
Private Sub Command1_Click() Me.Image1.Picture = LoadPicture("")清除 Image1.Picture = LoadPicture("图片路径")装入 End Sub 其实 Image1.Picture = LoadPicture("图片路径")就可以了啊,干嘛去清楚啊
Me.Image1.Picture = LoadPicture("")
End Sub
清空
Me.Image1.Picture = LoadPicture("")清除
Image1.Picture = LoadPicture("图片路径")装入
End Sub
其实
Image1.Picture = LoadPicture("图片路径")就可以了啊,干嘛去清楚啊