• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

saka programı

Katılım
23 Şubat 2005
Mesajlar
303
arkadaslar bi saka programı vardı evet butonuna basmak istediginizde buton surekli yer degistiriyordu.bu excellde user form uzerine yapabilirmiiym?
gereksiz olarak dusunmeyin lutfen simdiden tesekkurler
 
CommandButton1 için...

[vb:1:447a79a0b6]Private Sub CommandButton1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
With CommandButton1
.Left = Int((.Left * Rnd) + 1)
.Top = Int((.Top * Rnd) + 1)
If .Left < 5 Then .Left = 100
If .Top < 5 Then .Top = 100
End With
End Sub
[/vb:1:447a79a0b6]
 
Geri
Üst