[Ahmad Jawad]

السلام عليكم ورحمة الله وبركاته

كاتب الموضوع :: crush.1993

تغيير شكل الزر عند المرور عليه

كود :

[align=left]Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Command1.FontBold = False Then
        Command1.FontBold = True
        Command1.FontSize = 12
End If
End Sub


Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Command1.FontBold = True Then
        Command1.FontBold = False
        Command1.FontSize = 10
End If
End Sub[/align]

[عمـر]

سلام عليكم ورحمة الله وبركاته
ياغالي لو تقدر تعطينا امثلة على زرين لانه عندي ما ظبت غير على زر واحد اي انه لما اعملها على اثنين ما بتظبط
اتمنى مثال على زرين او كود لزين في الفروم وجزاك الله خير