第一篇：VB順序設計

VB順序設計

教學目的：

1、熟悉結構化程序設計的三種基本結構及其特點。

2、掌握VB中順序設計常用的語法規則。教學重點：1、2、3、4、結構化程序設計方法概念的理解。Print方法的應用及格式特點。

VB中的賦值語句功能及特點。

VB中的inputbox()輸入函數及msgbox()輸出函數應用。

課時安排：

理論教學安排6課時，上機練習8課時

一、程序設計三大基本結構：

1、順序（按語句的書寫順序執行）

2、分支

3、循環

二、賦值語句 格式：

[let] 變量名 = 表達式 功能：

計算表達式的值，并把結果送給“=”左邊的變量。

Let a1=3*4---------語句執行后，變量a1的值為12 Let ab1=”你好”-------語句執行后，變量ab1的值為字符串“你好” 語句說明：

1、變量與表達式的數據類型必須一致。

2、“=”有方向性。需要動態理解

Let a1=a1+1-------將a1的當前值加1送給a1。語句執行后，a1的值自動累加1

3、VB中對象的屬性名等同于變量名。

Private Sub Command1_Click()Dim a As String, b As String Let a = Text1.Text Let b = Text2.Text Label1.Caption = a + b End Sub 上機練習： P47-49 例1到例3 P78 上機調試題1

產生隨機數公式：

Int(n*rnd)+1

用來產生1到n之間的隨機整數

1）2）定義變量（n,x1,x2,x3）

取得n值（通過文本框送值給n）

n=val(text1.text)3）產生x1,x2,x3三個隨機數 4）x1,x2,x3分別送給指定的標簽。

Dim n as integer,x1 as integer

Dim x2 as integer,x3 as integer

N=val(text1.text)

randomize X1=int(n*rnd+1): X2=int(n*rnd+1)

X3=int(n*rnd+1)

Label2.caption=x1

Label3.caption=x2

Label4.caption=x3

三、print方法

1、格式：

對象名.print [輸出項列表] 具體語句如下：

Form1.print 輸出項表

Picture1.print 輸出項表 例如：

Form1.Print “我的程序”, 23-------在窗體上顯示兩個數據項。Form1.Print “23+14=”, 23 + 14 Picture1.Print “我的圖片框”---------在圖片框上顯示一個數據項。Picture1.Print “23+14=”;23 + 14

2、功能：

在指定的對象上輸出結果。

注意：對象為窗體時，對象名可以省缺。

3、輸出項表的格式

（1）逗號分隔符---------輸出項以標準格式輸出。（輸出項之間有固定的間隔）

Print 1 Print “1”

‘兩行的輸出有區別。上一行輸出數值1，前面有符號位。而下一行輸出字符1，頂格顯示。Print 1, 2

（2）分號分隔符---------輸出項以緊湊格式輸出。輸出多個字符時，直接連接輸出。

輸出數值時，產生一個分隔位，用來將數據隔開。Print “1”;“2”;“3” Print 1;2;3 注意：print方法中，逗號與分號可以混用。Print “1”;“2”;“3”, 1;2;3 Print “1”;“2”;“3”, 1;2, 3（4）特殊的print語句

分隔符出現在print的末尾--------表示下一個print語句與本行的print在同一行顯示。Print “1”;A=2 Print “2”;“3”, Print 1;2;3

分隔符之間的數據項可以省缺。-------標準輸出時會產生更大的分隔空間。Print 1;;;2 Print 1;2

效果相同 Print 1, , 2 Print 1, 2

效果不同

空print語句---------產生換行或空行 Print 1,2, Print

‘功能為換行 Print 1,2,3 Print

‘功能為空行 Print 1;2;3（5）在print語句中使用定位函數

空格函數spc(n)-------在分號分隔符輸出項之間產生指定個數的空格。Print “中國”;”湖北”

print“中國”;spc(1);”湖北” print“中國”;spc(2);”湖北” print“中國”;spc(3);”湖北”

print“中國”;spc(4);”湖北”

列定位函數tab(n)-------在分號分隔符輸出項之間，指定隨后的輸出項的輸出位置。Print “中國”;”湖北” print“中國”;tab(10);”湖北” print“中國”;tab(12);”湖北”

print“中國”;tab(14);”湖北” print“中國”;tab(16);”湖北”

格式串輸出函數format(表達式，格式串)------常用于數值的輸出。上機練習： P51-54 例3.4,3.5 P79 上機調試2 Private Sub Command1_Click()Dim a As String a = Text1.Text Text1.Text = Text2.Text Text2.Text = Text3.Text Text3.Text = a End Sub

Private Sub Command2_Click()Text4.Text = Text1.Text & Text2.Text & Text3.Text End Sub

四、對話框的使用

1、輸入對話框 格式：

變量名=inputbox(“提示字符串”,”標題”，“默認值”，輸入框的位置坐標)

Private Sub Form_Click()Dim x As String x = InputBox(“請輸入你的姓名”)Print “你的名字是” & x End Sub

Private Sub Form_Click()Dim x As String x = InputBox(“請輸入你的姓名”, “姓名輸入框”)Print “你的名字是” & x End Sub 注意：

1）字符串的分行顯示

Chr(13)---------回車

Chr(10)---------換行

Print “你的名字是” & chr(13)& chr(10)& x------print 語句將產生兩行輸出效果。2）inputbox()的值是字符串。轉換成數值使用val()函數。

2、輸出消息框 格式：

變量名=msgbox(“提示串”，“對話框類型”，“對話框標題”)對話框類型如下：

x = MsgBox(“你的名字是” & x, 16, “姓名輸出框”)對話框類型值=按鈕值+圖標類型值+默認按鈕值 按鈕值：0，1，2，3，4，5 圖標類型值：16，32，48，64 默認按鈕值：0，256，512 注意： 1）2）例如：

MsgBox “你的名字是” & x, 49 + 256, “姓名輸出框” 上機練習：

1、P69 例3.8

2、P80 上機調試題7（1）msgbox “在這里顯示提示信息”，4，“請確認”

x= msgbox(“在這里顯示提示信息”，4，“請確認”)

?兩種語句格式均可，前一種無返值，后一種返回一個數值送給x變量。

（2）（3）msgbox “在這里顯示+chr(13)+chr(10)+提示信息”，3，“請確認” msgbox “在這里顯示+chr(13)+chr(10)+提示信息”，18，“請確認” Msgbox()的返回值為一個數值（也可以是符號常量），代表了不同的按鈕。Msgbox可以有無返值格式。結構如下： Msgbox “提示串”,”類型”,”標題欄”

Private Sub Command1_Click()MsgBox “歡迎” + Text1.Text, 68, “消息框” End Sub 系統登錄界面設計：

Private Sub Command1_Click()Dim a As Integer a = MsgBox(“歡迎” + Text1.Text, 49, “消息框”)If a = 1 Then Unload Me

‘用來卸載窗體,執行完后窗體1消失.Form2.Show

?顯示窗體,執行完后窗體2顯示.Else Text1.Text = “" Text2.Text = ”“ End If End Sub

小結順序程序設計：

一、程序結構語句

1、賦值語句

[let] 變量名=表達式

2、[let] 對象名.屬性=表達式 常用語句 1)end 2)rem(?)rem 這是我寫的程序 ‘這是我寫的程序

3、print方法

form1.print 輸出項表

picture1.print 輸出項表

重點：輸出項表的格式

1）2）標準分隔“,” 緊湊分隔“;”

3）定位函數spc(n),tab(n)

3、對話框

1）輸入對話框

變量名=inputbox(“”,“”，“”，??)2）消息框

變量名=msgbox(“”,“”，“”，??)msgbox“”,“”，“”，??

二、控件對象

1、對象的公共屬性

Name,caption,enabled(可用),visible（可見）

2、標簽（label）

常用屬性：label1.caption

事件：單擊，雙擊

3、按鈕（command）

常用屬性：

事件：單擊

4、文本框（text）

常用屬性：text1.text,passwordchar,??

事件：單擊,雙擊，change 上機練習： P79、上機練習5、6 上機練習5

Private Sub Cmd1_Click()Lab1.Visible = True Lab1.Caption = ”您已下達顯示命令！“ End Sub

Private Sub Form_Click()Cmd1.Visible = True End Sub

上機練習6 課本37頁（字符串函數）

1、求字符串長度len()-----求字符串的長度。

2、取子串函數

Left(字符串，n)-----從字符串左邊開始取n個字符組成新字符串。

right(字符串，n)-----從字符串右邊開始取n個字符組成新字符串。

mid(字符串，p,n)-----從字符串左邊開始數，第P個位置取n個字符組成新字符串。N可以省缺，表示取到字符串的末尾。

3、兩個字符相關的轉換函數

Chr(x)------求數值x對應的字符。

Asc(x)------求X字符對應的ASCII碼值 Private Sub Form_KeyPress(KeyAscii As Integer)‘窗體的按鍵事件。用戶按鍵盤激活事件。

Print ”輸入字符為：“;Chr(KeyAscii), ”ASCII碼為：";KeyAscii End Sub Private Sub Form_KeyPress(KeyAscii As Integer)‘將輸入的字符顯示在文本框內

Text1.Text = Text1.Text + Chr(KeyAscii)‘將文本框中已有的內容與本次輸入的字符連接作為文本框的新內容。End Sub 上機練習3 四位數（1000-9999）Int((9999-1000+1)*rnd+1000)產生一個四位隨機整數。數與字符串轉換函數：

Val(x)--------將X數據串變成數值。

Str(x)--------將數值x變成對應的數字串。

Trim(Str(x))-------先將x變成數字串再去掉兩邊的空格。Trim(x)用來去掉x兩邊的空格。假設s=3456: Val(right(s,1)+mid(s,3,1)+mid(s,2,1)+left(s,1))完成對s倒序過程。作業：

1、簡述VB中常用的標簽、按鈕及文本框控件的常用屬性及事件。

2、總結print方法中輸出項列表的格式。

3、P78三填空題（1）--（6）

第二篇：Vb設計實驗報告

Vb設計實驗報告

一、設計內容和目的

這次實驗設計，我做的是學生信息管理系統，主要功能是提供學生信息保存和查詢功能。

主要分為個窗口，其具體功能如下：

1、登錄窗口：提供學生和管理員登錄。

2、信息管理窗口：主操作窗口，可以進行重登陸、注銷、退出、用戶查詢、管理員管理、系統信息的操作。包括一個下拉菜單和工具欄。

3、用戶查詢窗口：可以查詢數據庫中保存的學生信息。

4、管理員管理窗口：只有管理員可以進入，顯示數據庫中所有的學生信息，并且可以添加修改。

5、系統信息窗口：是系統的信息內容。

另外，根據網上的代碼，我又制作了俄羅斯方塊小游戲和畫圖工具。

二、設計過程：

1、實驗構思：在系統設計之前，對實驗內容和結構的構思占據了相當一部分時間。最終決定做一個“學生信息管理系統”，這樣比較貼近自身情況，也有比較多的內容可以設計。

2、技術實現：在制作過程中主要使用了vb2005和數據庫技術實現系統的設計、實現和運行。Photoshop等技術使程序的界面看起來更加友好。

3、運行調試：在系統制作中的運行調試過程中，出現了很多問題，比如各窗口之間的調用和訪問，如何退出，控件的背景設置、字體顏色設置等，都需要經過一遍遍的調試發現、解決。

4、系統打包：在打包的時候，我按照老師給的方法一步步設置，可是由于粗心等原因，總是達不到滿意的效果，直到第三次才真正成功。

三、系統結構：

如一所述，系統分為5個模塊，各個模塊之間可以自由訪問。

四、實驗結果： 該系統能夠提供學生和管理員兩種類型的登錄，可以實現學生信息的查詢、管理員對信息的修改，等。

五、設計心得：

在設計過程中，遇到了許多困難，比如：數據庫無法連接、窗口無法正常訪問、控件背景與窗體背景不協調等。后來通過查看課本和訪問網絡將這些問題解決了。

在這個過程中，我深深體會到大作業的用意：將所學理論知識用于實踐。正是因為這樣，許多理論上的知識才能真正得到理解。處理問題的過程，也就是學習的過程。背課本何其簡單，真正的能力卻是將課本運用到實踐中去！

第三篇：vb綜合性設計實驗報告

綜 合 性 實 驗

實 驗 名 稱: 用vb編寫簡單計算器 專 業 班 級: 土 木 工 程 0901班 學 生 姓 名： *** 學 號： ********* 指 導 教 師： *** 需求分析

該計算器程序是在Visual Basic6.0環境下編寫，編寫完成后在Windows xp下運行，通過初步測試，發現該計算程序能完成整數的加，減，乘，除四種運算。通過在虛擬鍵盤上用鼠標點擊輸入第一個數，然后點擊運算符，再輸入第二個數，最后點擊“=”就會在計算器上方的文本框中輸出結果，清空文本框進行下次運算。經過仔細測試發現，該計算器最高支持五位整數的運算，在除法運算中能精確到小數點后14位。運行環境

WINDOWS XP系統；VB6.0；

3開發工具和編程語言

開發工具：Visual Basic6.0 “微型整值計算器”程序編寫代碼：

Dim op1 As Integer Dim op2 As Integer Dim operator As String

Private Sub Command1_Click()

Text1.Text = Text1.Text & “1” End Sub

Private Sub Command2_Click()

Text1.Text = Text1.Text & “2” End Sub

Private Sub Command3_Click()

Text1.Text = Text1.Text & “3” End Sub

Private Sub Command4_Click()

Text1.Text = Text1.Text & “4” End Sub

Private Sub Command5_Click()

Text1.Text = Text1.Text & “5” End Sub

Private Sub Command6_Click()

Text1.Text = Text1.Text & “6” End Sub

Private Sub Command7_Click()

Text1.Text = Text1.Text & “7” End Sub

Private Sub Command8_Click()

Text1.Text = Text1.Text & “8” End Sub

Private Sub Command9_Click()

Text1.Text = Text1.Text & “9” End Sub

Private Sub Command11_Click()Text1.Text = Text1.Text & “0” End Sub

Private Sub Command10_Click()op1 = Val(Text1.Text)operator = “+” Text1.Text = “" End Sub

Private Sub Command12_Click()op1 = Val(Text1.Text)operator = ”-“ Text1.Text = ”“ End Sub

Private Sub Command13_Click()op1 = Val(Text1.Text)operator = ”*“ Text1.Text = ”“ End Sub

Private Sub Command14_Click()op1 = Val(Text1.Text)operator = ”/“ Text1.Text = ”“ End Sub

Private Sub Command15_Click()op2 = Val(Text1.Text)If operator = ”+“ Then Text1.Text = op1 + op2 ElseIf operator = ”-“ Then Text1.Text = op1-op2 ElseIf operator = ”*“ Then Text1.Text = op1 * op2 ElseIf operator = ”/" Then Text1.Text = op1 / op2 End If End Sub 4 系統設計

（1）程序的組織結構（包括窗體、模塊及其功能）。

窗體模塊：用來包含sub與事件過程 窗口：用來承載控件，包括按鈕控件、文本框控件、標簽控件。

控件：按鈕控件用來輸入數據與運算符號，文本框控件用來顯示輸入的數值以及最后的運算結果，標簽控件顯示標簽既該程序的自定義名稱。

Sub過程：通過代碼的編寫使窗口上的控件能在程序運行時有特殊的作用，使命令按鈕能產生相應的數值，運算按鈕產生相應的運算過程，及文本框中顯示相應結果。

（2）每個窗體（模塊）詳細描述設計思路。

I.首先打開新建工程，創建一個forml窗口，并在窗口中放入控件。分別放入一個標簽控件，一個文本框控件和15個按鈕控件，調整各控件的大小和位置，使其布局如下圖示。

II.調 整 各 控 件 的 屬 性 值。單擊標簽控件，將其caption屬性 設置為“微型整

值計 算器”并將fount屬性 設 置 為 粗 體，小四。將文本框清空，然后依次設置command1~command15的caption屬性分別為數字“1~10”和運算符“+”“-”“*”“/”以及“=”。

III.編寫控件觸發事件過程代碼。先聲明三個變量：兩個整值和一個字符串。然后編寫command1~command10的click事件使用賦值語句，在文本框中顯示相應數值。再編寫command11~command14的click事件，使用賦值語句賦予相應運算符，并將文本框中字符串轉換為數值型賦值給第一個變量，清空文本框。編寫command15的click事件代碼，將第二次輸入的字符串轉換為數值型賦給第二個變量，并用塊結構條件語句分別編寫四種運算過程。IV.完成后進行調試，修改，運行，測試。系統運行及測試

（1）幾組測試數據以及相應的測試結果：

運算10/3的結果 運算14*3的結果 運算78+20的結果（2）運行界面：

參考文獻

[1] 郭曉君、謝日行，visual basic程序設計教程，黃河水利出版社

[2] 龔沛曾、楊志強、陸慰民，visual basic程序設計實驗指導與測試，高等教育出版社 7心得體會

在這次實驗中，在vb環境下制作了一個標準exe工程，雖然結果比較令人滿意，但是在制作過程中遇到了不少困難。在其中深深體會到了了解和掌握一門計算機語言并不容易，要真正學好它必須要付出足夠的努力。我在這次實驗中就查閱了相關資料，并通過與他人的相互交流學習，這樣既有利于相互的學習與提高，又能養成良好的學習習慣。此外，此次實驗的成功完成，對我自己也是極大的鼓舞，鼓舞我今后更加努力的去學好這門課程。這個計算器的制作使我領會到了vb的實用性與強大的功能，所以我以后一定會以更加努力認真的態度來學習vb課程，為以后的應用與實踐打下堅實的基礎。

第四篇：VB課設計心得體會

河北聯合大學

2011-2012第2學期

《軟件設計基礎-vb》

課程設計報告

設計名稱：龜兔賽跑 姓 名：鄭少婷

學 號： 201114570311 專業班級： 電子信息工程 3 班學 院： 信息工程學院 設計時間：

設計地點：宿舍 學校機房

目 錄 1.課程設計目的 ··········································································································· 2.課程設計任務與要求 ······························································································· 3.課程設計說明書 ······································································································· 4.課程設計成果 ··········································································································· 5.程序調試過程 ··········································································································· 6.設計問題的不足和改進方案 ··················································································· 7.課程設計心得 ··········································································································· 8.附錄 ···························································································································· 9.參考文獻 ···················································································································篇二：vb程序設計課程報告

課程綜合設計報告

設計題目

班級名稱 團隊編號 團隊成員 大家一起來找茬

目錄

一、課程的主要目標.............................................1

二、課程設計的介紹.............................................1

三、課程設計的主要功能.........................................1

1、窗體一(form1)............................................1

2、窗體二(form2)............................................2

四、課程設計的主要特色.........................................2

五、功能擴展設想...............................................3

六、設計過程中遇到的主要問題及解決方法.........................3

七、課程設計的主要分工.........................................4 正 文

一、課程的主要目標

為了增加學習的樂趣，調動大家的積極性，我們組討論后最終決定制作一個小游戲，名字是“大家一起來找茬”，這個課程的目標是熟練掌握各種控件的作用，體驗程序設計的基本思想方法，實踐與理論的結合，在設計過程中自己發現問題，提出問題，解決問題，實現知識的遷移，循序漸進，由繁到簡。在設計過程中，我們充分得體會到了知識的欠缺與不熟練，但是通過這次學習，我們能夠對基本的語句靈活運用，掌握了上機調試程序的基本技能。總而言之，通過這次設計，我們充分地了解到了自己的不足，并且有克服困難的決心，最后圓滿的完成了我們最初的設想。

二、課程設計的介紹

我們組的設計是一款很簡單的小游戲---大家一起來找茬。

這個游戲就是找出兩幅圖的不同處，用鼠標點擊左邊圖片的不同處，便會出現一個笑臉的圖片，表示選正確了。游戲共設置了4關卡。5個窗體，后4個窗體是雷同的，只是兩張圖片不同。

三、課程設計的主要功能

1、窗體一(form1)其中有5個標簽，1個時鐘控件，1個文本框 文本框（text1）：輸入選擇的關卡。label4（go）：單擊label4（go）時，便進入您所選擇的關卡。關卡只能是1-4，否則彈出“輸入關卡有誤，請重新輸入！”卸載某些image中裝載的笑臉圖片。label3（退出）：結束游戲。label5（游戲說明）：單擊label5（游戲說明）時，會彈出“找出兩幅圖的不同處，點擊左邊的圖片不同處。時間共60秒！”并且，label5（游戲說明）會變紅、綠、藍三種顏色，用timer1控制時間，使其1秒變一次色。變色時為了引起游戲玩家的注意，同時使窗體更美觀。

2、窗體二(form2)其中有6個圖像，2個時鐘控件，4個標簽，1個文本框，3個命令按鈕

圖像（image1--image6)：①image1為對照圖片，已裝載。

時鐘控件：①timer1控制剩余秒數的label3紅~綠~藍顏色變化。

②timer2控制時鐘的倒計時，為零且玩家未找到所有不同處時提示“時間 已到！失敗是成功的媽媽，加油！”。

標簽：①label1（剩余不同數）與 label2（剩余時間）起提醒作用。

②label3的標題為剩余時間秒數，且有紅~綠~藍的1秒間隔變化。

文本框（text1）：內容為玩家在圖片處未找到的剩余不同數，為零時有提示，詳見image2——image6處介紹。

四、課程設計的主要特色

通過本程序的設計，一方面此課程設計可應用于幼兒開發智力，生動有趣的圖片、動感有力的游戲音樂，無論在視覺還是聽覺上都會給人一種有活力有朝氣的享受；另一方面組員得到了一定的鍛煉，當前社會更加注重大學生的實踐能力，大學生的綜合素質尤為重要。在商業經濟高度發展的今天，企業需要的是理論知識與實踐經驗完備的人才，因此作為時代的新秀，大學生十分有必要抓住在校的有效時間，積極鍛煉自己提高綜合素質。在提高學生學習主動性積極性的同時，使學生通過學習體會進一步提升自己的各方面能力和價值觀念。而本次課程設計正契合這一前提，通過這一實踐學生搭建一條理

論知識與實踐經驗結合的橋梁，從而進一步完備學生的能力和綜合素質。組員們通過課程設計修改及應用，較好地提高了自身的計算機能力、綜合素質等。

五、功能擴展設想

只是單找圖片的不同之處，可能顯得比較單調，于是小組成員認為可以加入一些元素。比如：可以加入商店，道具，獎勵類，當在游戲過程中有時間限制將到，但不同處仍未找到時，可以加時，或提供幫助，對此，又可以在前面的所得到的獎勵中相互抵消。當然，這些擴展都可在商店中實現。就“大家來找茬”游戲本身，小組雖是經一番努力才完成，或許玩家玩了一，兩遍后就會感到很無聊。對此，小組一致認為可以多加些關卡，并以隨機形式出現，使得游戲的趣味性和復雜性得以增加。

六、設計過程中遇到的主要問題及解決方法

在編程過程中我們先把大體的代碼寫出來，然后反復運行，找出不足，再修改。主要遇到兩個問題。一是，把裝載到image中的圖片再卸載下來。二是，加入聲音時不會申明變量。經過查閱書籍和網上查找知道“set image1.picture=nothing”可以卸載image中的圖片。還有，有”playsound”語句時要先聲明變量“private declare function playsound lib winmm.dll alias playsounda(byval lpszname as string, byval hmodule as long, byval dwflags as long)as long”篇三：數據庫課程設計-基于vb的學生選課模擬系統

基于vb的學生選課模擬系統的設計與實現

摘 要：隨著計算機技術的飛速發展和高等教育體制改革的不斷深入，傳統教育管理方法、手段以及工作效率已不能適應新的發展需要，無法很好地完成教學管理工作。提高教務管理水平的主要途徑是更新管理者的思想，增強對管理活動的科學認識。基于vb與數據庫技術建立一個學生選課系統為學生和教師提供了查詢、修改、存儲、增加記錄、選課等功能，基本上能滿足學生和老師的要求。1 需求分析

1.1 功能需求分析

該學生選課模擬系統具備三方面的功能：一方面是學生用戶，學生通過輸入學號和密碼進下該系統后，可以進行一些基礎維護（待選課程、該門課程的老師、已經選定的課程、計算學分、密碼修改）；另一方面老師進入該系統則可以查看課程信息、報課情況、修改密碼等。如果用管理員（教務人員）登陸的話可以有狀態管理和課程安排等功能。具體功能的詳細描述如下：

1.1.1 選擇要登錄的服務器。下拉箭頭選擇local，因為可以直接使用windows驗證登錄，直接打對鉤，省略用戶名和密碼。提交之后經過等待界面即可登錄到“選擇登錄類型”界面。

1.1.2 選擇登陸類型。選擇教務人員，輸入帳號和密碼則可以查看狀態管理、課程安排和修改密碼。在狀態管理中可以輸入要更改的學號，查看更改狀態；在課程安排中可以輸入教師號和課程號，進行排課和撤銷課程；點擊修改密碼則通過輸入初始密碼、輸入新密碼、確認新密碼來修好密碼。

1.1.3 選擇登陸類型。選擇老師，輸入賬號和密碼則可以查看課程信息和報課情況，并可以修改密碼。點擊查看應教課程顯示課程信息，點擊查看報課狀況則可以顯示報課情況。點擊修改密碼與1.1.2方法一樣。1.1.4 選擇登陸類型。選擇學生，輸入帳號和密碼則進入學生選課系統。選擇相應課程則對應相應課程的老師。已經選定的課程欄中會出現相應的課程名稱。如

果已經選擇了課程則可以撤銷該課程重新選擇。選擇完課程后還可以計算學分。顯示選課總學分為**學分。點擊修改密碼與1.1.2方法一樣。1.1.5選擇[退出]將退出整個系統。1.2 性能需求分析

時間特性要求：在軟件方面，響應時間，更新處理時間都要求比較快而且迅速，這就需要采用存儲過程技術，才能夠滿足用戶的需要。因技術原因本系統未采取返回方式，點擊退出即退出整個系統。用戶需重新登錄。

安全性：設立口令號和密碼驗證方式，防止非法用戶登錄進行操作。也就是用戶只有學生、教師和管理員才能進入這個系統。學生通過學號和密碼進入，在數據庫中權限為2；教師通過帳號和密碼進入，在數據庫中權限為1；管理員通過口令和密碼進入，在數據庫中的權限為0。

1.3 數據庫需求分析――數據流圖

在學生選課模擬系統中主要牽扯的信息主要包括學生信息、帳號密碼信息、教師信息、課程信息、學生選課信息、教師核查選課信息。

根據以上劃分的具體數據信息，將得到三層數據流圖。

第五篇：《順序結構》 教學設計

鹽城中學

何娟

《順序結構》教學設計

一、教材分析

本節課是《算法與程序設計》(選修)

鹽城中學

何娟

★

學習方法：模仿學習、自主探究學習，小組交流合作學習

六、設計思想

尊重學生解決問題的思維過程，模擬學生的學習體驗和情感體驗，在以學生為主體、教師為主導的架構下，搭建以生為本的學習的平臺，幫助學生通過學與練，以不斷解決問題為手段，一步步完成學習任務。

新課標中提出了信息技術課程要以進一步提高學生信息素養為宗旨，強調通過合作解決實際問題，掌握信息技術，感受信息文化，增強信息意識，提高學生總體的信息素養。而在本節課中就堅持了以教師為主導，學生為主體，發展能力和提高素質為主線的啟發式教學思想，努力為學生創設了開放式的學習環境。

本節課以一個簡單的例子——計算圖形的周長、面積并打印為主線介紹順序結構的特點、執行過程和基本思想，并通過這個程序抽象出代碼設計的四個基本部分：定義常變量、輸入數據、處理數據、輸出數據。讓學生通過模仿學習、自主學習相結合的方式編寫程序，發現問題，探究解決問題，最后學會自我總結。

七、教學過程

1．分組體驗，導入新課

導入：上節課我們學習了賦值語句，現在屏幕上有三道題目，請同學選擇其一解答。學生分組體驗程序的運行結果。題一：

Dim a As Integer Dim b As Integer a = a + 1 a = 3 b = a b = b + 1 Print a, b 運行結果：3 4 題二：

Dim a As Integer Dim b As Integer a = 3 a = a + 1 b = a b = b + 1 Print a, b 運行結果：4 5

題三：

Dim a As Integer Dim b As Integer

鹽城中學

何娟

a = 3 b = a a = a + 1 b = b + 1 Print a, b 運行結果：4 4 教師：經過觀察，我們發現上述三個例子中涉及到的語句都是一模一樣的，可是為什么得到結果不一樣呢？

學生：順序不同。

教師：對，由于這個程序的執行過程是按語句書寫的先后順序一句一句執行的，每次給變量賦的值不同，所以得到的結果不一樣。這種按語句順序執行的結構我們成為順序結構，在以后的學習過程中我們還將學習另外兩種結構：分支結構和循環結構。分支結構根據不同的條件判斷來決定程序執行的走向，循環結構根據條件判斷，需要重復執行某一段代碼。而順序結構每一條語句執行且只執行一次，沒有跳過某一條語句，也沒有重復執行某一條語句。老師這里有三幅圖，圖中顯示的路途方式和程序設計的三種基本結構非常的類似，同學們仔細觀察一下，你能猜出哪一幅圖對應于順序結構嗎？

圖1

圖2

圖3 學生：圖1

2.學科遷移，設計代碼

鹽城中學

何娟

教師：這節課我們著重學習順序結構。請看這道題目：已知圓的半徑為1000，編寫程序求解其周長和面積，并作圖。如果是一道數學題，同學肯定不費吹灰之力，可是編程怎么求解呢？同學可能一時犯了難，沒關系，既然同學們對數學的解題步驟比較熟悉，我們姑且把把它當作一道數學題來解答。首先，我們分析一下，題目中涉及到幾個變量？哪幾個？

學生：三個，半徑、周長和面積。

教師：和數學中一樣，我們分別用r、c、s表示這三個變量。請一位同學書寫相關語句

學生操作：

教師：剛才的三個變量哪些是已知條件？

學生：半徑

教師：其值是多少？

學生：1000 教師：好，利用賦值語句給半徑賦值，代碼是？

學生回答，教師操作：r=1000 教師：此時，我們已經知道r的值了，那么如何通過已知條件求解出c和s呢？請一位同學在教師機上演示。

學生操作：c=2*3.14*r

s=3.14*r*r

(書寫過程中若有語法錯誤，請其他同學糾正)設疑：程序編寫到這里是否行了呢？同學的意見出現了分歧，都說實踐是檢驗真理的唯一標準，那么我們就讓機器來驗證吧

教師：程序并沒有如我們所料想的那樣顯示結果，事實證明我們的程序存在一些小問題，那究竟是哪里出錯了呢？正如同學們知道的，我們其實已經把周長和面積的值求出來了，可是程序為什么不顯示結果呢？對！我們把求出來的結果存放在變量c和s中，而對于用戶而言，并不知道變量c和s的存在，他只關心屏幕上有沒有顯示結果，所以，我們還應該打印變量c和s。代碼是？

學生：print c,s 教師：這樣的代碼已經能完成基本功能了，為了使用戶看得更清楚明了，再添加一些說明性文字。Print “圓的周長為”;c Print “圓的面積為”;s 教師：接下來我們還要作圖。你們平時是怎么畫圓的？

學生：用圓規畫圓，先確定圓心位置，然后確定半徑畫圓。

教師：vb中提供了circle方法可以象圓規一樣畫圓，請同學看老師演示代碼

Circle(2000, 2000), 1000其中（2000，2000）是圓心位置，1000是圓半徑。需要說明的是，vb中的坐標系和數學中不同，原點（0，0）的位置為窗口左上角，窗口左邊框為縱軸正方向，窗口上邊框為橫軸正方向。關于circle方法我還提供了一個小資料，同學們可以根據小資料修改不同參數畫出不一樣的圓。

3．現學現賣，小試牛刀

鹽城中學

何娟

課堂實踐一：已知圓的半徑為1000，編寫程序畫出此圓，然后求解其周長和面積。（提供代碼圖片和circle小資料）

展示學生程序：老師不但可選成功的程序，也可選取較不成功的作品，但要有典型意義。

4．層層遞進，探究實踐

教師：現在我們已經能夠求出指定半徑圓的周長和面積并作圖了，如果我們把這個程序給用戶使用，他們可能會想這個程序只能求半徑為1000的圓，我要是能輸入其他的半徑值就好了，而用戶不一定懂得修改程序代碼，直接修改程序行不通，同學們能不能想想辦法讓用戶能自己輸入半徑的值？

學生1：我們可以用文本框

學生2：還可以用inputbox函數

教師：那就剛才程序的基礎上修改代碼實現你的想法吧。

課堂實踐二：根據用戶輸入的半徑值求圓的周長和面積并作圖。解法一：

鹽城中學

何娟

解法2：

展示學生程序：演示幾個學生的程序，請學生相互評價指出優點和不足，教師適當點評。教師總結：一個完整的代碼通常包括這樣幾個部分：

1、定義常變量

2、輸入

3、處理

4、輸出

5．課堂小結，提出希望

一直以來，在我們的印象中，編程是件很難的事。但是通過這節課的學習，我們發現編程也是有章可循的，希望同學們能喜愛上編程，讓程序學習變成一件快樂的事，編寫出更多更好的程序，成為