Trimitere text1.text pe serial

#1
Mihai Popa

Posted 15 February 2012 - 15:31

Junior Member

Grup: Members
Posts: 61
Înscris: 12.02.2006

Buna ziua.
Va rog sa ma ajutati cu o problema:
Vreau sa trimit pe serial un text pe care il introduc manual intr-un TextBox.
Ma intereseaza sa il pot citi caracter cu caracter si apoi sa il trimit catre serial prin MSComm1

Back to top

#2
horohoro

Posted 09 April 2012 - 23:07

Junior Member

Grup: Members
Posts: 103
Înscris: 11.02.2010

Nu stiu la ce te referi prin termenul 'serial' probabil la controlul Microsoft Communications (Dial). Daca vrei sa citesti fiecare caracter al unui textbox poti face un 'loop' pornind de la 1 pana la maximul de caractere. Un exemplu ar fi:

for a = 1 to len(text1.text)
 msgbox mid(text1.text, a, 1)
next a

Back to top

#3
Isildor

Posted 13 April 2012 - 23:49

Member

Grup: Members
Posts: 264
Înscris: 27.12.2011

deschidere port

mscomm1.portopen = true

trimitere date catre serial(scrie caractere in buffer)

mscomm1.output="ceva"

citire date (ia datele din buffer - si le sterge din buffer)

mscomm1.input

Edited by Isildor, 13 April 2012 - 23:50.

Back to top

Anunturi

Second Opinion

Folosind serviciul second opinion ne puteți trimite RMN-uri, CT -uri, angiografii, fișiere .pdf, documente medicale.

Astfel vă vom putea da o opinie neurochirurgicală, fără ca aceasta să poată înlocui un consult de specialitate. Răspunsurile vor fi date prin e-mail în cel mai scurt timp posibil (de obicei în mai putin de 24 de ore, dar nu mai mult de 48 de ore). Second opinion – Neurohope este un serviciu gratuit.

www.neurohope.ro

Trimitere text1.text pe serial

#1 Mihai Popa Posted 15 February 2012 - 15:31

#2 horohoro Posted 09 April 2012 - 23:07

#3 Isildor Posted 13 April 2012 - 23:49

Anunturi

▶ 0 user(s) are reading this topic

Sign In

#1
Mihai Popa

Posted 15 February 2012 - 15:31

#2
horohoro

Posted 09 April 2012 - 23:07

#3
Isildor

Posted 13 April 2012 - 23:49