Mengetahui port comm terbuka (how to know port comm open)

Berikut ini saya akan memberikan sedikit ulasan bagaimana mengetahui port comm berapa yang sedang terbuka atau terhubung dengan device.. menggunakan visual basic 6.0

Dim i As Integer
Combo1.Clear
On Error Resume Next
For i = 1 To 16
DoEvents
MSComm1.CommPort = i
MSComm1.PortOpen = True
If MSComm1.PortOpen Then
Combo1.AddItem "COM " & i
Else
End If
MSComm1.PortOpen = False
Next
Pada saat membuka comm port yang tidak ada pasti akan terjadi error. maka error
tersebut di alihkan ke next.

Mengetahui port comm terbuka (how to know port comm open) 2012-10-09T10:49:00+07:00 Rating: 4.5 Diposkan Oleh: Dedy Fermana