Rs232 communication in vb6 for sending a byte to the microcontroller

[vinkad999]

Hi,I am Vinod.I need to send the command from pc using visual basic 6 to the atmega 32 microconyroller.So i need to prepare the GUI for that.So how to do it using vb6 through rs232 i need the code for the data transfer.The data is DE801234[32 BIT COOMAND].

 

[electroboy]

if u could use vb2010, try this


Private mySerialPort As New SerialPort

Dim var(4) As Byte={&HDE, &H80, &H12, &H34}

With mySerialPort
.PortName = "COM9"
.BaudRate = 9600
.DataBits = 8
.Parity = Parity.None
.StopBits = StopBits.One
.Handshake = Handshake.None
End With
Try
mySerialPort.Open()
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
mySerialPort.Write(var, 0, 4)
mySerialPort.Close()