static i as integer
i=i+1
dim bg(2) as string
bg(0)=背景图地址1
bg(1)=背景图地址2
bg(2)=背景图地址3
j=i mod 3
MePicture=bg(j)Form1ForeColor = "&H0000FF" ' 窗体字体颜色通过ForeColor属性设置,这里设置为红色Form1BackColor = "&H00FF00" ' 窗体背景颜色通过BackColor属性设置,这里设置为绿色End Sub难道我这VS安装的盗版的? 你的意思就是 button不能设置背景? 不可能吧?? 你不要误导我,哥。 回答: 不是不能设置背景哈,关键是你要设置那个控件的背景哈,这才是关键!比如说你要设置网页的,那么就修改网页的。如果要设置button的,就修改button的赛。 追问: 我就是要设置 botton 的背景啊。。。 就是实现一个动态按钮的效果,当鼠标移动到按钮上,背景变换成另外一张图可以设置按钮的属性,方法是先将
command
的style属性设为
graphic,
在设置它
的backcolor
按你的要求改色也可以按照代码的方式设置,在窗体画一个command按钮,再在form_load事件中添加以下代码command1style=1randomizecommand1backcolor=rgb(int(rnd255),int(rnd255),int(rnd255))就可以了,,颜色是随机的
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)