(03/04/2010, 21:06)ercansahin yazdı:Denedim Ama Hata verdi...deneyin lütfen...Kod:Private Sub Ayrıntı_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.Etiket0.ForeColor = 0
Me.Etiket0.BorderColor = 0
Me.Etiket0.BackColor = -2147483633
End Sub
Private Sub Etiket0_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.Etiket0.ForeColor = 16777215
Me.Etiket0.BorderColor = 255
Me.Etiket0.BackColor = 255
End Sub
Son Düzenleme: 04/04/2010, 11:38, Düzenleyen: ZaNzArA.