VB6.0結合Access2003制作交叉配血軟件

李亞寧

甘肅省平涼市涇川縣人民醫院，甘肅平涼 744300

交叉配血是醫院血庫最重要的工作之一，以往使用傳統的手工方法進行交叉配血申請單相關信息的登記、報告單填寫、資料統計和信息查詢，工作量大、報告單不夠整潔規范、查詢統計不便。筆者結合我院實際情況，用access2003作為數據庫，以VB6.0作為開發平臺，開發制作了交叉配血軟件，解決了手工法存在的種種問題，現報道如下。

1 設計數據庫

①打開Microsoft Access2003，新建一個名為“臨床用血”的數據庫[1]。

②根據實際需求，在“交叉配血”數據庫中建立“操作員”、“患者信息”、“配血”等數據表。

2 設計程序

打開Visual Basic 6.0，新建一個名為“交叉配血”的新項目。

2.1 設計界面

在VB6.0“交叉配血”項目內根據軟件功能需要設計“登陸”、“臨床用血管理”、“臨床用血交叉配合試驗”、“存根打印時間設置”、“用血統計”、“操作員維護”、“更改密碼”等7個界面[2]。

“登陸”界面用于進入本軟件，界面設置了用戶名選擇下拉列表框和密碼輸入文本框，如用戶名或密碼輸入不正確，則不能進入軟件，避免非法登陸保證數據安全。

“臨床用血管理”是軟件的主界面，其上設置了6個圖片框，用戶單擊其它圖片進入相應的界面，實現相應功能，單擊“退出”圖片退出軟件，如圖1所示。

圖1 “臨床用血管理”界面圖

“臨床用血交叉配合試驗”界面用于患者信息、血液制品信息、交叉配血試驗結果的錄入、編輯修改、查詢、交叉配合報告單打印和交叉配合記錄單打印。為了便于使用、減少錄入差錯、提高工作效率，考慮到交叉配血試驗的工作實際情況，界面設計時充分利用VB6.0提供的下拉列表框、ABODC等控件的功能。如性別、血型、血液制品類型等有固定格式內容的信息可以通過鼠標、箭頭鍵選擇錄入。大多數情況下患者所受血液制品ABO血型及RH（D）血型和患者相同，交叉配血試驗結果為“無溶血無凝集”，因此，通過編寫代碼使本界面中患者ABO血型及RH（D）血型選擇錄入后血液制品相關內容自動輸入，試驗結果自動輸入“無溶血無凝集”，如有不符可以修改。界面提供了每次試驗最多6個血液制品的試驗能力，滿足大容量交叉配血試驗要求。界面如圖2所示。

圖2 “臨床用血交叉配合試驗”界面圖

“存根打印時間設置”界面用于選擇打印SOP文件要求的臨床輸血記錄的時間段，在界面上選擇開始時間和結束時間后單擊“確定”按鈕即可打印所需時間段內臨床輸血記錄，界面如圖3所示。

“用血統計”界面用于統計血液制品用量、輸血人次、血費等日常統計工作，如圖4所示。

“操作員維護”界面用于添加、修改和刪除操作員工作。

“更改密碼” 界面用于維護操作員密碼。

圖3 “存根打印時間設置”界面圖

圖4 “用血統計”界面圖

圖5 “交叉配合報告”報表圖

圖6 “臨床輸血記錄”報表圖

2.2 數據綁定

以上界面在設計過程中，根據需要將VB6.0 ADODC控件數據源設置為access 2003“交叉配血”數據庫相應的數據表，再設置界面上各控件的數據源，完成數據綁定。

2.3 設計報表

在VB6.0“交叉配血”項目內根據軟件功能需要設計“交叉配合試驗報告”、“臨床輸血記錄”和“用血統計”3個報表，打印效果分別如圖5，圖6，圖7所示。

2.4 調試打包

完成數據庫、界面和報表設計工作后，反復進行調試修改直至符合軟件設計要求，利用VB6.0“打包和發布向導”對軟件打包。

3 總結

經過3年多時間使用，本軟件在Windows XP、Windows 2000下運行情況良好，具有軟件體積小、占用系統資源少、運行速度快、使用簡便等特點，提高了工作效率和工作質量，符合臨床血庫工作信息化發展方向。交叉配血是血庫工作的一部分，開發包括交叉配血功能在內的可管理整個血庫工作的計算機軟件是今后的發展方向。

[1] 求是科技編著.Visual Basic 6.0程序設計與開發技術大全[M].北京：人民郵電出版社，2004：122-224.

[2] [美]Cary N.Prague，著.趙傳起，葉卓映，郭軍，等譯.中文版Access 2003寶典[M].北京：電子工業出版社，2004：39-74.