最近本人正在撰寫關于串口通訊的程式,情況如下:我想通程序式控制NewFoucs即PZT壓電陶瓷驅動器,該驅動器通過RS-232串口和工控機連接。以前使用該驅動器的時候,可以手動使用一個操作手柄,在手柄上輸入REL 1 1000 G,然后點擊手柄上的Enter鍵,然后驅動器就可以產生1000個脈沖的位移,現在我是想在程式中控制,不再使用手柄,請問該如何做?我現在在程式中用了MSComm控制元件,并對其進行了初始化(其中MSComm1.Settings="19200,n,8,1"),對該控制元件初始化后,我由寫了一個產生上面陳述句的一個函式,如下:
Private Sub GenerateCommand(Command As String, Paramater As String)
'注釋:
'當呼叫該函式時,將REL傳遞給Command 引數,同理將“1 1000 G“傳遞給Paramater 引數,用于產生命令REL 1 1000 G,后面的str1,str2為Enter鍵,就是不用手動按Enter,而是在程式中實作)
Dim str1, str2 As String
str1 = Asc(13) '換行鍵的ASCII碼是13
str2 = Asc(10) '回車鍵的ASCII碼是10
sendstring = Command + "" + Paramater + str1 + str2
End Sub
目前,MSComm控制元件已經初始化,需要傳達給驅動器的命令也已經寫好(即變數sendstring),問題是如何在程式中將這個命令發出去,讓驅動器開始作業????請教各位!先謝謝了!
uj5u.com熱心網友回復:
Enter鍵使由如下代碼組成:Dim str1, str2 As String
str1 = Chr(13) '換行鍵的ASCII碼是13
str2 = Chr(10) '回車鍵的ASCII碼是10
發送字符命令則用MsComm控制元件的Output屬性,如發送Enter鍵,代碼為:
MSComm1.Output = str1 + str2
uj5u.com熱心網友回復:
MSComm1.Output = sendstring轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/118130.html
