第一篇：VB順序設(shè)計

VB順序設(shè)計

教學(xué)目的：

1、熟悉結(jié)構(gòu)化程序設(shè)計的三種基本結(jié)構(gòu)及其特點(diǎn)。

2、掌握VB中順序設(shè)計常用的語法規(guī)則。教學(xué)重點(diǎn)：1、2、3、4、結(jié)構(gòu)化程序設(shè)計方法概念的理解。Print方法的應(yīng)用及格式特點(diǎn)。

VB中的賦值語句功能及特點(diǎn)。

VB中的inputbox()輸入函數(shù)及msgbox()輸出函數(shù)應(yīng)用。

課時安排：

理論教學(xué)安排6課時，上機(jī)練習(xí)8課時

一、程序設(shè)計三大基本結(jié)構(gòu)：

1、順序（按語句的書寫順序執(zhí)行）

2、分支

3、循環(huán)

二、賦值語句 格式：

[let] 變量名 = 表達(dá)式 功能：

計算表達(dá)式的值，并把結(jié)果送給“=”左邊的變量。

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

1、變量與表達(dá)式的數(shù)據(jù)類型必須一致。

2、“=”有方向性。需要動態(tài)理解

Let a1=a1+1-------將a1的當(dāng)前值加1送給a1。語句執(zhí)行后，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 上機(jī)練習(xí)： P47-49 例1到例3 P78 上機(jī)調(diào)試題1

產(chǎn)生隨機(jī)數(shù)公式：

Int(n*rnd)+1

用來產(chǎn)生1到n之間的隨機(jī)整數(shù)

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

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

n=val(text1.text)3）產(chǎn)生x1,x2,x3三個隨機(jī)數(shù) 4）x1,x2,x3分別送給指定的標(biāo)簽。

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 [輸出項(xiàng)列表] 具體語句如下：

Form1.print 輸出項(xiàng)表

Picture1.print 輸出項(xiàng)表 例如：

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

2、功能：

在指定的對象上輸出結(jié)果。

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

3、輸出項(xiàng)表的格式

（1）逗號分隔符---------輸出項(xiàng)以標(biāo)準(zhǔn)格式輸出。（輸出項(xiàng)之間有固定的間隔）

Print 1 Print “1”

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

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

輸出數(shù)值時，產(chǎn)生一個分隔位，用來將數(shù)據(jù)隔開。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語句

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

分隔符之間的數(shù)據(jù)項(xiàng)可以省缺。-------標(biāo)準(zhǔn)輸出時會產(chǎn)生更大的分隔空間。Print 1;;;2 Print 1;2

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

效果不同

空print語句---------產(chǎn)生換行或空行 Print 1,2, Print

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

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

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

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

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

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

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

格式串輸出函數(shù)format(表達(dá)式，格式串)------常用于數(shù)值的輸出。上機(jī)練習(xí)： P51-54 例3.4,3.5 P79 上機(jī)調(diào)試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(“提示字符串”,”標(biāo)題”，“默認(rèn)值”，輸入框的位置坐標(biāo))

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 語句將產(chǎn)生兩行輸出效果。2）inputbox()的值是字符串。轉(zhuǎn)換成數(shù)值使用val()函數(shù)。

2、輸出消息框 格式：

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

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

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

1、P69 例3.8

2、P80 上機(jī)調(diào)試題7（1）msgbox “在這里顯示提示信息”，4，“請確認(rèn)”

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

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

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

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

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

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

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

小結(jié)順序程序設(shè)計：

一、程序結(jié)構(gòu)語句

1、賦值語句

[let] 變量名=表達(dá)式

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

3、print方法

form1.print 輸出項(xiàng)表

picture1.print 輸出項(xiàng)表

重點(diǎn)：輸出項(xiàng)表的格式

1）2）標(biāo)準(zhǔn)分隔“,” 緊湊分隔“;”

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

3、對話框

1）輸入對話框

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

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

二、控件對象

1、對象的公共屬性

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

2、標(biāo)簽（label）

常用屬性：label1.caption

事件：單擊，雙擊

3、按鈕（command）

常用屬性：

事件：單擊

4、文本框（text）

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

事件：單擊,雙擊，change 上機(jī)練習(xí)： P79、上機(jī)練習(xí)5、6 上機(jī)練習(xí)5

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

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

上機(jī)練習(xí)6 課本37頁（字符串函數(shù)）

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

2、取子串函數(shù)

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

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

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

3、兩個字符相關(guān)的轉(zhuǎn)換函數(shù)

Chr(x)------求數(shù)值x對應(yīng)的字符。

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

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

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

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

Str(x)--------將數(shù)值x變成對應(yīng)的數(shù)字串。

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

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

2、總結(jié)print方法中輸出項(xiàng)列表的格式。

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

第二篇：Vb設(shè)計實(shí)驗(yàn)報告

Vb設(shè)計實(shí)驗(yàn)報告

一、設(shè)計內(nèi)容和目的

這次實(shí)驗(yàn)設(shè)計，我做的是學(xué)生信息管理系統(tǒng)，主要功能是提供學(xué)生信息保存和查詢功能。

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

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

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

3、用戶查詢窗口：可以查詢數(shù)據(jù)庫中保存的學(xué)生信息。

4、管理員管理窗口：只有管理員可以進(jìn)入，顯示數(shù)據(jù)庫中所有的學(xué)生信息，并且可以添加修改。

5、系統(tǒng)信息窗口：是系統(tǒng)的信息內(nèi)容。

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

二、設(shè)計過程：

1、實(shí)驗(yàn)構(gòu)思：在系統(tǒng)設(shè)計之前，對實(shí)驗(yàn)內(nèi)容和結(jié)構(gòu)的構(gòu)思占據(jù)了相當(dāng)一部分時間。最終決定做一個“學(xué)生信息管理系統(tǒng)”，這樣比較貼近自身情況，也有比較多的內(nèi)容可以設(shè)計。

2、技術(shù)實(shí)現(xiàn)：在制作過程中主要使用了vb2005和數(shù)據(jù)庫技術(shù)實(shí)現(xiàn)系統(tǒng)的設(shè)計、實(shí)現(xiàn)和運(yùn)行。Photoshop等技術(shù)使程序的界面看起來更加友好。

3、運(yùn)行調(diào)試：在系統(tǒng)制作中的運(yùn)行調(diào)試過程中，出現(xiàn)了很多問題，比如各窗口之間的調(diào)用和訪問，如何退出，控件的背景設(shè)置、字體顏色設(shè)置等，都需要經(jīng)過一遍遍的調(diào)試發(fā)現(xiàn)、解決。

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

三、系統(tǒng)結(jié)構(gòu)：

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

四、實(shí)驗(yàn)結(jié)果： 該系統(tǒng)能夠提供學(xué)生和管理員兩種類型的登錄，可以實(shí)現(xiàn)學(xué)生信息的查詢、管理員對信息的修改，等。

五、設(shè)計心得：

在設(shè)計過程中，遇到了許多困難，比如：數(shù)據(jù)庫無法連接、窗口無法正常訪問、控件背景與窗體背景不協(xié)調(diào)等。后來通過查看課本和訪問網(wǎng)絡(luò)將這些問題解決了。

在這個過程中，我深深體會到大作業(yè)的用意：將所學(xué)理論知識用于實(shí)踐。正是因?yàn)檫@樣，許多理論上的知識才能真正得到理解。處理問題的過程，也就是學(xué)習(xí)的過程。背課本何其簡單，真正的能力卻是將課本運(yùn)用到實(shí)踐中去！

第三篇：vb綜合性設(shè)計實(shí)驗(yàn)報告

綜 合 性 實(shí) 驗(yàn)

實(shí) 驗(yàn) 名 稱: 用vb編寫簡單計算器 專 業(yè) 班 級: 土 木 工 程 0901班 學(xué) 生 姓 名： *** 學(xué) 號： ********* 指 導(dǎo) 教 師： *** 需求分析

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

WINDOWS XP系統(tǒng)；VB6.0；

3開發(fā)工具和編程語言

開發(fā)工具：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 系統(tǒng)設(shè)計

（1）程序的組織結(jié)構(gòu)（包括窗體、模塊及其功能）。

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

控件：按鈕控件用來輸入數(shù)據(jù)與運(yùn)算符號，文本框控件用來顯示輸入的數(shù)值以及最后的運(yùn)算結(jié)果，標(biāo)簽控件顯示標(biāo)簽既該程序的自定義名稱。

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

（2）每個窗體（模塊）詳細(xì)描述設(shè)計思路。

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

II.調(diào) 整 各 控 件 的 屬 性 值。單擊標(biāo)簽控件，將其caption屬性 設(shè)置為“微型整

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

III.編寫控件觸發(fā)事件過程代碼。先聲明三個變量：兩個整值和一個字符串。然后編寫command1~command10的click事件使用賦值語句，在文本框中顯示相應(yīng)數(shù)值。再編寫command11~command14的click事件，使用賦值語句賦予相應(yīng)運(yùn)算符，并將文本框中字符串轉(zhuǎn)換為數(shù)值型賦值給第一個變量，清空文本框。編寫command15的click事件代碼，將第二次輸入的字符串轉(zhuǎn)換為數(shù)值型賦給第二個變量，并用塊結(jié)構(gòu)條件語句分別編寫四種運(yùn)算過程。IV.完成后進(jìn)行調(diào)試，修改，運(yùn)行，測試。系統(tǒng)運(yùn)行及測試

（1）幾組測試數(shù)據(jù)以及相應(yīng)的測試結(jié)果：

運(yùn)算10/3的結(jié)果 運(yùn)算14*3的結(jié)果 運(yùn)算78+20的結(jié)果（2）運(yùn)行界面：

參考文獻(xiàn)

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

[2] 龔沛曾、楊志強(qiáng)、陸慰民，visual basic程序設(shè)計實(shí)驗(yàn)指導(dǎo)與測試，高等教育出版社 7心得體會

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

第四篇：VB課設(shè)計心得體會

河北聯(lián)合大學(xué)

2011-2012第2學(xué)期

《軟件設(shè)計基礎(chǔ)-vb》

課程設(shè)計報告

設(shè)計名稱：龜兔賽跑 姓 名：鄭少婷

學(xué) 號： 201114570311 專業(yè)班級： 電子信息工程 3 班學(xué) 院： 信息工程學(xué)院 設(shè)計時間：

設(shè)計地點(diǎn)：宿舍 學(xué)校機(jī)房

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

課程綜合設(shè)計報告

設(shè)計題目

班級名稱 團(tuán)隊(duì)編號 團(tuán)隊(duì)成員 大家一起來找茬

目錄

一、課程的主要目標(biāo).............................................1

二、課程設(shè)計的介紹.............................................1

三、課程設(shè)計的主要功能.........................................1

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

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

四、課程設(shè)計的主要特色.........................................2

五、功能擴(kuò)展設(shè)想...............................................3

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

七、課程設(shè)計的主要分工.........................................4 正 文

一、課程的主要目標(biāo)

為了增加學(xué)習(xí)的樂趣，調(diào)動大家的積極性，我們組討論后最終決定制作一個小游戲，名字是“大家一起來找茬”，這個課程的目標(biāo)是熟練掌握各種控件的作用，體驗(yàn)程序設(shè)計的基本思想方法，實(shí)踐與理論的結(jié)合，在設(shè)計過程中自己發(fā)現(xiàn)問題，提出問題，解決問題，實(shí)現(xiàn)知識的遷移，循序漸進(jìn)，由繁到簡。在設(shè)計過程中，我們充分得體會到了知識的欠缺與不熟練，但是通過這次學(xué)習(xí)，我們能夠?qū)镜恼Z句靈活運(yùn)用，掌握了上機(jī)調(diào)試程序的基本技能?？偠灾ㄟ^這次設(shè)計，我們充分地了解到了自己的不足，并且有克服困難的決心，最后圓滿的完成了我們最初的設(shè)想。

二、課程設(shè)計的介紹

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

這個游戲就是找出兩幅圖的不同處，用鼠標(biāo)點(diǎn)擊左邊圖片的不同處，便會出現(xiàn)一個笑臉的圖片，表示選正確了。游戲共設(shè)置了4關(guān)卡。5個窗體，后4個窗體是雷同的，只是兩張圖片不同。

三、課程設(shè)計的主要功能

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

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

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

時鐘控件：①timer1控制剩余秒數(shù)的label3紅~綠~藍(lán)顏色變化。

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

標(biāo)簽：①label1（剩余不同數(shù)）與 label2（剩余時間）起提醒作用。

②label3的標(biāo)題為剩余時間秒數(shù)，且有紅~綠~藍(lán)的1秒間隔變化。

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

四、課程設(shè)計的主要特色

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

論知識與實(shí)踐經(jīng)驗(yàn)結(jié)合的橋梁，從而進(jìn)一步完備學(xué)生的能力和綜合素質(zhì)。組員們通過課程設(shè)計修改及應(yīng)用，較好地提高了自身的計算機(jī)能力、綜合素質(zhì)等。

五、功能擴(kuò)展設(shè)想

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

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

在編程過程中我們先把大體的代碼寫出來，然后反復(fù)運(yùn)行，找出不足，再修改。主要遇到兩個問題。一是，把裝載到image中的圖片再卸載下來。二是，加入聲音時不會申明變量。經(jīng)過查閱書籍和網(wǎng)上查找知道“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”篇三：數(shù)據(jù)庫課程設(shè)計-基于vb的學(xué)生選課模擬系統(tǒng)

基于vb的學(xué)生選課模擬系統(tǒng)的設(shè)計與實(shí)現(xiàn)

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

1.1 功能需求分析

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

1.1.1 選擇要登錄的服務(wù)器。下拉箭頭選擇local，因?yàn)榭梢灾苯邮褂脀indows驗(yàn)證登錄，直接打?qū)︺^，省略用戶名和密碼。提交之后經(jīng)過等待界面即可登錄到“選擇登錄類型”界面。

1.1.2 選擇登陸類型。選擇教務(wù)人員，輸入帳號和密碼則可以查看狀態(tài)管理、課程安排和修改密碼。在狀態(tài)管理中可以輸入要更改的學(xué)號，查看更改狀態(tài)；在課程安排中可以輸入教師號和課程號，進(jìn)行排課和撤銷課程；點(diǎn)擊修改密碼則通過輸入初始密碼、輸入新密碼、確認(rèn)新密碼來修好密碼。

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

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

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

安全性：設(shè)立口令號和密碼驗(yàn)證方式，防止非法用戶登錄進(jìn)行操作。也就是用戶只有學(xué)生、教師和管理員才能進(jìn)入這個系統(tǒng)。學(xué)生通過學(xué)號和密碼進(jìn)入，在數(shù)據(jù)庫中權(quán)限為2；教師通過帳號和密碼進(jìn)入，在數(shù)據(jù)庫中權(quán)限為1；管理員通過口令和密碼進(jìn)入，在數(shù)據(jù)庫中的權(quán)限為0。

1.3 數(shù)據(jù)庫需求分析――數(shù)據(jù)流圖

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

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

第五篇：《順序結(jié)構(gòu)》 教學(xué)設(shè)計

鹽城中學(xué)

何娟

《順序結(jié)構(gòu)》教學(xué)設(shè)計

一、教材分析

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

鹽城中學(xué)

何娟

★

學(xué)習(xí)方法：模仿學(xué)習(xí)、自主探究學(xué)習(xí)，小組交流合作學(xué)習(xí)

六、設(shè)計思想

尊重學(xué)生解決問題的思維過程，模擬學(xué)生的學(xué)習(xí)體驗(yàn)和情感體驗(yàn)，在以學(xué)生為主體、教師為主導(dǎo)的架構(gòu)下，搭建以生為本的學(xué)習(xí)的平臺，幫助學(xué)生通過學(xué)與練，以不斷解決問題為手段，一步步完成學(xué)習(xí)任務(wù)。

新課標(biāo)中提出了信息技術(shù)課程要以進(jìn)一步提高學(xué)生信息素養(yǎng)為宗旨，強(qiáng)調(diào)通過合作解決實(shí)際問題，掌握信息技術(shù)，感受信息文化，增強(qiáng)信息意識，提高學(xué)生總體的信息素養(yǎng)。而在本節(jié)課中就堅(jiān)持了以教師為主導(dǎo)，學(xué)生為主體，發(fā)展能力和提高素質(zhì)為主線的啟發(fā)式教學(xué)思想，努力為學(xué)生創(chuàng)設(shè)了開放式的學(xué)習(xí)環(huán)境。

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

七、教學(xué)過程

1．分組體驗(yàn)，導(dǎo)入新課

導(dǎo)入：上節(jié)課我們學(xué)習(xí)了賦值語句，現(xiàn)在屏幕上有三道題目，請同學(xué)選擇其一解答。學(xué)生分組體驗(yàn)程序的運(yùn)行結(jié)果。題一：

Dim a As Integer Dim b As Integer a = a + 1 a = 3 b = a b = b + 1 Print a, b 運(yùn)行結(jié)果：3 4 題二：

Dim a As Integer Dim b As Integer a = 3 a = a + 1 b = a b = b + 1 Print a, b 運(yùn)行結(jié)果：4 5

題三：

Dim a As Integer Dim b As Integer

鹽城中學(xué)

何娟

a = 3 b = a a = a + 1 b = b + 1 Print a, b 運(yùn)行結(jié)果：4 4 教師：經(jīng)過觀察，我們發(fā)現(xiàn)上述三個例子中涉及到的語句都是一模一樣的，可是為什么得到結(jié)果不一樣呢？

學(xué)生：順序不同。

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

圖1

圖2

圖3 學(xué)生：圖1

2.學(xué)科遷移，設(shè)計代碼

鹽城中學(xué)

何娟

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

學(xué)生：三個，半徑、周長和面積。

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

學(xué)生操作：

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

學(xué)生：半徑

教師：其值是多少？

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

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

學(xué)生操作：c=2*3.14*r

s=3.14*r*r

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

教師：程序并沒有如我們所料想的那樣顯示結(jié)果，事實(shí)證明我們的程序存在一些小問題，那究竟是哪里出錯了呢？正如同學(xué)們知道的，我們其實(shí)已經(jīng)把周長和面積的值求出來了，可是程序?yàn)槭裁床伙@示結(jié)果呢？對！我們把求出來的結(jié)果存放在變量c和s中，而對于用戶而言，并不知道變量c和s的存在，他只關(guān)心屏幕上有沒有顯示結(jié)果，所以，我們還應(yīng)該打印變量c和s。代碼是？

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

學(xué)生：用圓規(guī)畫圓，先確定圓心位置，然后確定半徑畫圓。

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

Circle(2000, 2000), 1000其中（2000，2000）是圓心位置，1000是圓半徑。需要說明的是，vb中的坐標(biāo)系和數(shù)學(xué)中不同，原點(diǎn)（0，0）的位置為窗口左上角，窗口左邊框?yàn)榭v軸正方向，窗口上邊框?yàn)闄M軸正方向。關(guān)于circle方法我還提供了一個小資料，同學(xué)們可以根據(jù)小資料修改不同參數(shù)畫出不一樣的圓。

3．現(xiàn)學(xué)現(xiàn)賣，小試牛刀

鹽城中學(xué)

何娟

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

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

4．層層遞進(jìn)，探究實(shí)踐

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

學(xué)生1：我們可以用文本框

學(xué)生2：還可以用inputbox函數(shù)

教師：那就剛才程序的基礎(chǔ)上修改代碼實(shí)現(xiàn)你的想法吧。

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

鹽城中學(xué)

何娟

解法2：

展示學(xué)生程序：演示幾個學(xué)生的程序，請學(xué)生相互評價指出優(yōu)點(diǎn)和不足，教師適當(dāng)點(diǎn)評。教師總結(jié)：一個完整的代碼通常包括這樣幾個部分：

1、定義常變量

2、輸入

3、處理

4、輸出

5．課堂小結(jié)，提出希望

一直以來，在我們的印象中，編程是件很難的事。但是通過這節(jié)課的學(xué)習(xí)，我們發(fā)現(xiàn)編程也是有章可循的，希望同學(xué)們能喜愛上編程，讓程序?qū)W習(xí)變成一件快樂的事，編寫出更多更好的程序，成為