Mohon bantuan
aku ingin membuat program untuk mengrim data melalui
serial port. dimana pada saat command buttons aku click maka data pada text1 akan dikirim melalui serial port.
aku sdh coba membuat program sederhananya mohon di cek .
Private Sub Command1_Click()
If MSComm1.PortOpen = True Then
MSComm1.Output = Text1.Text
Label1.Caption = Text1.Text
Else
Label1.Caption = "Port tidak open"
End If
If MSComm1.PortOpen = True Then
MSComm1.Output = Text1.Text
Label1.Caption = Text1.Text
Else
Label1.Caption = "Port tidak open"
End If
End Sub
Private Sub MSComm1_OnComm()
MSComm1.CommPort = 1
MSComm1.Settings = "9600,n,8,1"
MSComm1.InputLen = 0
MSComm1.PortOpen = True
MSComm1.CommPort = 1
MSComm1.Settings = "9600,n,8,1"
MSComm1.InputLen = 0
MSComm1.PortOpen = True
End Sub
How low will we go? Check out Yahoo! Messengers low PC-to-Phone call rates. __._,_.___
Wahana Programmer Groups Links
<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
http://wahanaprogrammer.net
<*> Untuk menghubungi owner milis ini, kirim email ke:
[EMAIL PROTECTED]
<*> Konsultasi pemrogramman bisa chat disini:
Yahoo! Messenger: wahanaprogrammer
SPONSORED LINKS
| Indonesia phone card | Programmer | Indonesia tour |
| Indonesia travel | Indonesia flower |
Your email settings: Individual Email|Traditional
Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Daily Digest | Switch to Fully Featured
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe
Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Daily Digest | Switch to Fully Featured
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe
__,_._,___
