MSComm String Data Out Help - Electronic Circuits Projects Diagrams Free

Suraj143 · 13th June 2008, 04:50 AM

Hi, I can send a single character when I press a command button in VB.

Here is the code

Code:

Private Sub Command1_Click()
MSComm1.Output = "A" + Chr(13)
End Sub

Now I need to send a string which is typed in the textbox when I pressed the command button. Can anybody help me out to do this?

Thanks

Pommie · 13th June 2008, 05:37 AM

Try,

Code:

Private Sub Command1_Click()
    MSComm1.Output = Text1.Text & vbCr
End Sub

Mike.

Suraj143 · 13th June 2008, 05:44 AM

Hi Mike thats what I was looking, I couldn't find this on the net.

Ahh this will send a string what I type in the Text1 box.

I'll try to add your code.Can I change the character length also,I mean character length (Word) must not exceed 10 characters.Its never mind I'll try to solve that out.

Thanks Mike

Pommie · 13th June 2008, 06:00 AM

You could do,

Code:

Private Sub Command1_Click()
Dim Temp As String
    Temp = Text1.Text
    If Len(Temp) > 10 Then Temp = Left(Temp, 10)
    MSComm1.Output = Temp & vbCr
End Sub

Mike.

Suraj143 · 13th June 2008, 06:06 AM

Hi Mike now I got it.Thanks for the superb code.All I understand except the Left(Temp, 10) part.Does it move left when it receive 11 characters?So every time it is a below 10 letter word.

Pommie · 13th June 2008, 06:15 AM

Left just returns a number of characters from the beginning of the string and so, Temp=Left("Hello World",5) would result in Temp containing "Hello".

Mike.

Suraj143 · 13th June 2008, 06:20 AM

Quote:

Originally Posted by Pommie

Left just returns a number of characters from the beginning of the string and so, Temp=Left("Hello World",5) would result in Temp containing "Hello".

Mike.

Totally understood.I got everything from you that I was looking everywhere.

Thanks Again.

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Latest
String in pic16f877 and gsm	neelam29	Micro Controllers	1	19th March 2008 05:04 PM
float to string conversion for PIC	fzn10	Micro Controllers	6	10th August 2006 12:49 PM
Can chr$(0) be received using mscomm in VB?	StupidDum	Micro Controllers	4	23rd May 2004 12:12 PM
String Variable?	Timmymna	Micro Controllers	1	2nd May 2004 11:03 PM
mscomm help	xjackal	Micro Controllers	3	22nd February 2004 08:49 PM

13th June 2008, 04:50 AM	(permalink (permalink))
Suraj143	MSComm String Data Out Help Hi, I can send a single character when I press a command button in VB. Here is the code Code: Private Sub Command1_Click() MSComm1.Output = "A" + Chr(13) End Sub Now I need to send a string which is typed in the textbox when I pressed the command button. Can anybody help me out to do this? Thanks

13th June 2008, 05:37 AM	(permalink (permalink))
Pommie	Try, Code: Private Sub Command1_Click() MSComm1.Output = Text1.Text & vbCr End Sub Mike.

13th June 2008, 05:44 AM	(permalink (permalink))
Suraj143	Hi Mike thats what I was looking, I couldn't find this on the net. Ahh this will send a string what I type in the Text1 box. I'll try to add your code.Can I change the character length also,I mean character length (Word) must not exceed 10 characters.Its never mind I'll try to solve that out. Thanks Mike

13th June 2008, 06:00 AM	(permalink (permalink))
Pommie	You could do, Code: Private Sub Command1_Click() Dim Temp As String Temp = Text1.Text If Len(Temp) > 10 Then Temp = Left(Temp, 10) MSComm1.Output = Temp & vbCr End Sub Mike.

13th June 2008, 06:06 AM	(permalink (permalink))
Suraj143	Hi Mike now I got it.Thanks for the superb code.All I understand except the Left(Temp, 10) part.Does it move left when it receive 11 characters?So every time it is a below 10 letter word.

13th June 2008, 06:15 AM	(permalink (permalink))
Pommie	Left just returns a number of characters from the beginning of the string and so, Temp=Left("Hello World",5) would result in Temp containing "Hello". Mike.