【正文】 ll take us thirty minutes I know. Move! She caromed off the viewport and into her seat, reached for her microphone. All hands. Emergency status. Depressurization alert. E vacuate the carousel. Acceleration stations. Strap in. She slammed the alarm button with her left hand and heard the eerie hooting begin in the room behind her. She glanced to her。ve got to he out of your mind. They first assumed a long, elliptical orbit with a low point 200 kilometers above the theoretical radius of Themis. It was a mathematical abstraction because the orbit was tilted thir ty degrees from Themis, equator, which put them above the dark side. They passed the spinning toroid to emerge on the sun side. Themis lay spread out before them as a na kedeye object. Not that there was a lot to see. Themis was nearly as black as space, even with the sun shining on it. She studied the huge mass of the wheel with the triangular solar absorption sails rimming it like sharp gear teeth, presumably soaking up sunlight and turning it into heat. The ship moved over the interior of the great wheel. The spokes became visible, and the solar reflectors. They seemed nearly as dark as the rest of Themis, except w here they mirrored some of the brighter stars. The problem that still worried Cirocco was the lack of an entrance. There was a lot of pressure from Earth to get into the thing, and Cirocco, despite her cautious instincts, wanted to as badly as anyone else. There had to be a way. No one doubted Themis was an artifaI think The docking facilities! Cirocco yelled. They39。t look up at it. Gaby, don39。clock position, approaching Saturn. No one spoke as the sun drew nearer to eclipse. They saw Saturn39。ll send up the prelims for a correcting burn when we e out from behind. Meanwhile, I39。 參考文獻(xiàn) 1.《數(shù)據(jù)庫(kù)系統(tǒng)原理與應(yīng)用》 閃四清 清華大學(xué)出版社 1999 年 2.《 Visual Basic 程序設(shè)計(jì)》 劉世峰 中央廣播電大出版社 2020 年 3.《 Visual Basic 程序設(shè)計(jì)》 陳 明 中央廣播電大出版社 2020 年 4.《軟件工程》 楊文龍 電子工業(yè)出版社 2020 年 5.《管理信息系統(tǒng)》 薛華成 清華大學(xué)出版社 1996 年 observing time of the whole fucking trip, Gaby muttered. In the seat next to Cirocco, Bill laughed. Five minutes, Gaby, he said. And I really think we ought to let them burn as long as we planned. It would work out so much nicer that way. The engines shut down on the tick and they watched for final confirmation that they were where they wanted to be. This is Ringmaster。 但是由于畢業(yè)設(shè)計(jì)時(shí)間較短，所以該系統(tǒng)還有許多不盡如人意的地方，比如聯(lián)機(jī)文檔比較少，用戶界面不夠美觀，出錯(cuò)處理不完善等多方面問題。 因此，在本次的畢業(yè)設(shè)計(jì)中，為搞清控件的使用 方法、編程的各個(gè)難點(diǎn)、掌握面向?qū)ο蟮木幊趟枷?，本人查過相關(guān)的教材、查詢過相關(guān)的網(wǎng)站、請(qǐng)教過指導(dǎo)教師。 第七章 設(shè)計(jì)心得 經(jīng)過二個(gè)多月的設(shè)計(jì)和開發(fā)，教師考核管理系統(tǒng)基本開發(fā)完畢。 數(shù)據(jù)庫(kù)的默認(rèn)路徑： \教師考核 .mdb 系統(tǒng)默認(rèn)用戶名、密碼： admin 6． 2運(yùn)行 環(huán)境 運(yùn)行環(huán)境： Windows 98 以上操作系統(tǒng)。 運(yùn)行界面： 實(shí)現(xiàn)過程： 第一步，創(chuàng)建 DataEnvironment1，并新建一個(gè)連接 Connection1。 第三步雙擊相應(yīng)的控件，在控件的相應(yīng)過程中編寫程序。 界面的設(shè)計(jì)如下： 第一步將所需的控件放到表單的相應(yīng)位置；方法：首先在“表單控件”工具欄先選中所需的控件圖件，然后在表單的恰當(dāng)位置上單擊鼠標(biāo)并拖動(dòng)鼠標(biāo)，即可把由所選取的控件生成的對(duì)象添加到表單上 ,如 上 圖： 包括的控件主要有：標(biāo)簽、文本框、命令按鈕、 DATA 等。 現(xiàn)將控件的相應(yīng)代碼說(shuō)明如下： 收入項(xiàng)目的 代碼分別如下： Private Sub Command1_Click() If = 新增 Then = 確定 = False = False = False Else = 新增 = True = True = True End If End Sub Private Sub Command2_Click() End Sub Private Sub Command3_Click() End Sub Private Sub Command4_Click() Unload Me End Sub 支出項(xiàng)目的 代碼同上 。 第二步，選擇窗體或控件進(jìn)行屬性設(shè)置， 先選取中需要設(shè) 置屬性的對(duì)象 ，然后 在屬性窗口里顯示了該控件對(duì)象的所有屬性、事件和方法。 Str(a b), , 系統(tǒng)統(tǒng)計(jì) End Sub 統(tǒng)計(jì)滿足條件的收入數(shù)、支出數(shù)、教師考核余額數(shù)，結(jié)果界面為： 5． 7輔助功能模塊的實(shí)現(xiàn) 下面主要以科研經(jīng)費(fèi)的收入項(xiàng)目和支出項(xiàng)目為例來(lái)進(jìn)行介紹。 b amp。 a amp。 表格用來(lái)存放查詢的結(jié)果。然后通過 = strQuery來(lái)進(jìn)行數(shù)據(jù)源更新。 39。 amp。 39。 amp。 39。 amp。 39。 amp。 39。 amp。 39。 amp。 39。 amp。 第三步雙擊相應(yīng)的控件，在控件的相應(yīng)過程中編寫程 序。 連接數(shù)據(jù)庫(kù) 數(shù)據(jù)庫(kù)中的何表 數(shù)據(jù)來(lái)源 對(duì)應(yīng)表中的字段 5． 6． 2 科研經(jīng)費(fèi)收支查詢模塊的實(shí)現(xiàn) 1．流程圖： 2．運(yùn)行界面： 3．實(shí)現(xiàn)過程： 第一步將所需的控件放到表單的相應(yīng)位置；方法：首先在“表單控件”工具欄先選中所需的控件圖件，然后在表單的恰當(dāng)位置上單擊鼠標(biāo)并拖動(dòng)鼠標(biāo)，即可把由所選取的控件生成的對(duì)象添加到表單上 ,如 上 圖： 包括的控件主要有：?jiǎn)芜x按鈕、文本框、命令按鈕、表格等。 \教師考核 .mdb。Data Source= amp。 \教師考核 .mdb。Data Source= amp。 \教師考核 .mdb。Data Source= amp。使用方法是首先通過 Adodc控件與數(shù)據(jù)庫(kù)相連，然后將各數(shù)據(jù)項(xiàng)與數(shù)據(jù)字段相連。如下圖： N Y 開始 增加刪除等操作 是否繼續(xù) 退出 第二步，選擇窗體或控件進(jìn)行屬性設(shè)置，如圖為日期文本框控件的屬性設(shè)置界面 : 其它屬性和控件的設(shè)置方法類似。 代碼詳 見程序。 第二步，選擇窗體或控件進(jìn)行屬性設(shè)置， 先選取中需要設(shè)置屬性的對(duì)象 ，然后 在屬性窗口里顯示了該控件對(duì)象的所有屬性、事件和方法。 第三步雙擊相應(yīng)的控件，在控件的相應(yīng)過程中編寫程序 。 = SQL If Then MsgBox 沒有此教師任課情況！ , , 提示 = select * from 任課情況 = False Else c = For n = 1 To c a = a + (總課時(shí)數(shù) ) Next = a End If End Sub 5． 5論文信息管 理模塊的實(shí)現(xiàn) 5． 5． 1 論文信息維護(hù)模塊的實(shí)現(xiàn) 流程圖： 運(yùn)行界面： N Y 開始 增加刪除等操作 是否繼續(xù) 退出 3．實(shí)現(xiàn)過程： 第一步將所需的控件放到表單的相應(yīng)位置；方法：首先在“表單控件”工具欄先選中所需的控件圖件，然后在表單的恰當(dāng)位置上單擊鼠標(biāo)并拖動(dòng)鼠標(biāo)，即可把由所選取的控件生成的對(duì)象添加到表單上 ,如 上 圖： 包括的控件主要有：標(biāo)簽、文本框、命令按鈕、組合框等。 bh amp。 = SQL If Then MsgBox 沒有該教師的情況！ , , 提示 = select * from 教師基本情況 = False Else bh = Trim() End If End If SQL = select * from 任課情況 where 教師編號(hào) = 39。 Trim() amp。 = SQL If Then MsgBox 沒有此編號(hào)的教師情況！ , , 提示 = select * from 教師基本情況 = False Else bh = Trim() End If End If If Then SQL = select * from 教師基本情況 where 教師姓名 = 39。 Trim() amp。 代碼如下： Private Sub Command1_Click() = = True If Then SQL = select * from 教師基本情況 where 教師編號(hào) = 39。 第二步，選擇窗體或控件進(jìn)行屬性設(shè)置， 先選取中需要設(shè)置屬性的對(duì)象 ，然后 在屬性窗口里顯示了該控件對(duì)象的所有屬性、事件和方法。 代碼同 。 第二步，選擇窗體或控件進(jìn)行屬性設(shè)置， 先選取中需要設(shè)置屬性的對(duì)象 ，然后 在屬性窗口里顯示了該控件對(duì)象的所有屬性、事件和方法。 39。 amp。 39。 amp。 39。 amp。 第三步雙擊相應(yīng)的控件，在控件的相應(yīng)過程中編寫程序。Persist Security Info=False = 任教班級(jí) End Sub 5． 3． 2 教師信息查詢模塊的實(shí)現(xiàn) 實(shí)現(xiàn)與數(shù)據(jù)庫(kù)的連接 實(shí)現(xiàn)與數(shù)據(jù)庫(kù)中的表的連接 流程圖： 運(yùn)行界面： 實(shí)現(xiàn)過程： 第一步將所需的控件放到表單的相應(yīng)位置；方法：首先在“表單控件”工具欄先選中所需的控件圖件，然后在表單的恰當(dāng)位置上單擊鼠標(biāo)并拖動(dòng)鼠標(biāo)，即可把由所選取的控件生成的對(duì)象添加到表單上 ,