难道我这VS安装的盗版的？ 你的意思就是 button不能设置背景图片？ 不可能吧？ 你不要误导我，哥。 回答： 不是不能设置背景图片哈，关键是你要设置那个控件的背景图片哈，这才是关键！比如说你要设置网页的，那么就修改网页的。如果要设置button的，就修改button的赛。 就是实现一个动态按钮的效果，当鼠标移动到按钮上，背景变换成另外一张图
成都创新互联公司服务项目包括巴彦网站建设、巴彦网站制作、巴彦网页制作以及巴彦网络营销策划等。多年来，我们专注于互联网行业，利用自身积累的技术优势、行业经验、深度合作伙伴关系等，向广大中小型企业、政府机构等提供互联网行业的解决方案，巴彦网站推广取得了明显的社会效益与经济效益。目前，我们服务的客户以成都为中心已经辐射到巴彦省份的部分城市，未来相信会继续扩大服务区域并继续获得客户的支持与信任！
鼠标移动到button控件上，触发该控件的MouseMove事件和MouseEnter事件。
按钮样式会变化要通过按钮的属性来改变。
祝你节日快乐！
Public Sub GenerateDynamiceButton()
'建立 坐标位置的变数, 方便一会儿安排 自动生产的button 的位置
Dim y As Integer = 15
Dim x As Integer = 0
' 用for loop 来建立 这些button 做 18只button
For ButtonIndex As Integer = 0 To 17
' 建造新的 button
Dim MyButton As New Button
'设定这新的button 的阔度
MyButton.Width = 80
'设定这新的button 的高度
MyButton.Height = 20
'我们暂定每行有4个BUTTON, 当每行有多个4个BUTTON 时重设行距, 令到下一行的和这一行的距离有10 个PIXEL
' 和重设x 坐标` = 0, 令到位置由头开始
If ButtonIndex Mod 4 = 0 Then
'设定 TOP 的 坐标位置令他可以和上一排的有10个PIXEL 的距离
y += MyButton.Height + 10
x = 0
End If
'设定文字 和 位置
' Set the text and set its top and left based on its dimensions and count
MyButton.Text = "My Button" ButtonIndex
'设定 TOP 的 坐标位置
MyButton.Top = y
'下面的CODE 可以令到这个BUTTON 和另一个BUTTON 有5个PIXEL 的距离
MyButton.Left = 26 + (x * (MyButton.Width + 5))
x += 1
'设定 BUTTON CLICK EVENT
AddHandler MyButton.Click, AddressOf MyButton_Click
'把button 加到 form 中
Me.Controls.Add(MyButton)
Next
End Sub
'处理 button click event
Private Sub MyButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Dim btn As Button = sender
'pop up 一个自己button 的字的message
MsgBox(btn.Text)
button 都是可以放图片作为底图的 字体颜色也可以更改的或者你知道画图的话 也可以把按钮变成其他形状
