简单vb小程序

来源：百度知道 编辑：UC知道 时间：2024/06/16 23:59:09
要建这么个程序：窗体上有个command按钮，当按此按钮后，窗体出现插入的图片。
就是这样。。

Private Sub CommandButton1_Click()
Me.Picture=LoadPicture("图片的全路经")
End Sub

Private Sub CommandButton1_Click()'按钮的click事件，就是点击时触发。
Me.Picture=LoadPicture("图片的全路经") '当前窗体的图片为载入图片，在“图片的全路径”中写入图片所在位置。
End Sub '结束，够详细的吧，加分哦~！

Private Sub Command1_Click()
Form1.Picture = LoadPicture("图片的具体路径")
End Sub
如果在属性窗口里边已经加入了相片 ，那么可这样写：
Private Sub Command1_Click()
Picture1.visable = True
End Sub

以上的答案都对，但是建议用图片框，窗体上的那个背景图很不方便。

加一个image控件
Private Sub CommandButton1_Click()
image1.Picture=LoadPicture("图片的全路经")
image1.visible=true
End Sub