Visual basic problemi

[Eagle_Tim]

Visual basic 6 da bir problemim var sayın visual ustalarından yardım istiyorum.

seri porttan aldığım veriyi bir text box a yazıyorum ama her aldığım veri diğerinin üzerine yazılıyor galiba ?
yaptığım işlemde bunu doğruluyor gibi ve  tek satırla şöyle;

text2.tex = buffer

bu satır nasıl değişirse veya text boxa yazılan metinin üzerine değilde devamına nasıl eklerim gelen veriyi..

not: text boxa yazılan yazı pc dışından geliyor klavyeden değil klavyeden gelen zaten üstüne yazılmıyor "

[mahoaga]

text2.text=text2.text & mscomm1.input

tek satırla bu şekile çözebilirsin,
ancak porttan gelen bilgilere Chr kodu olarak 32 altı kolar mevcut ise üstte verilen yöntem işey yaramayabilir. Çünkü Tab, Enter gibi kodlar textbox ın içeriğinigi bozabilir.

Bu uruma şun yaparsan eğer gelen bilgiyi Data olarak eğile Ascii kou olarak görebilirsin. budurumda 0-32 Ascii koları textboxın içeriğini bozmamış olur.

dim a$,say as integer

a$=mscomm1.input
for say=1 to len(a$)
text2.text=text2.text & "," & trim(str(asc(mid$(a$,say,1))))
next

bunu kullanırsa harflarin ASC kodlarını göreceksin mesela A yerine 65 , B yerine 66 gibi
"ABCD" yazısı için
"65,66,67,68" görüntüler

[Eagle_Tim]

ilk verdiğiniz satırda mscomm yerine buffer yazınca olay çözüldü yardım için teşekkür..