ppts.net
当前位置:首页>>关于在VB中,如何在Command按钮上出现图片的资料>>

在VB中,如何在Command按钮上出现图片

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

网站首页 | 网站地图
All rights reserved Powered by www.ppts.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com