[.NET] VB2005 MSComm.PortOpen = True 出錯

看板Visual_Basic作者 (jamuqa)時間15年前 (2011/03/14 20:32), 編輯推噓1(100)
留言1則, 1人參與, 最新討論串1/1
請輸入專案類型(網站專案或者應用程式專案):應用程式 我身邊有一台發票機,想透過vb送字去列印他 我的發票機是com port轉接usb到電腦的 我程式如下 Public Class Form1 Private Sub AxMSComm1_OnComm(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AxMSComm1.OnComm End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click AxMSComm1.Output = "1" End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load ' 先將預設的COM 關掉 If (AxMSComm1.PortOpen = True) Then AxMSComm1.PortOpen = False ' 預設為COM 1 AxMSComm1.CommPort = 3 ' 連線速度9600 baud、無同位檢查、資料位元8、停止位元1 AxMSComm1.Settings = "9600,N,8,1" ' 告訴控制項當使用Input 時,讀取整個暫存區 AxMSComm1.InputLen = 0 ' 開啟序列連接埠 If (AxMSComm1.PortOpen = False) Then AxMSComm1.PortOpen = True ' 訊息視窗開始文字 End Sub End Class 但是每當執行到AxMSComm1.PortOpen = True 這裡時就會出錯 錯誤訊息為: COMException未處理 發生例外狀況於 HRESULT:0x800A1F4F 請問各位大大,這是哪裡出錯了呢? -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 59.125.41.241

03/14 20:58, , 1F
建議您用.NET內建的SerialPort類別
03/14 20:58, 1F
文章代碼(AID): #1DVWhuy_ (Visual_Basic)