【正文】 t I? Susan chirped. Yves feigned interest, but his face let him down. Susan swit。s rail and looked about as happy as someone being seasick. Why so glum? Susan39。ll see you again before we disembark. By the way, better alter your watchesit39。s expandable throat pouch. Pelicans use their elastic bills as scoops, Ben explained. And they vary the height of their dive depending on the depth of the fish. Eat two pounds a day, those fellas, a quarter of their body weight. The bird came in to land on an old jetty. Now it looked clumsy, swaying and teetering down invisible steps to alight on flat webbed feet. Soon after, a dishevelled chick was r ummaging in the adult39。s in the niies on the mainland. They chatted for a minute or two. Look, there39。s neck. Fumbling, she adjusted the focus. She wanted to see everything. Susan gave a little grunt of pleasure: white sand, palm trees, high hotels whose reflecting w indows signalled like lighthouse s, elegant yachts leaning on the wind and bing creamily through the smooth blue water. Blue! The sea was so blue! Travel brochureblue. Susan gazed in wonder. Could this be the same Atlantic whose grey green waves had made her stomach churn and driven her into her bunk? She handed back Gary39。 2 As Alexander went off duty he noticed the bobbing flicker of ships39。 2 系統(tǒng)中的每一個(gè)窗口與前面大同小異，只要按照步驟操作就行。 圖 14 藥品維護(hù)圖 2 2）查詢功能的窗口 查詢中一個(gè)醫(yī)院不可缺少的一部分，無(wú)論是醫(yī)生還是病人都有這樣的需求，查詢時(shí)，主要實(shí)現(xiàn)了各表的顯示 ,只要輸入要查詢的相關(guān)字段，便會(huì)顯示你要的信息。 2 圖 12 藥品維護(hù)圖 在以上界面的前提下，當(dāng)你單擊增加庫(kù)存按扭，就會(huì)出現(xiàn)如下界面，在窗口中填入相應(yīng)的數(shù)據(jù)，數(shù)據(jù)便會(huì)在數(shù)據(jù)庫(kù)中生成。 藥品維護(hù) 圖 `10 藥品維護(hù)對(duì)話框 在以上界面的前提下，當(dāng)你單擊新增藥品按扭，就會(huì)出現(xiàn)如下界面，在窗口中填入相應(yīng)的數(shù)據(jù)，數(shù)據(jù)便會(huì)在數(shù)據(jù)庫(kù)中生成。 圖 7 設(shè)置收據(jù)號(hào)對(duì)話框 計(jì)價(jià)收費(fèi) 1）收費(fèi) 完成一開始的操作后，接下來(lái)是一些具體的操作 圖 8 門診收費(fèi)對(duì)話框 此窗口是醫(yī)院門診中最主要的窗口，一個(gè)病人都需要經(jīng)過(guò)這一步驟，首先在病案類型、病案號(hào)、患者姓名等中填入相關(guān)的信息，若是 新病人，將在下面在填入此病人治療的相關(guān)信息，完成后將在總金額處出現(xiàn)總價(jià)格。 2 圖 6 系統(tǒng)用戶登錄對(duì)話框 在圖 6 所示的對(duì)話框中，選擇用戶名并輸入口令后，系統(tǒng)會(huì)自動(dòng)驗(yàn)證選擇或輸入的用戶名和口令的正確性，如果用戶名和密碼錯(cuò)誤，則系統(tǒng)提示用戶重新輸入。 二、快 速入門 — Micsoft SQL Server— 服務(wù)管理器 — Micsoft SQL Server— 企業(yè)管理器 — 數(shù)據(jù)庫(kù) — 所有任務(wù) — 附加數(shù)據(jù)庫(kù) — 直到添加成功 2 圖 1 — 設(shè)置 — 控制面版 — 管理工具 — 數(shù)據(jù)源 — 按下一步 — 直到測(cè)試成功 圖 2 2 圖 3 圖 4 2）運(yùn)行過(guò)程 該系統(tǒng)運(yùn)行時(shí) ,首先彈出所示的主界面，可以選擇你想進(jìn)行的操作。此外可以完成一些系統(tǒng)管理功能，包括數(shù)據(jù)庫(kù)初始化、系統(tǒng)用戶權(quán)限設(shè)置和系統(tǒng)用戶管理等。它的設(shè)計(jì)宗旨是操作簡(jiǎn)便、界面友好，軟件運(yùn)行基于 C/S 模式，選用目前使用最廣泛的可視化編程語(yǔ)言 VB 作為開發(fā)環(huán)境。有了本使用手冊(cè)便可以輕松學(xué)會(huì)使用醫(yī)院門診管理系統(tǒng)，并且真正的掌握如何使用本軟件為企業(yè)信息化建設(shè)服務(wù)。 無(wú)論對(duì)初學(xué)者還是熟悉計(jì)算機(jī)的人士，本使用手冊(cè)均適用。 2 參考文獻(xiàn) [1] 黃梯云 . 管理信息系統(tǒng) [M]. 北京 :高等教育出版社 ,2021 [2] 薛華成 . 管理信息系統(tǒng) [M].3. 北京 :清華大學(xué)出版社 [4] 張金城 . 管理信息系統(tǒng) [M]. 北京 :北京大學(xué)出版社 [5] 羅超理 , 李萬(wàn)紅 . 管理信息系統(tǒng)原理與應(yīng)用 [M]. 北京 :清華大學(xué)出版社 [6] 朱順泉 , 姜靈敏 . 管理信息系統(tǒng)理論與實(shí)務(wù) [M]. 北京 :人民郵電出版社 [7] 史嘉權(quán) . 數(shù)據(jù)庫(kù)系統(tǒng)基礎(chǔ)教程 [M]. 北京 :清華大學(xué)出版社 1999 [8] Ann Majchrzak, Cynthia , Ricardo , Wynne . Management client dialogue during information systems design to facilitate client learning [J]. MIS Quarterly , 2021,29(4): 653667. [9] Lisa M. Ellram, Bernard J. La Londe, Mary Margaret Weber. Retail logistics[J]. International Journal of Physical Distribution amp。 2 致謝 三年的大學(xué)生涯即將結(jié)束，借此機(jī)會(huì)向三年來(lái)關(guān)心過(guò)我，幫助過(guò)我得老師，同學(xué)們表示深深的謝意！ 特別要感謝我的導(dǎo)師沈卓芹老師，感謝她在系統(tǒng)設(shè)計(jì)和任務(wù)安排上長(zhǎng)時(shí)間的指導(dǎo)，從開始設(shè)計(jì)數(shù)據(jù)庫(kù)到最后的完成整體設(shè)計(jì)，以及論文的撰寫完畢，都給予了極大的幫助。 但是由于時(shí)間倉(cāng)促，加上水平有限，一開始沒(méi)有做好很好的需求分析，草草的設(shè)計(jì)了數(shù)據(jù)庫(kù)，現(xiàn) 在系統(tǒng)完成了回過(guò)頭去看一下，在數(shù)據(jù)庫(kù)設(shè)計(jì)過(guò)程中，還是存在許多不合理的地方。 SQL Server 以前學(xué)過(guò)，對(duì)數(shù)據(jù)庫(kù)的操作有初步掌握，此次畢業(yè)設(shè)計(jì)也使用 SQL Server 數(shù)據(jù)庫(kù)，這無(wú)疑增長(zhǎng)了我這方面的經(jīng)驗(yàn)，使我數(shù)據(jù)庫(kù)有了更深一步的了解與認(rèn)識(shí)，現(xiàn)在運(yùn)用起來(lái)比以前熟練了很多。此次所使用的 VB 對(duì)我來(lái)不是一門新的語(yǔ)言，但是操作起來(lái)還是有些困難，現(xiàn)在我對(duì)它已經(jīng)有了一定的了解?？偨痤~是指表格中所有數(shù)據(jù)的合計(jì)金額，計(jì)算它時(shí)應(yīng)該將計(jì)算語(yǔ)句寫在 FOR?? NEXT 循環(huán)語(yǔ)句里。賦值給 MS1 表格 If = 4 Then (, 6) = Val((, 4)) * Val((, 5)) = True = True = True = True = True End If If = 5 Then (, 6) = Val((, 4)) * Val((, 5)) Dim A As Single For i = 1 To If (i, 1) Then A = Val((i, 6)) + A 39。text1 獲得焦點(diǎn) End If 3. 自動(dòng)計(jì)算收費(fèi)項(xiàng)目金額和總金額 計(jì)算收費(fèi)項(xiàng)目金額和總金額應(yīng)該在 Text1_Change 事件下完成的。賦值給 MS1 表格 (, 3) = Trim(.Fields(品名 )) (, 5) = Format(.Fields(零售價(jià) ), ) End With = 3 = = False End If If KeyCode = vbKeyEscape Then 39。 在 GRIDYP 表格的 KEYDOWN 事件下，當(dāng)用戶按下（ ENTER）鍵時(shí)，將 GRIDYP表格中的藥品信息賦給 MS1 的各個(gè)單元格。 If 0 Then = True Else = False Txt1(3).SetFocus End If End If 2. 將表格中的數(shù)據(jù)顯示在 MS1 表格中 藥 品信息或診療項(xiàng)目信息被檢索出來(lái)后，將顯示在 DATAGRID 表格中。+39。代碼如下： If KeyCode = vbKeyReturn And Index = 2 Then = select * from 科室信息表 where 拼音碼 like + 39。在“就診科室”文本框中，當(dāng)用戶輸入一個(gè)拼音簡(jiǎn)碼或全 輸，按（ ENTER）鍵后系統(tǒng)自動(dòng)檢索與其相匹配的科室信息，并顯示在科室信息列表中。完成這一功能，只需要在每個(gè)控件的 KEYDOWN 事件下輸入下一個(gè)控件獲得焦點(diǎn)代碼即可。用戶每錄入完一個(gè)項(xiàng)目后 ，系統(tǒng)應(yīng)該自動(dòng)將焦點(diǎn)放到下一個(gè)控件上。 1. 數(shù)據(jù)錄入過(guò)程 按 （ ENTER） 鍵使控件自動(dòng)獲得焦點(diǎn)。其代碼不不介紹。 BorderStyle 0flexBorderNone 2 GridLines 0flexGridNone GridLinesFixed 0 flexGridNone RowHeightMin 1 具體功能實(shí)現(xiàn) 此系統(tǒng)中最主要的是計(jì)價(jià)收費(fèi)系統(tǒng)，這里就計(jì)價(jià)收費(fèi)進(jìn)行詳細(xì)介紹。 BackColorFixed amp。 BackColorBkg amp。 BorderStyle 0flexBorderNone GridLines 1flexGridFlat GridLinesFixed 2flexGridFlat RowHeightMin 1 MSHGrid2 AllowUserResizing 3flexResizeBoth MSHFlexGrid MSHGrid2 Appearance 0flexFlat BackColor amp。 BackColorFixed amp。 BackColorBkg amp。 表 對(duì)象 名稱 屬性 屬性設(shè)置值 MSHFlexGrid MSHGrid1 AllowUserResizing 3flexResizeBoth Appearance 0flexFlat BackColor amp。 數(shù)據(jù) 自動(dòng)存儲(chǔ)， 只要置 Edit字段的 name 屬性為字段名， Tag 置 0，非庫(kù)字段值置 1。 3. 數(shù)據(jù)庫(kù)控件統(tǒng)一用 ADOQuery, 取名 Query + 表名。在工程中的一些規(guī)定 ： 1. Form 取名 Frm + 標(biāo)識(shí)名， 標(biāo)識(shí)名一般取表名。例如：任艷的拼音簡(jiǎn)碼為 RY 性別 varchar 2 職稱 varchar 10 職務(wù) varchar 10 聯(lián)系電話 varchar 20 所在科室 varchar 20 兼職科室 varchar 20 表 科室信息表 字段名稱 字段類型 字段大小 說(shuō)明 科室編號(hào) varchar 2 由兩個(gè)數(shù)字組成，不允許為空，例如： 01 科室名稱 Varchar 20 科室簡(jiǎn)稱 Varchar 10 科室名稱的簡(jiǎn)寫 拼音碼 Varchar 10 取每 個(gè)漢字拼音的第一個(gè)字母，然后進(jìn)行組合 科室電話 Varchar 20 科室類型 Varchar 4 主要包括臨床和醫(yī)技 表 藥品信息表 字段名稱 字段類型 字段大小 說(shuō)明 藥品編碼 varchar 7 由 7 位數(shù)字組成，不允許為空，例如