Jumat, 04 Mei 2012

Koneksi Ke Com Port di Visual Basic 6


Koneksi Ke Com Port di Visual Basic 6


1. add component Microsoft Comm Control 6.0 (MSCOMM32.OCX)

2. seperti ini contoh koneksi dengan vb6 :

Private Sub Form_Load()

MSComm1.CommPort = 1 'memilih port COM1
MSComm1.Settings = "9600,N,8,1" 'Baudrate 9600
MSComm1.InputLen = 0
MSComm1.PortOpen = True 'form di load port dibuka

End Sub

3. Write atau menulis melalui Com Port

Private Sub Command1_Click()
MSComm1.Output = "AT" 'contoh mengirim "AT" melalui comport
End Sub

4.  Read atau membaca dari Com POrt

Private Sub Command2_Click()

MSComm1.InputMode = comInputModeText
Text1.Text = Text1.Text & MSComm1.Input  'ane tampilin hasilnya di text1

end sub

Tidak ada komentar:

Posting Komentar