Visual basic yardim

Katılım
18 Ocak 2008
Mesajlar
1,074
Puanları
156
Yaş
40
Öncelikle selamun aleyküm arkadaşlar...
Siteye baya zamandır üyeyim ve bu siteye gerçekden çok iyi bilgisi olan arkadaşların girdiğini ve paylaşımların çok güzel ve kaliteli paylaşımlar olduğunu görüyorum ben de bir kaç konuda yardım alabilirim diye düşündüm umarım yanılmamışımdır.

1- Visual Basic de pause 100 veya Delay_ms(100); örneklerinde olduğu gibi bir bekletme komutu varmı diye soracaktım ben bir kitabını aldım çok güzel bir program olmasına rağmen böyle bir komuta hiç rastlamadım...

2- Bir de Visual basic ile yazılmış bir seri port programı lazım hem RX hemde TX işlemlerini yapacak ama bu konu hem örnekli hem de öğretici olmasını istiyorum nerde ne komutunu niçin kullandığını anlatan ve seri portun nasıl çalışdığını adreslerini vs anlatan güzel bir konu olursa çok memnun olurum Elimde Altaş yayıncılığa ait bir kitap var çok güzel anlatımlı ama port kontrolune hiç girilmemiş
Arkadaşlar ve ustalar yardımlarınızı bekliyorum bu konuda oldukça yeniyim ve bazı bişeyler konusunda yol kat etmek istiyorum yardım ederseniz çok dualarımı alırsınız ...

Herkese şimdiden ilgilerinden dolayı teşekkürlerimi bir borç bilirim...
 
sn has_artvin_li visual basic da anlattığınız gibi hazır fonksiyon yok ama
windows API leri işinizi görür:

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

bu kodu declarations(kodların yazıldığı yerdeki boşluklara) bölümüne yazarsan
elinde cillop gibi bir bekletme fonksiyonu olur
kodda geçen "Sleep" fonksiyonun adıdır ver kullanımı

Sleep(1 boşluk)bekletme süresi(milisaniye cinsinden)

örneğin

Sleep 1000

bir saniye geciktirme yapar.

bide seri porttan hiç uygulama yapmadım ama kısa zamanda bi uygulama gönderirim
sanırım MSCOMM control ile yapılıyor.
şimdilik kolay gelsin...
sorun olursa çekinme...
(Populariteyi de unutmayalım lütfen ;D)
 
Arkadaşlar Yardımlarınızdan dolayı çok teşekkür ederim çok işime yararlı oldular ALLAH RAZI OLSUN
 
ALLAH hepimizden razı olsun ilim peşinde koşanların emeğinin karşılığını fazlasıyla versin :)
 
Merhaba,

aşşağıdaki koduda kullanabilirsiniz...

Public Sub Pause(BeklemeZamani As Currency)
Dim BASLA As Currency
BASLA = Timer
Do While Timer < (BASLA + BeklemeZamani)
DoEvents
Loop
End Sub

Kod içinde kullanımı;

Private Sub Text1_Change()
Text3.Text = "Merhaba"
Pause(1.2) '1.2 saniye gecikme oluşturulur..
Text3.Text = "Dünya"

End Sub
 

Forum istatistikleri

Konular
128,826
Mesajlar
920,800
Kullanıcılar
450,915
Son üye
snapthreads

Yeni konular

Çevrimiçi üyeler

Geri
Üst