電腦程式設計技巧與維護
張仔志（遼寧省食品藥品檢驗所，瀋陽１１００２３）
摘要：介紹使用ｖｂ６．０語言編制的用於實驗室標準管理的應用程式，包括認證專案的查詢、檢測引數及標準檢測
方法的查詢、標準備案表的生成、符合國家計量認證申請書格式的申請書附表１和附表５的生成。資料庫使用ｍｉ—
資料庫系統。
關鍵詞：標準；計量認證；實驗室；資料庫
ｐｒｏｅｍ．
２￣［ａｎｇ
ｌ建立資料庫
本程式使用的資料資訊儲存在名為「標準管理」的資料庫中。因為資料量不是很大，資料庫使用數
附表５中的檢測專案的排列順序則同申請書附表１的認證專案一致。本程式還可以檢視所有現行有效標準所含的檢測參
數。據庫系統。為了管理上的方便，所有的**都儲存在乙個資料庫中。
標準管理資料庫中有食品舊表、食品新錶、食品舊表作廢標準、食品標準備案表、食品限制專案表、食品認證表、食品標準展開表、食品附表５共８個用於食品專業標準管理的**。因為本實驗室還從事日化產品檢測，因此，也有８個用於日化專業標準管理的**。區別只在於**名稱中分別冠以「食品「和「日化」字樣。
因為對食品和日化採用相同的管理方式，因此，只對食品相關的表作出說明。
食品舊表是指上級部門批准的計量認證證書附表內容，不包括新修訂的標準。食品作廢標準表是計量認證證書附表中所含的已經作廢的標準，食品標準備案表是新修訂的標準，實驗室需要到計量部門重新備案。食品新錶是從計量認證證
在這８個表中，食品舊表、食品新錶、食品限制專案表、
食品標準展開表是基本的**。食品作廢標準表、食品標準備案表、食品認證表、食品附表５由程式自動生成。
各個表中字段和選擇的排序欄位如表１所示。
表１各表中欄位名稱及排序字段
衰名食品舊襄食品新錶
捧謦字段
專案序號專案序號
欄位名稱
ｌ糞剮序號／類剮名稱／專案隅／專案名稱，擻統計，產品標準，限制擻
．食品作廢標黻ｉｄ食品標準備寮襄ｉｄ食品隈制夢敦表ｉｄ食品認證衰
ｍｉｄ／序號，標準雩／專案數／勞數名稱產品標準ｉｄｆ專案序號，專案名稱，引數統計產品標準／限制引數．
書附表中剔除作廢標準、增加新標準後而得到的**。
食品限制專案表是對有限制引數的標準進行展開，本程式能從食品新錶和食品限制專案表合併生成食品認證表，格式和計量認證申請書附表１大致相同。
食品標準展開表是對所有現行有效的標準按引數進行展開，由食品新錶和食品標準展開錶能生成食品附表５，用作下次計量認證申請書的附表５。食品標準展開表和食品附表５對同乙個標準來說雖然具有相同的格式，但是食品標準展開表中的排列可以是無序的，新增的標準可能排列在最後。食品本文收稿日期
—食品標準展開襄 ｉｄ食品跗衰５
ｉｄｉｄ／鸌目序號，產品標準，引數序號／引數名稱，方法
標準，儀器裝置名秘固！號，儀器裝置編號
ｌ項且序號，專案名稱，引數簪號，微名稱，方法標準，儀器裝置名稱型號，儀器裝置編號
２建立ａｄｏ資料來源
ｖｂ６．０的標準ｄａｔａ控制項不能直接使用以上版本建立的資料庫，必須將以上版本建立的資料庫轉換為ａｃｃｅｓｓ７．０以下版本才能使用。一般在程式開發的過程中，資料庫的結構也需不斷地調整，資料庫在高低版本之間來回轉換非常麻煩，因此使用標準ｄａｔａ控制項不很方便。ａｄｏｄａｔａ控制項能夠使用以上版本建立的資料庫，但需
６２一要通過ｏｄｂｃ資料來源管理器對資料來源進行配置。配置的方法很簡單，就是在控制麗版中找到ｏｄｂｃ資料來源管理器，建立ａｅｃｅｓｓ資料來源．本程式使用的資料來源名稱為
３標準變更查詢
標準變更查詢要用到兩個表，食品舊表和食品新錶。程式將兩個表進行比較，找出舊表中有而新錶中沒有的標準，生成作廢標準表，找ｈ｛新錶中有而舊表中沒有的標準，生成食品標準備案表。
在本窗體中共有６個ａｄｏ ｄａｔａ控制項，ａｄｏｄｅｊｂ的ｄａｔａ—
ｓｏｕｒｃｅ屬性設定為舊表，ａｄｏｄｃｘｂ的屬性設定為新
表，ａｄ（）ｄｅｚｆ的屬性設定為作廢標準表，ａｄｏｄｃｂａ的屬性設定為標準備案表，ａｄｏｄｃｚｆｌ的
屬性設定為作廢標準表的產品標準亨段，ａｄｏｄｅｂａ２的ｄａｔａ—
ｓｏｕｒｃｅ屬性設定為作標準備案表的產品標準字段
示作廢標準溼示備案標準。
在窗體中共有２８個文字框控制項，分成４組，各組分別和舊表、新錶、作廢標準表、食品標準備案表的字段對應．用於從舊表中將錄傳遞給作廢標準表，從新錶中將記錄傳遞給食品標準備案表，窗體中有４個命令按鈕．兩個用於食品、日化標準變更查詢的切換，兩個用於食品、日化標準變更的整理：為變更查詢的程式比較簡單，程式**從略：
４ 填充認證表
認證表是申清舯ｑ附表１，其形式和批准的計量認證專案
表大體相同一根據填寫要求．能檢測全部引數的認證專案，只填標準名稱和標準號即可
對於有限制引數的認證專案要
求根據標準對榆測引數進行展開。將帶有限制引數的標準單獨建立乙個表，稱之為限制專案表，限制專案表的內容和格式和標準展開表差不多，別很小。如果沒有特殊要求的話，也可以用標準展開表來牛成認證表？
在新錶中，能檢測全部引數的認證專案標記為全部引數，帶有限制引數的認證專案標記為部分引數程式通過對「部分引數」的識別來確定認、正表中的哪些認證專案需要展開．將新錶和限制專案表合成
為認證表
在填充認證表的窗儺中，共有３個ａｄｏ ｄａｔａ控制項，ａｄｏｄａｌａ控制項的ｄａｔａｓａｕｃｅ屬性分別設定為新錶、限制專案表和認證表，每個ａｄｏｄａｔａ控制項有繫結５個文字框控制項，用於記錄的傳遞，ｄａｔａｇｒｉｄ控制項用於屁示認證表。窗體中有４個命令按鈕，兩個』１ｊ於食品、日化兩個專業標準的切換，乙個用於返回主頁 ４個命令按鈕中最重要的是生成認證表的命令按鈕，
利用此按鈕町完成認證項｝ｊ表的填充工作。其程式如下：
一ｃｌｉｃｋ ０
認證表增加乙個記錄．以
防止下…步清空時睏無記錄而出錯
認證表的對應等於新錶的對應列
資料庫與資訊管理
刪除認證表所有記錄：
如果不是第乙個記錄繼續刪除，直到第乙個記錄
移動到新錶的第一條記錄
認證表的對應等於新錶的對應列
認證表記錄更新
部分引數」ｔｈｅｎ 如果發現」部
分引數」字樣向下進行，如未發現直接跳轉到２１５處：
ｊ＝０為了檢查是否「部分引數」項的標準得到新增
將新錶中標準名稱和標準號賦值給如果標準名稱和標準號等於ａ。向下進行，如果未發現直接跳轉到５８８
ｊ＝ｊ１
未展開」
ｇｏｔｏ ２１５
移到下一條記錄
如果不是最後乙個記錄繼續新增，直到最後
ｅｎｄ ｓｕｂ
５標準查詢
標準查詢主要是為了檢視每個標準中所包含的檢測專案，
是利用標準展開表按類別進行查詢的？雖然標準展開表中包含了查詢所需的全部資訊，可以單獨使用。但是，因為標準需要不斷更新，為了保證乙個質檢機構現行有效標準的唯一
性，只把新錶內容作為唯一性的依據，所以在查詢時要按新錶進行查詢標準展開表雖然同樣需要更新，但標準展開表
中舊標準的存在不影響標準的查詢：
在標準查詢窗體中，共有３個ａｄｏ ｄａｔａ控制項，ａｄｏｄｃ１和ａｄｏｄｃ２的屬性都設定為新錶，ａｄｏｄｃｃｘ的
（下轉到９ｌ頁）～６３
（１）序列介面程式
網路與通訊
序列接ｅｉ程式是ｄｓｐ通過１６ｃ２５５０向外部資料口進行資料接收、傳送的程式，目的是進行資料傳輸。此程式包括串列埠傳送接收程式及資料組織程式。傳送和接收通過中斷併發《ｉｔ
處理。整個串列埠傳送程式在主迴圈中呼叫。其模組的流程為：
傳送收到網路串列埠資料一開啟資料口一中斷傳送；
接收中斷接收一整理串列埠資料一發送到網路上去。傳送和接收邏輯流程如圖７所示。
ｎ（ａ）傳送服務程式流程（ｂ）接收服務程式漉程
圖８傳送與接收服務程式流程
參考文獻
［１】萬靜華，丁亞軍．乙太網控制器的嵌入式裝置網路互聯
（ａ）傳送流稃
（ｈ）接收流程
ｆｊ】．微控制器與嵌入式系統應用
【２】楊譁．實時作業系統ｕｃ／ｏｓ—ｉｉ下ｔｃｐ／ｉｐ協議棧的實現
ｆｊ］．微控制器與嵌入式系統應用
【３］王念旭，等．ｄｓｐ基礎與應用系統設計．北京：北京航空
航天大學出版社，２００１．
【４］郭向勇，吳光斌，趟胎濱．千兆位乙太網組網技術．北京：
電子工業出版社，２００２．
圖７傳送和接收邏輯流程
（２）網路通訊介面程式
網路介面程式是ｄｓｐ通過ｃｓ８９００ａ對系統的其他單元發
送命令和接收資訊的程式，目的是與系統的其他單元通訊，接收與傳送資料報和信令資料報：此程式包括網路資料接收程式、網路資料傳送程式、資料組織程式傳送與接收服務程式
流程如圖８所示。
４結語ｙ—■ｙ—
■ｙ一■作者簡介
給出了以ｄｓｐ為核心處理器的嵌入式系統硬體設計方法，
肖波，女（１９７ｌ一），講師，工學碩士，四川瀘州醫學院生物醫學系醫學工程技術教研室，研究方向：生物醫學儀器、單片
機及ｄｓｐ。
詳細地介紹了ｄｓｐ乙太網介面設計原理及過程。對嵌入式ｔｃｐ／ｉｐ在嵌入式系統上實現及實際應用作了分析並設計了ｄｓｐ的以太通訊程式，實現了基於ｄｓｐ的嵌入式系統與ｐｃ機
（上接第６３頁）
屬性設定為標準展開表，兩個約束資料組合控制項
的ｒｏｗｓｏｕｒｃｅ屬性分別設定為
器裝置名稱型號ｆｒｏｍ １３化標準展開表ｗｈｅｒｅ產品標準＝
．ａｄｏｄｃ１和屬性分別設定為檢測專案類別、檢測專案名稱。ｔｅｘｔ１的屬性設定為屬性設定為標準編號，用於顯示所選擇的認證專案的標準名稱和標準號的ｃｌｉｃｋ事件的程式**如下：—．
ｅｎｄ ｗｉｔｈ
ｅｎｄ ｓｕｂ
６生成申請書附表５
申請書附表５是儀器裝置（標準物質）及其檢定，校準一
化新表ｗｈｅｒｅ類別名稱＝」十
．覽表，要求將標準按引數展開，因此，乙個標準有多條記錄。為了使表附５中的標準和申請書附表１中的標準的順序保持
一致，且申請書附表１中的內容改變時能隨之改變，因此申由新錶確定標準，標準展開表將標準展開並提供每個引數所
請書附表５是通過將標準展開表和新錶進行組合後實現的。依據的方法標準和所使用的儀器。這一過程和標準查詢基本
相似。．
一在生成申請書附表５窗中，共有３個ａｄｏ ｄａｔａ控制項和ａｄｏｄｃ３的屬性分別設定
標準展開表、新錶和附表５。有４個命令按鈕，兩個用於食品、日化兩個專業標準的切換。乙個用於返回主頁，乙個用於生成附表控制項用於顯示生成後的附表５。
９１——
引數序號，引數名稱，方法標準，儀
VB程式語言重要演算法小結
一 變數值的交換 演算法思想 若交換兩個變數的值，必須引入第三個新的變數進行傳遞。以下 是錯誤的 x 12 y 34 x y y x 正確的 是 x 12 y 23 t x x y y t 二 判斷乙個數是否能被另乙個數整除 演算法思想 可以用整除的定義 餘數為0 或x除以y等於x整除y等表示式進行...
語言使用規範
濱海縣五汛鎮第二中心小學語言使用規範 為貫徹落實 中華人民共和國國家通用語言文字法 和 關於開展語言文字規範化示範校建立活動的通知 的內容和精神，自覺維護祖國語言的純潔和健康，推進校園語言文化建設，加強師生的素質修養。結合我校實際情況，制定語言文字使用規範化管理制度。一 推廣普通話工作制度 1 學校...
2023年VB語言期末考試卷
vb程式設計試題 學年第一學期期末考試試題 a卷 院系專業級考試科目 vb 任課教師簽名院系負責人簽名 要求 將所有題的答案寫在答題卡對應的題號上。答在試卷上不得分 1.選擇題 每小題2分，共30分 下列各題a b c d四個選項中，只有乙個選項是正確的。請將正確選項填在答題卡相應位置上，1 inp...