This examples
demonstrates how to send control characters to the LCD.
Clear LCD , control character 13 ( 0x0D ) , Cursor
Home command , control character 11 ( 0x0B ) , Next line , 12 (
0x0C )
Dim
Data() As Byte
Data
= New Byte() {11,12,13}
Serialport1.write(
Data, 2, 1 ) ' Clear LCD command.
Serialport1.write(
Label1.Text ) ' Send ASCII text to row 0 ( Time )
Serialport1.write(
Data, 1,1 ) ' Move to next line
Serialport1.write(
Label2.Text ) ' Send ASCII text to row 1 ( Date )
Download Source Code here
|