Bir Araba Yarışı Yapalım

Visual basic , Delphi , C , C++ - Bir Araba Yarışı Yapalım ...

Cevapla
Bir Araba Yarışı Yapalım
Oktay Şenkan isimli Üye şimdilik offline konumundadır

Oktay Şenkan

Öğrenci (Diğer) / İzmir

Dosya24

Bir Araba Yarışı Yapalım

Alt 21-07-2010 #1
Sponsorlu Bağlantılar

Visual Basic'te küçük ve eğlenceli bir araba yarışı yapacağız. Bakalım hangi araba birinci gelecek? Bir Araba Yarışı Yapalım

Bir Araba Yarışı Yapalım

2 tane textbox ,1 tane command button ,3 tane line ,1 tane timer kullanmamız gerek!
Formumuza bunları yerleştirdikten sonra alta vermiş olduğum kodu yazınız!!!

Timer1 İçine
Private Sub Timer1_Timer()
Randomize
a = Int(Rnd(300) * 100)
b = Int(Rnd(300) * 100)
Text1.Left = Text1.Left + a
Text2.Left = Text2.Left + b
If Text1.Left >= 5520 Then
a = MsgBox("A Arabası kazandı")
End
End If
If Text2.Left >= 5520 Then
a = MsgBox("B Arabası Kazandı")
End
End If
End Sub

Command1 Buttonunun içinede

Private Sub Command1_Click()
Timer1.Enabled = True
Timer1.Interval = 25
End Sub
Bu mesajdan alıntı yap
Sponsor Links

Grafikerler.net Reklamları

RE!S isimli Üye şimdilik offline konumundadır

RE!S

Öğrenci (Diğer) / İzmir

Standart
Alt 30-07-2010 #2
                             Sponsorlu Bağlantılar
deniyorum hemen Bir Araba Yarışı Yapalım
Bu mesajdan alıntı yap
Oktay Şenkan isimli Üye şimdilik offline konumundadır

Oktay Şenkan

Öğrenci (Diğer) / İzmir

Standart
Alt 01-08-2010 #3
Yararlı Oldumu ?
Bu mesajdan alıntı yap
mcmaho isimli Üye şimdilik offline konumundadır

mcmaho

Bilg. Teknikeri / Muğla

Standart
Alt 26-10-2010 #4
arabaları kullanıcı kontrol etse daha güzel olurdu. yani daha anlamlı olurdu...Bir Araba Yarışı Yapalım
Bu mesajdan alıntı yap
Cevapla

Benzer Konular
Konu Konu Bilgileri Forum Cevaplar Son Mesaj
At Yarışı İçerikli Vektöreller. Sonay Görkem Vektörel 7 04-01-2012 20:44:48
Oto Slalom yarışı afiş çalışmam alimyesil Afiş Tasarımı 5 03-05-2010 17:14:43
Photoshop Dersleri: araba kaputlarına carbon fibre yapalım hadıı fixx Photoshop Dersleri 5 28-11-2009 14:13:46
Bot Yarışı Psd Formatında the_one Psd Dosyaları 0 23-01-2009 01:10:45
At Yarışı-Hipodrom Psd Formatında the_one Psd Dosyaları 0 23-01-2009 01:05:20

Kapat
Şifremi Unuttum?