【正文】 的接口電平可以直接接口，因此不需要進(jìn)行電平轉(zhuǎn)換。圖43 系統(tǒng)的單片機(jī)電路圖從上圖可以看出，此單片機(jī)的時(shí)鐘與其他單片機(jī)的時(shí)鐘有一定的區(qū)別，MSP430單片機(jī)采用兩個(gè)時(shí)鐘輸入，既一個(gè)32KHZ的時(shí)鐘信號(hào)，一個(gè)8MHZ的時(shí)鐘信號(hào)。利用單片機(jī)的串口0與TC35模塊接口。當(dāng)TC35模塊啟動(dòng)后，/IGT管腳可以是高電平。因此，單片機(jī)與PC機(jī)進(jìn)行遠(yuǎn)程通信更具有實(shí)際意義。RS—232C是有美國(guó)電子工業(yè)協(xié)會(huì)（EIA）正式公布的，在異步串口通信中應(yīng)用最廣的標(biāo)準(zhǔn)總線（C表示此標(biāo)準(zhǔn)修改了3次）。該標(biāo)準(zhǔn)的目的是定義數(shù)據(jù)終端設(shè)備（DTE）之間接口的電氣特性。通信距離可達(dá)到15m。（2）RS—232C的信號(hào)特性為了保證二進(jìn)制數(shù)據(jù)能夠正確傳輸，設(shè)備控制準(zhǔn)確完成，有必要使所用的信號(hào)電平保持一致。該接口采用雙極性信號(hào)、公共地線和負(fù)邏輯。（2）電平轉(zhuǎn)換RS—232C規(guī)定的邏輯電平與一般微處理器、單片機(jī)的邏輯電平是不一致的。MAX232芯片是MAXIM公司生產(chǎn)的、包含兩路接收器和驅(qū)動(dòng)器IC芯片，適用于各種EIA232C和V。10V電壓。加之其價(jià)格適中，硬件接口簡(jiǎn)單。圖45 復(fù)位電路為了減小電源的干擾，以減小輸入端受到的干擾。電路圖如圖46所示。該芯片的輸出位可調(diào)類型，該芯片通過(guò)電阻R2和R1實(shí)現(xiàn)輸出電壓的調(diào)節(jié)。5 Visusal Basic的編程環(huán)境 VB軟件介紹Basic語(yǔ)言是20世紀(jì)60年代美國(guó)Dartmouth學(xué)院的兩位教授共同設(shè)計(jì)的計(jì)算機(jī)程序設(shè)計(jì)語(yǔ)言，其含義是“初學(xué)者通用的符號(hào)指令代碼”。但是對(duì)于程序員來(lái)說(shuō)，可視化程序設(shè)計(jì)語(yǔ)言正式在這種背景下產(chǎn)生。其主要的功能特點(diǎn)是：a) 具有面向?qū)ο蟮目梢暬O(shè)計(jì)工具b) 事件驅(qū)動(dòng)的編程機(jī)制c) 提供了易學(xué)易用的應(yīng)用程序集成開(kāi)發(fā)環(huán)境d) 結(jié)構(gòu)化的程序設(shè)計(jì)語(yǔ)言e) 強(qiáng)大的數(shù)據(jù)庫(kù)操縱功能f) Active技術(shù)g) 網(wǎng)絡(luò)功能h) 多個(gè)應(yīng)用程序向?qū)) 完備的Help聯(lián)機(jī)幫助功能 圖51 標(biāo)題欄標(biāo)題欄中的標(biāo)題為“ Microsoft Visusal Basic [設(shè)計(jì)]”說(shuō)明此時(shí)集成開(kāi)發(fā)環(huán)境處于設(shè)計(jì)模式，在進(jìn)入其他狀態(tài)時(shí)，方括號(hào)中的文字將被做相應(yīng)的變化。按F5鍵或單擊“繼續(xù)”按扭程序繼續(xù)運(yùn)行，單擊“結(jié)束”按扭停止程序的運(yùn)行。（2） 編輯（Edit）：用于程序源代碼的編輯。（6） 調(diào)試（Debug）：用于程序的調(diào)試、查錯(cuò)的命令。（10） 工具（Tools）：用于集成開(kāi)發(fā)環(huán)境下工具的擴(kuò)展。工具欄工具欄可以迅速地訪問(wèn)常用的菜單命令。圖52 窗口窗體圖窗體是VB應(yīng)用程序的主要構(gòu)成部分，用戶通過(guò)與窗體上的控制部件可控制應(yīng)用程序的運(yùn)行，得到結(jié)果。屬性窗口屬性窗口如圖53所示。屬性列表有中間一條線把其分成兩個(gè)部分，左邊列出的是各種屬性；右邊列出的則是響應(yīng)的屬性值。圖54 程資源管理器窗口工程資源管理器窗口有三個(gè)按扭，分別為： “查看代碼”按鈕：切換到代碼窗口，顯示和編輯代碼。他包含兩種主要類型的文件：窗體文件（.frm文件）：該文件存儲(chǔ)窗體上使用的所有控件對(duì)象和有關(guān)的屬性、對(duì)象相應(yīng)的事件過(guò)程、程序代碼。代碼窗口：代碼窗口是專門用來(lái)進(jìn)行程序設(shè)計(jì)的窗口，可顯示和編輯程序代碼，如55圖所示。其中“通用”表示與特定對(duì)象無(wú)關(guān)的通用代碼，一般在次聲明模塊級(jí)變量或用戶編寫子定義過(guò)程。（4）“過(guò)程查看”按鈕：只能顯示所選的一個(gè)過(guò)程。利用Msm控件完成一般的數(shù)據(jù)通信，使用此控件還是非常方便的，在接收數(shù)據(jù)方面可通過(guò)OnComm事件響應(yīng)從而用Input屬性從此控件的接收緩存區(qū)獲得數(shù)據(jù)，在發(fā)送數(shù)據(jù)方面是通過(guò)給此控件的Output屬性賦值來(lái)實(shí)現(xiàn)。如果在傳輸緩沖區(qū)中的字符數(shù)小于value，CommEvent屬性設(shè)置為ErSend．并產(chǎn)生0nComm 事件：9）InputLen、Input：收緩和發(fā)送緩沖區(qū)字符數(shù)或字節(jié)數(shù)：10）Event：該屬性列出了控件觸發(fā)事件的類型和具體的事件活錯(cuò)誤MSCOMM只有一個(gè)OnComm事件．只要eomEvent的值一改變．就會(huì)觸發(fā)該事件．這表示發(fā)生了一個(gè)通信錯(cuò)誤或事件。MSComm控件進(jìn)行串行通信的一般步驟為：1）設(shè)置通信對(duì)象、通信端口號(hào)及其他屬性；2）設(shè)定通信協(xié)議；3）打開(kāi)通信端口，進(jìn)行數(shù)據(jù)的傳送；4）關(guān)閉通信端口；MSComm控件通信方式的選擇：MSComm控件有兩種處理通信的方式，即事件驅(qū)動(dòng)和查詢方式。其引用方法如下：MSComm．Output[=value]其中．Value參數(shù)表示一串要寫入到發(fā)送緩沖區(qū)中的字符。Input屬性從接收緩沖區(qū)中返回一串?dāng)?shù)據(jù)，它在設(shè)計(jì)階段是無(wú)效的，在運(yùn)行階段也只能讀。InputMode屬性值決定著Input屬性接收的數(shù)據(jù)類型。實(shí)例用于接收和發(fā)送不定長(zhǎng)數(shù)據(jù)包，該儀器的通信協(xié)議如下。設(shè)置：16 500。設(shè)置：512。設(shè)置：19 200，n，8，1編寫代碼在窗體中加入一個(gè)組合框控件，名稱為Comboport，用于選擇設(shè)置通訊端口。實(shí)現(xiàn)的界面如圖57所示。這樣“TESTU “的8bit編碼為D4E2940A02。這個(gè)函數(shù)主要應(yīng)用到VB自帶的一個(gè)格式轉(zhuǎn)換函數(shù)：ChrW（）將中文轉(zhuǎn)換為Unicode碼。 ChrW(CInt(Val(temp)))　Next i End Function 短信中心手機(jī)號(hào)碼的PDU串轉(zhuǎn)換函數(shù)　　同上，為了發(fā)送以PDU模式發(fā)送短消息，必須將手機(jī)號(hào)碼和對(duì)方手機(jī)號(hào)碼也轉(zhuǎn)換為PDU格式，下面的函數(shù)就是為了實(shí)現(xiàn)這種轉(zhuǎn)換：Public Function telc(num As String) As String　Dim tl As Integer　Dim ltem, rtem, ttem As String　Dim ti As Integer　ttem = 　tl = Len(num)　If tl 11 And tl 13 Then　　MsgBox wrong number. amp。 ltem　Next ti　telc = ttem End Function 　　手機(jī)號(hào)碼有兩種表示方法：11位和13位（帶國(guó)家碼86），一般手機(jī)發(fā)送時(shí)都是以13位形式表示的，所以以上的函數(shù)還有一個(gè)功能是自動(dòng)將11位格式手機(jī)號(hào)碼轉(zhuǎn)換為13位形式，然后再轉(zhuǎn)換為PDU串。 psmsc amp。 leng amp。短信的發(fā)送需要將待發(fā)送的短信內(nèi)容轉(zhuǎn)換為Unicode碼，而短信的接收則需要將接收到的Unicode碼轉(zhuǎn)換成中文字符。 stemp　Next si　ascg = Trim(ascg)End Function 短信接收函數(shù)相對(duì)于短信的發(fā)送函數(shù)而言，短信的接收相當(dāng)簡(jiǎn)單，只需要以下的三行代碼就完成了。unicode轉(zhuǎn)換變量Dim vv(1) As Byte 39。0dDim ert(0) As ByteDim biaiDim byu(5)Dim c_cDim mmaDim cedDim reahDim rucDim TOOP(2)Dim opDim biaoDim opqDim read‘結(jié)束按鈕39。39。39。39。39。39。39。39。39。39。關(guān)閉通信端口39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。判斷目標(biāo)碼是否是4 = adv = 86 amp。 Mid(bb_b, a, 2) = weqa = a + 1NextEnd If = vvEnd Sub‘清除按鈕Private Sub Command2_Click() = = End Sub39。39。39。39。39。39。39。39。39。39。打開(kāi)通信端口，通信端口的參數(shù)也可以在此指定之后39。39。39。39。39。39。39。39。39。39。HFDvv(0) = amp。HDert(0) = amp。39。39。39。39。39。39。39。39。39。定時(shí)器的Timer事件程序39。39。39。39。39。39。39。39。39。39。39。 Hex(inbyte(i))End IfNext ircu = InStr(ruc, 0D0A)If rcu 2 Thenread = Left(ruc, rcu 1)Call curuc = Right(ruc, Len(ruc) rcu 3)End IfEnd SubPublic Sub cu()g = Len(read)GC = InStr(read, 433E) 39。h amp。 (Mid(gg, v, 2)))v = v + 1Nextread = Right(read, Len(read) GC 3)gg = aFor a = 1 To Len(read)cc = cc amp。中文信息a = a + 3NextElseFor op = 1 To Len(read)gg = gg amp。 gg amp。39。39。39。39。39。39。39。39。39。39。中文處理成Unicode碼39。39。39。39。39。39。39。39。39。39。39。 Hex(AscW(b_b))ElseIf biai 4 Thenbiai = 4End Ifbbb = Hex(AscW(b_b))End Ifbb_b = bb_b amp。 最終達(dá)到的結(jié)果 本次設(shè)計(jì)成功的利用了VB來(lái)開(kāi)發(fā)了一套實(shí)現(xiàn)短信息收發(fā)功能的信息系統(tǒng)，能夠通過(guò)PC機(jī)接收和發(fā)送短信。此次設(shè)計(jì)基本上達(dá)到了預(yù)期的目的，實(shí)現(xiàn)了其基本的功能。VB是一個(gè)面向?qū)ο蟮目梢暬O(shè)計(jì)與面向?qū)ο蟮恼Z(yǔ)言相結(jié)合的集成開(kāi)發(fā)環(huán)境。畢業(yè)設(shè)計(jì)的順利完成使我獲得很多平時(shí)沒(méi)有學(xué)到的知識(shí)。鑒于我的水平有限，難免存在一些錯(cuò)誤和漏洞，望各位老師不吝賜教，在此向大家表示忠心的感謝。經(jīng)過(guò)此次畢業(yè)設(shè)計(jì)，使我對(duì)無(wú)線通信和無(wú)線自動(dòng)控制方面的知識(shí)有了很深的理解。致謝本次論文的完成，首先感謝母校——西南石油大學(xué)的辛勤培育，感謝電子信息工程學(xué)院給我提供了很好的環(huán)境，并非常感謝我的指導(dǎo)老師焦培林老師和輔導(dǎo)老師呂金萍老師耐心的指導(dǎo)和諄諄教誨。此次設(shè)計(jì)不僅僅是一個(gè)應(yīng)用程序編寫的過(guò)程，更重要的是在系統(tǒng)的分析和設(shè)計(jì)階段所做的工作。
功能實(shí)現(xiàn)演示如下:打開(kāi)短信息收發(fā)界面如圖所示。在調(diào)試時(shí)可以提供斷點(diǎn)，來(lái)逐步檢查一段一段的程序，這對(duì)龐大的系統(tǒng)程序非常有用，當(dāng)有錯(cuò)誤時(shí)光標(biāo)將移動(dòng)到錯(cuò)誤行以方便調(diào)試，就這樣直到全部程序無(wú)錯(cuò)誤。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。 Chr(13) amp。h amp。h amp。 Chr(amp。處理英文If gd 2 Thengg = Left(read, gd 1)For v = 1 To Len(read)a = a amp。 0 amp。39。39。39。39。39。39。39。39。39。程序檢查輸入緩沖區(qū)中是否有數(shù)據(jù)，若有數(shù)據(jù)39。39。39。39。39。39。39。39。39。39。39。HAav(0) = amp。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。電話號(hào)碼End IfIf biai 4 Then = bb_bElseFor a = 1 To Len(bb_b)weq(0) = amp。判斷發(fā)送中文End If = ac 39。39。39。39。39。39。39。39。39。39。使用命令按鈕控件39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。刪除符Dim av(0) As By