1）在按钮控件的属性页设置它的属性Style为1-Graphcal 2）给按钮控件的Picture属性设置图片 就可在VB的command控件上添加图片。 见下图红色方框部分：
CommandButton命令按钮最常用的事件是鼠标点击（Click）事件，当点击按钮时，犹如发出了一道命令，而这也正是“命令按钮”这个说法的由来。 在 Visual Basic 操作界面中，CommandButton（命令按钮）控件在程序中主要作为按钮进行使用。默认的名称...
先设置command控件的style属性设置为1，然后设置command控件的图片，编译好程序就能显示了。 显示效果：
Dim max%, n%Private Sub Command1_Click()Image1.Picture = LoadPicture(App.Path & "\pic_test\" & n & ".jpg")n = n + 1If n > max Then n = 1End SubPrivate Sub Form_Load()Image1.Stretch = Truemax = Val(InputBox("请输入图片总数", , 3...
有两种方法unload me 和end，但是效果是不同的 如果你指的是关闭窗口的话 1. Sub Command1_Click() unload me End Sub 此段代码将卸载自身窗口， 如果按钮在主窗口上（form1）， 所有窗口将被关闭（卸载），程序将结束 如果按钮在另一个窗口（fo...
方法： 1 用图形控件（如img,pic）,自己在事件中处理，一般采用三幅图，分别表示Normal,Mouse In以及Mouse Down； 2 用其它控件，如Sheriden_ActiveThreed_Plus3.0等，事件已帮你做好，只需加入图形即可，非常方便。 3 在一个Form中定义两个按钮...
image1.picture=loadpicture("图片地址") Image1.Stretch = True 就是自动调整
先生成1-3之间的随机值，然后根据值打开不同的图，代码如下： RandomizeSelect Case Int(Rnd * 3)Case 0'打开第一张图Case 1'打开第二张图Case 2'打开第三张图End Select
Private Sub Command1_Click() Static x As Boolean If x = False Then Set Image1.Picture = LoadPicture(App.Path & "\1.bmp") x = True Else Set Image1.Picture = LoadPicture(none) x = False End IfEnd Sub