Visual Basic ile Elektronik Sayaç Okuma

Konusu 'Programlama' forumundadır ve ufukes tarafından 28 Nisan 2015 başlatılmıştır.


  1. ufukes

    ufukes Üye

    Katılım:
    12 Ekim 2010
    Mesajlar:
    15
    Beğenilen Mesajları:
    1
    Ödül Puanları:
    3
    kodun son hali aşağıdaki gibi oldu altı çizili satırda hata veriyor.
    0.0.0(02624233) sayaçtan bu bilgiyi okuduktan sonra hata veriyor.

    Dim i As String
    Dim stmp As String

    Do
    Buffer = Buffer & ComData.Input
    i = InStr(Buffer, vbCrLf)
    If i > 0 Then
    stmp = Left(Buffer, i - 2)
    Buffer = Mid(Buffer, i + 2)
    i = InStr(stmp, "(")
    If i > 0 Then
    stmp2 = Mid(stmp, i)
    stmp = Left(stmp, i - 1)
    i = InStr(2, stmp2, "(")
    vsgrid.AddItem stmp & vbTab & IIf(i = 0, stmp2, Left(stmp2, i - 1)) & vbTab & IIf(i = 0, "", Mid(stmp2, i))
    Else
    vsgrid.AddItem stmp
    End If
    Else
    Exit Do
    End If
    Loop Until Buffer = ""
     
  2. Halil DUMAN

    Halil DUMAN Üye

    Katılım:
    3 Haziran 2017
    Mesajlar:
    2
    Beğenilen Mesajları:
    0
    Ödül Puanları:
    1
    Cinsiyet:
    Bay
    arduino ile sayaç okuma işlemi yapmaya çalışıyorum. siz verileri rs485 ten mi yoksa optik porttan mı okudunuz yardımcı olabilirmisiniz?
     
  3. Halil DUMAN

    Halil DUMAN Üye

    Katılım:
    3 Haziran 2017
    Mesajlar:
    2
    Beğenilen Mesajları:
    0
    Ödül Puanları:
    1
    Cinsiyet:
    Bay
    ufukes bana kaynak kodları mail atabilirmisin? Ben C de okumaya çalışıyorum.
     
Yüklüyor...
Benzer Konular
  1. unalçaliskan55
    Mesaj:
    6
    Görüntüleme:
    1.327
  2. demonblade
    Mesaj:
    1
    Görüntüleme:
    497
  3. durcan78
    Mesaj:
    2
    Görüntüleme:
    736
  4. mehmetaliu
    Mesaj:
    11
    Görüntüleme:
    1.472
  5. kangal0640
    Mesaj:
    1
    Görüntüleme:
    925
  6. bahdiyarusta
    Mesaj:
    5
    Görüntüleme:
    811
  7. mumco
    Mesaj:
    4
    Görüntüleme:
    898
  8. sasuke55
    Mesaj:
    2
    Görüntüleme:
    923
  9. hackaner
    Mesaj:
    2
    Görüntüleme:
    1.094
  10. nevzat92
    Mesaj:
    5
    Görüntüleme:
    1.922

Sayfayı Paylaş