上一篇才講php 這邊來講VB6 拉
其實VB就只要蒐尋 透過RS232通訊之類的就會有一堆範例了
我們ARDUINO的serial port 就是在VB裡面的RS232通訊方式

VB裡面開新專案後 要先到 專案->設定使用元件->MICROSOFT Comm Control 6.0 這個要打勾

然後你的form1上面要擺上MScomm 這個才可以

像這樣才可以

然後程式碼如下

Private Sub Command1_Click()
MSComm1.Output = "H" ' Ensure that3.
End Sub
Private Sub Command3_Click()
Command3.Caption = "已連線"
Command3.Enabled = False
' Buffer to hold input string
Dim Instring As String
MSComm1.CommPort = 6 '要使用的com號

MSComm1.Settings = "9600,N,8,1" ' 9600 baud, no parity, 8 data, and 1 stop bit.
MSComm1.InputLen = 0 ' Tell the control to read entire buffer when Input is used.

MSComm1.PortOpen = True ' Open the port. Send the attention command to the modem.

MSComm1.Output = "Without this line, the first control will not work. I don't know way."
'我不知道為什麼要送這行 但是送了程式就會對
End Sub

這邊是設計按下Command3 就會跟arduino連線 然後按下Command1 就會送一個H 這個字串給arduino
H可以替換成你想送的文字