VB中如何去掉按扭的边框

来源:百度知道 编辑:UC知道 时间:2024/05/04 21:03:57
请问各位大侠,为了让程序美观,想在按扭上显示图片,但是按扭边框怎么去掉,让按扭跟去掉了边框的图片框的外观一样
虽然可以用IMAGE,但是却没有了单击时的按扭那种向下凹的动态效果啊

你可直接使用IMAGE控件,它也有各种鼠标事件。
Private Sub Image1_Click()
'写需执行的代码
End Sub
增加LINE控件数组:
Option Explicit
Dim i As Integer

Private Sub Form_Load()
For i = 0 To 3
Line1(i).Visible = False
Next
End Sub

Private Sub Image1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
For i = 0 To 3
Line1(i).Visible = True
Next
End Sub

Private Sub Image1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
For i = 0 To 3
Line1(i).Visible = False
Next
End Sub