Üye Girişi
Bağlan Google+ ile Bağlan Facebook ile Bağlan
Yeni Kayıt
Tüm Forumlar
  • Tüm Forumlar
  • Web Tasarım - Programlama
  • Yazılım Geliştirme
  • Delphi / C++ /Vb
  • Bu Konuda
Şimdi Ara

visual basic 6 step motor kontrolu ile ilgili yardım

Sıcak Fırsatlarda Tıklananlar
Editörün Seçtiği Fırsatlar
Daha Fazla
Bu Konudaki Kullanıcılar: Daha Az
2 Misafir - 2 Masaüstü
5 sn
6
Cevap
0
Favori
1.191
Tıklama
Daha Fazla
İstatistik
  • Konu İstatistikleri Yükleniyor
Konuya Özel
0 oy
Öne Çıkar
Cevapla
Sayfa: 1
Giriş
Mesaj
  • merhaba arkadaşlar step motor kontrolü ile ilgili vb6 programında birkaç geliştirme çalışmalarım var yalnız bir sorunu çözemedim yardım ederseniz çok sevinirim........burada 2 tic var bir tanesini seçtiğimde ve dönme commandına bastığımda motor sağa diğer tic i seçtiğimde motor sola dönüyor.ben bir command veya tic ekleyerek motorun ilk önce sağa 15 saniye bekleyip sola dönmesini istiyorum.bunu nasıl yapabilirim acaba?
    yardım ederseniz çok sevinirim.


    Private Sub Timer1_Timer()
    If (Option2.Value = True) Then
    veri = veri * 2
    If (veri = 16) Then
    veri = 1
    End If
    End If


    If (Option2.Value = False) Then
    veri = veri / 2
    If (veri = 0) Then
    veri = 8
    End If
    End If


    If (aktif = True) Then
    say = say + 1

    If (say = tur) Then
    Timer1.Enabled = False
    say = 0
    End If
    End If
    Text1.Text = Str(veri)
    BufferOut(1) = Val(Text1.Text)
    hidWriteEx VendorID, ProductID, BufferOut(0)


    End Sub



    < Bu mesaj bu kişi tarafından değiştirildi tantalis1986 -- 14 Aralık 2010; 18:49:54 >







  • yardım edicek yokmu arkadaşlar
  • Arkadaş vb de timer yokmu? Timer interval i ayarla, bitincede istediğin şeyi çalıştır. Birkeresinde bende benzer birşey yapmıştım. 2 motoru usb üzerinden hem sağa sola hemde hız kontrolu. Ama ne yazıkki vb ile değil. Yoksa yardımcı olurdum.
  • saol elektro_gadget biraz geç oldu gerçi

    peki şu kodu commanda bastığımda çalıştırıp 10 saniye bekleyip otomatik tekrar nasıl çalıştırabilirim

    Private Sub command1_click()
    aktif = True
    tur = 4 / 1
    Timer1.Enabled = True
  • Ben vb bilmiyorum ama şurada birşeyler yazıyor.
    http://www.sanalkurs.net/vb-60-ile-timer-kullanimi-3382.html
  • Sub Pause(ByVal nSecond As Single)
    Dim t0 As Single
    Dim dummy As Integer

    t0 = Timer

    Do While Timer - t0 < nSecond

    dummy = DoEvents()


    If Timer < t0 Then
    t0 = t0 - 24 * 60 * 60 * 60

    End If
    Loop

    End Sub

    Private Sub Command10_Click()
    Do While (DoEvents)

    aktif = True
    tur = 24 / 1
    Timer1.Enabled = True

    Call Pause(15) burada kaç saniye bekletmek istediğimiz yazıyoruz
    Loop


    End Sub

    bu şekilde yaptım çalıştı
    tekrar teşekkürler
    • 
Sayfa: 1

Benzer içerikler

- x
Bildirim
mesajınız kopyalandı (ctrl+v) yapıştırmak istediğiniz yere yapıştırabilirsiniz.
Hizmet kalitesi için çerezleri kullanabiliriz. DH’ye girerek kullanım izni vermiş sayılırsınız.
Anladım Veri Politikamız