基于VBA的腦卒中評分系統的設計與實現

李小剛 孟網兵 繆垚 梁峰寧 呂崇文 劉偉

摘要：信息技術的不斷發展，極大地提高了醫療服務水平，同時也提高了醫務人員的服務效率，減輕了負擔。傳統的腦卒中病人的隨訪評分記錄以紙質形式進行存檔，這種方式存儲的數據不能被直接提取、統計和分析，會造成嚴重的資源浪費。一般的腦卒中評分系統，是針對神經內科醫生的普遍需求，醫生難以針對自身的需求對系統進行修改。考慮到很多醫生大學有過VB學習經驗，采用ExceIVBA技術，綜合運用VBA的多種功能，以醫生作為用戶，設計并實現了腦卒中評分系統，并可對病人進行隨訪，界面簡潔實用，同時便于醫生對系統進行少量修改。

關鍵詞：腦卒中;評分系統;ExceIVBA

中圖分類號：TP311

文獻標識碼：A

文章編號：1009-3044（2019）34-0074-02

1 背景

腦卒中（“cerebral stroke”）又稱“中風”“腦血管意外”是一種常見的急性腦血管疾病。通過近期的大數據調查可以知道，其發病率高，發病年輕化，疾病變化快，致殘率及病死率高。所以早期診斷、縮短早期干預的時間、在最佳時間窗內給予正確治療是降低其病死率、致殘率的關鍵。而在中國乃至全世界范圍內，對于腦卒中一直缺乏有效的治療手段，目前認為預防是最好的措施。

因此，對腦卒中病人進行隨訪，使用腦卒中評價量表對患者進行評分并將其記錄下來，對于早期診斷、縮短早期干預的時間、在最佳時間窗內給予正確治療十分關鍵。所以，我們設計開發了腦卒中評分系統，一方面方便醫生對病人的神經缺損的程度進行評價，另一方面也可保存病人數據，用于科研。

2 ExceIVBA編程技術簡介

VBA，即Visual Basic for Applications，是基于Visual Basic的一種宏語言，是由微軟開發出來的一種自動化的編程語言，Office軟件中的Word、Excel、Access、Powerpoint都可以利用VBA技術來提高辦公效率。

VBA語言作VB家族成員，二者的結構較為相似，但是VBA需要一個應用程序作為主體才能運行，而VB則可以創建獨立的應用程序。VBA技術中，除了可以利用窗體與Excel表的交互，對象的屬性、方法、事件以及對象間的組合運用來完成相關任務，還可通過錄制宏來自動生成代碼，從而極大地提高辦公效率。

簡單地說，Excel VBA是依附于Excel程序的一種自動化語言，有多種用途，不僅可用于處理大型運算、操作工作簿與工作簿、信息錄入與存儲，還可開發專業程序。本系統綜合使用ExceIVBA的多種功能，用于開發腦卒中隨訪與評分系統。

3 腦卒中評分系統設計與實現

腦卒中評分系統是基于Excel VBA來設計與實現的。主要包括：登錄界面、主頁面、添加新患者界面、評分系統界面、記錄查詢界面、統計圖表界面、excel表界面、鏈接網址界面以及各個用戶窗體和模塊的設計。

3.1 登錄界面的設計與實現

界面設計簡潔實用，可供多名用戶使用，用戶的賬號和密碼保存在Excel表中。

新用戶需要注冊，注冊成功后，返回登錄界面，輸入用戶名和密碼即可進入系統的主頁面。關鍵代碼如下：

For i_2 To Worksheets（”密碼”）.Cells（l，7）.Value+1 7將用戶數放在密碼表gI（Cells（l，7））單元格中，添加新用戶就將數值加1

If TextBoxI.Text= Worksheets（”密碼”）.Cells（i，1） Then

If TextBox2.Text=""Then

MsgBox”請輸入密碼”

TextBox2.SetFocus

flag= False

End If

If flag= True And TextBox2.Text= Worksheets（“密碼”）.Cells（i，2） Then

TextBoxl.Text=""

TextBox2.Text=""

登錄界面.Hide

主頁面.Show

Exit For

End If

End If

Nexti

3.2 主頁面

主頁面為功能選擇界面，主要功能有修改密碼、添加新患者、評分、記錄查詢、鏈接網址。添加新患者功能的設計采用窗體和Excel表交互的方式，窗體用于輸入，Excel表用于保存數據。對于一名新的患者，需要通過基本信息、癥狀、并發癥、體征、日常生活、用藥、肢體功能恢復情況、轉診8個方面進行詳細的建檔。通過這個建檔，可以清晰地看到病人的各種基本狀況，并可將病人相關信息存入excel表。除此之外，還設置了格式化輸入，用戶只有再輸入了全部的必填信息后才可保存相關數據。

關鍵代碼如下：

If flag= True Then

On Error Resume Next

Worksheets（'病人信息記錄”）.Activate

選擇窗口中的單元格

Range（”al”）.Select

移動到窗口最底部

Selection.End（xIDown）.Select

移動到窗口最左邊

Selection.End（xIToLeft）.Select

將窗口的輸入值保存到窗口最后新建的一條記錄

ActiveCell.Offset（l， O）.Range（”A1”）=LTrim（TextBoxI.Text）

保存新用戶名到全局變量

p_name= TextBoxl.‘rext

在記錄查詢中，可以根據患者的姓名，手機號，住院號，門診號，然后輸入相對應的數據，可以確切地查到相對應的患者的信息，單擊列表框中查詢結果項后，則可自動跳轉到excel表中對應的病人信息。

3.3 評分系統

共選用5個常用權威量表，每個評分量表由三個板塊組成，即評分界面，評分結果界面和對應的Excel表格界面，各量表運行原理大致相同，以改良rankin量表為例來展示rankin評分。rankin評分是一種快速簡潔的評估方式，是現今最常使用的功能結局評估量表。它不僅可以與患者進行面對面直接評估，也可以通過電話隨訪進行遠程評估，對臨床試驗的結果有重大意義。

美國國立衛生院神經功能缺損評分（NIHSS）。由于NIHSS評分具有操作簡單、可靠性高、效率高的特點，已經成為AIS臨床診斷及臨床試驗評估體系的重要組成部分。它從意識、凝視、視野、面癱、上下肢運動、上下肢協調、感覺、語言、構音障礙、忽視十大方面對患者進行評估。

ADL量表。Barthel指數計分可以將ADL分為四級。生活基本自理、生活需要幫助、生活需要極大幫助、生活完全需要幫助。它從大便、小便、修飾、用廁、吃飯、移動、活動（步行）、穿衣、上下樓梯、洗澡這十大方面對患者進行測評。由于Barthel指數評定簡單、可信度高等特點，被廣泛應用于康復醫療方面。

SIS量表。SIS量表的目的是為了評價腦卒中影響健康與生活的程度，主要作為測評生存質量的工具，被主要應用于測量臨床腦卒中患者健康狀況。SIS量表從力氣、手功能、ADUIADL、移動能力、交流、情緒、記憶思維、參與這八個方面，59個小條目對患者進行評估。

MoCA評分。蒙特利爾認識評估（MoCA）是一種快速篩選輕度認知功能異常的評分工具。它評定不同認知領域，包括：視空間/執行能力、命名、記憶、注意力、語言、抽象能力、定向力。由于MoCa涵蓋認知領域廣、敏感度高、設計合理、更具針對性等特點，被國際廣泛推薦的篩查量表。

可以針對病人的不同量表的得分以及同一量表的不同時期的得分以統計圖表的形式進行展示，便于醫生及時掌握病人的狀況以及綜合各個量表的結論進行判斷。

為方便醫生使用，設置了超鏈接功能，可以通過鏈接進入權威卒中網站，如中國心腦血管疾病網，本思路也是基于本團隊對醫院的走訪和醫生的需求而設計的。

4 結束語

本系統使醫務人員在常用的Excel軟件或WPS軟件上能夠實現評分，對提高醫療服務水平、工作效率和節約成本等都有現實意義。鑒于傳統的紙質腦卒中評分和隨訪額諸多弊端，現有移動的腦卒中評分系統的缺點，以及Excel VBA具有開發速度快，窗口化制作，支持調用底層API、方便進行二次開發等特點，本團隊設計并實現了基于Excel VBA的腦卒中評分系統腦卒中評分系統，可以更好地幫助不同醫院的醫生了解患者的患病情況，提高醫生工作效率。

參考文獻：

[1]藺雪梅，王芳，王靜，等.RRE-90、ESRS和SPI-Ⅱ評分對缺血性腦卒中復發風險預測價值比較[J].陜西醫學雜志，2019，48（5）：599-602.

[2]安成東.北方地區急診老年腦卒中患者心理應激評分調查[J].中國老年保健醫學，2018，16（4）：90-91.

[3]崔子健.基于VBA的成績快速錄入系統的設計與實現[J].電腦知識與技術，2019，15（6）：49-51，58.

[4]劉柱鴻，黎鑫，彭元輝.基于Excel VBA的教學秩序督查報表管理系統設計與實現[J].軟件工程，2018，21（4）：45-48.

[5]蔣帥.基于Unity 3D的遠程醫療系統的設計與實現[D].北京：北京交通大學，2017.

【通聯編輯：謝媛媛】

收稿日期：2019-10-08

基金項目：江蘇省教育科學研究院課題，醫學生信息技術課程的教學改革與創新（項目編號：2017R57185）;徐州醫科大學高等教育教改研究課題，互聯網+背景下醫學生計算機課程教學改革研究（項目編號：xjy201723）

作者簡介：李小剛（1997-），男，河南鹿邑人，徐州醫科大學，2016級本科臨床醫學系;劉偉（1978-），男，通訊作者，副教授，徐州醫科大學醫學信息與工程學院，研究方向為醫學信息化技術、信息技術教育。