第一篇：VB24點游戲設(shè)計

VB24點游戲設(shè)計(送論文查重報告)24點紙牌簡介

任意給的四張撲克牌（不包括大小王），只能夠用加、減、乘、除以及適當(dāng)?shù)睦ㄌ栠B接著四張牌使得結(jié)果為24，或者宣布根本就是無解的。需要注意的是，每張牌必須且運算一次；J、Q、K可設(shè)置為11、12、13。

使用本程序其實很簡單，按[Start]后，程序會任意給出四張牌，在左邊的按鈕中也能看到相應(yīng)的數(shù)值，只要輸入相應(yīng)的表達(dá)式就可以了。如：6、5、4、1這四個數(shù)，輸入表達(dá)式為：6/（5/4-1）即可；如果你認(rèn)為本題無解，那么你不必輸入任何數(shù)值直接按回車就可以，程序會驗算答題是否準(zhǔn)確。如果輸入的數(shù)據(jù)有錯，那么程序會自動定位到出錯的地方，以方便用戶修改。

本程序還有一個Test功能，用于自定義出牌值。即：可以自己任意給出四個（1-13）的整數(shù)，按[OK]鍵后由程序自動算出答案。

摘要：隨著軟件技術(shù)以及互聯(lián)網(wǎng)技術(shù)的不斷發(fā)展，游戲產(chǎn)業(yè)發(fā)展迅速，已經(jīng)成為經(jīng)濟增民的一個亮點。實踐是軟件開發(fā)的核心，對代碼要求精益求精，在開發(fā)的過程中，簡單設(shè)計，用測試驅(qū)動，通過重構(gòu)和迭代代碼實現(xiàn)現(xiàn)設(shè)計。

本文簡要的介紹了游戲的開發(fā)現(xiàn)狀，以及游戲開發(fā)中存在的問題。另外還簡單地介紹了眾多游戲開發(fā)軟件中的一種——即Visual Basic,其中主要地介紹了Visual Basic 6.0，以及Visual Basic的編程環(huán)境。同時通過兩個小游戲簡單介紹了利用Visual Basic 6.0開發(fā)游戲的處理過程。在本文中主要介紹了24點紙牌和拼拼圖游戲的開發(fā)，包括界面的設(shè)計和相應(yīng)的界面設(shè)計原則，還介紹了其開發(fā)環(huán)境。同時也也對游戲系統(tǒng)的公共功能模塊做了闡述。

通過對該課題的研究設(shè)計，對如何運用Visual Basic來設(shè)計游戲有了一定程度的了解，并對如何設(shè)計游戲的構(gòu)架有所掌握。

關(guān)鍵詞：游戲設(shè)計；Visual Basic技術(shù)；界面設(shè)計；模塊；算法 目 錄

第一章 游戲開發(fā)的現(xiàn)狀分析 1 1.1游戲開發(fā)現(xiàn)狀 1

1.2 游戲開發(fā)中存在的問題 2 第二章 游戲開發(fā)的技術(shù)基礎(chǔ) 3 2.1 Visual Basic技術(shù) 3

2.1.1游戲開發(fā)軟件的介紹 3 2.1.2 Visual Basic概述 3

2.2 Visual Basic的編程環(huán)境 4

2.2.1 Windows下的Visual Basic編程環(huán)境 4 2.2.2 面向?qū)ο蟮木幊?4 2.2.3 VB在系統(tǒng)中的應(yīng)用 6 2.3 小結(jié) 9

第三章 系統(tǒng)總體規(guī)劃 10 3.1 系統(tǒng)功能簡介 10 3.1.1 24點紙牌簡介 10 3.1.2 拼拼圖簡介 10 3.2 系統(tǒng)開發(fā)方法 11 3.2.1 24點紙牌的開發(fā) 12 3.2.2 拼拼圖的開發(fā) 21 3.3 系統(tǒng)開發(fā)環(huán)境 25 3.3.1 開發(fā)平臺 25 3.3.2 運行平臺 25 3.3.3 輸入輸出設(shè)計 25 3.4 小結(jié) 26

第四章 系統(tǒng)功能模塊設(shè)計 27 4.1 24點紙牌游戲公共模塊 27 4.2 拼拼圖公共模塊 29 4.3 小結(jié) 30

第五章 總結(jié)與展望 30 5.1 全文總結(jié) 30 5.2 展望 31 參考文獻(xiàn) 31 致 謝 33 以下是部分界面圖，如圖片不清，請直接點擊圖片，如需要看更詳細(xì)的資料，請直接聯(lián)系客服！

圖1

圖2 參考文獻(xiàn)：

[1] 柴繼貴.基于VB考勤管理系統(tǒng)[J].首都師范大學(xué)學(xué)報.2009(10), P40-40 [2] 尚俊杰.VB高校學(xué)生綜合素質(zhì)評價系統(tǒng)[J].東北師大學(xué)報.2009(4), P39-43 [3] 趙志升.基于VB人才信息管理系統(tǒng)[J].重慶大學(xué)出版社.2011(2), P37-42 [4] 王剛.基于VB網(wǎng)上作業(yè)批改系統(tǒng)[J].安徽大學(xué)出版社.2009(9), P29-30 [5] Fangzhen Lin,Li Yan Yuan,Mingyi Zhang.基于VB校園聊天室的設(shè)計與實現(xiàn)[J].貴州民族出版社.2011(7), P28-43 [6] 李國祿.基于VB醫(yī)院病房管理系統(tǒng)[J].吉林大學(xué)社會科學(xué)學(xué)報.2009(4), P26-35 [7] 姜永玲.VB糖尿病專家系統(tǒng)[J].福州大學(xué)學(xué)報.2010(7), P27-37 [8] 劉宏兵.基于VBVF人事檔案管理系統(tǒng)/VF企業(yè)員工管理系統(tǒng)[J].國防科技大學(xué)出版社.2009(9), P42-42 [9] 戴漢良.眼鏡店銷售管理系統(tǒng)[J].南京大學(xué)學(xué)報.2008(8), P40-41 [10] 張超.基于VB員工管理系統(tǒng)[J].中國農(nóng)業(yè)大學(xué)學(xué)報.2009(8), P28-36 [11] 王承明.基于VB排課管理系統(tǒng)[J].北京工商大學(xué)學(xué)報.2011(7), P31-38 [12] 楊玚.基于VB機房作業(yè)管理系統(tǒng)[J].吉林大學(xué).2010(1), P33-37 [13] 譚新良.基于VB網(wǎng)上購物系統(tǒng)[J].重慶出版社.2007(10), P23-30 [14] 方捷.基于VB客戶關(guān)系管理系統(tǒng)[J].計算機工程與應(yīng)用.2011(11), P40-42 [15] 何蘇.基于VB貼吧的設(shè)計與實現(xiàn)[J].中國信息界.2007(11), P30-38 [16] 趙艷平.基于VB打磚塊游戲[J].國防工業(yè)出版社.2007(2), P37-39 [17] 任昌榮.基于VB房產(chǎn)信息管理系統(tǒng)[J].人民郵電出版社.2011(2), P34-37 [18] 呂俊瑞.高校學(xué)生成績管理系統(tǒng)的設(shè)計與實現(xiàn)[J].科技信息.2009(10), P35-40 [19] 徐生誠.基于VB學(xué)校工資管理系統(tǒng)[J].北京師范大學(xué)學(xué)報.2011(11), P34-40 [20] 王嫻.基于VB多功能點歌系統(tǒng)/VOD視頻點播系統(tǒng)[J].中國水利水電出版社.2011(9), P27-33 [21] 張晨光.基于VB自動報警系統(tǒng)的設(shè)計與實現(xiàn)[J].湖南師范大學(xué)社會科學(xué)學(xué)報.2007(8), P37-39 [22] 劉芳.基于VB基于web的教材管理系統(tǒng)[J].電子工業(yè)出版社.2011(7), P40-40 [23] 周東華.VB[J] LAN語音視頻通信系統(tǒng)[J].高等工程教育研究.2011(9), P28-30 [24] 白兆慶.基于VB和SQL2005的學(xué)生考勤管理系統(tǒng)[J].廣東教育出版社.2007(5), P24-25 [25] 廖仁全.基于VB人才管理系統(tǒng)[J].中國特殊教育.2011(9), P32-39 [26] 郝鵬.基于VB上機計時管理系統(tǒng)[J].南京師大學(xué)報.2008(4), P39-40 [27] 韓露.基于VB（C#）考證信息管理系統(tǒng)的設(shè)計與實現(xiàn)[J].福建科學(xué)技術(shù)出版社.2009(4), P37-39 [28] 欒曉春.基于VB客戶管理系統(tǒng)[J].北京理工大學(xué)出版社.2011(11), P24-40 [29] 崔巍.智能排課系統(tǒng)[J].高等教育出版社.2010(10), P39-42 [30] 蔣華林.VB簡單圖片轉(zhuǎn)化工具[J].中國大學(xué)教學(xué).2011(4), P33-41 [31] 肖磊.人力資源管理系統(tǒng)[J].華南理工大學(xué)出版社.2010(8), P26-28 [32] 張志鑫.基于VB售樓管理系統(tǒng)[J].上海師范大學(xué)學(xué)報.2008(8), P28-37 [33] 周登杰.基于VB酒店預(yù)定系統(tǒng)[J].學(xué)位與研究生教育.2011(9), P29-38 [34] 林和.基于VB網(wǎng)上商城[J].華東師范大學(xué)學(xué)報.2007(9), P28-28 [35] 李曉亮.基于VB學(xué)校機房計費管理系統(tǒng)[J].中國法制出版社.2007(9), P25-37 [36] 談靜.基于VB學(xué)生交費管理系統(tǒng)[J].福建教育出版社.2009(4), P41-42 [37] 周新明.基于VB網(wǎng)址導(dǎo)航網(wǎng)站[J].清華大學(xué)出版社.2011(9), P30-37 [38] Krzysztof D?bicki.Towards an electronic independent learning enviro.Personal and Ubiquitous Computing.2009(4), P23-26 [39] Andreas Lommatzsch.Weight constraint programs with evaluable functio.Education and Information Technologies.2011(5), P23-33 [40] Sahin Albayrak.A comparison of discrete and continuous neural Net.Annals of Mathematics and Artificial Intelligence.2010(8), P32-43 [41] N.Gulzar, K.Ganeshan.Interval scripts: a programming paradigm for inte.Automated Software Engineering.2010(11), P37-41 [42] G.Zémor.Formal Specifications of User Requirements[J].Mathematische Zeitschrift.2009(8), P39-39 [43] Andrea Omicini.Environment as a first class abstraction in multi.Designs, Codes and Cryptography.2011(6), P24-35

第二篇：VB易錯點總結(jié)

2011年計算機二級考試VB常見錯誤和難點分析

1.標(biāo)點符號錯誤

在VB中只允許使用西文標(biāo)點，任何中文標(biāo)點符號在程序編譯時產(chǎn)生“無效字符”錯誤，并在該行以紅色字顯示。用戶在進(jìn)入VB后不要使用中文標(biāo)點符號。中、西文狀態(tài)下標(biāo)點號對照見下表所示。

中、西狀態(tài)下標(biāo)點符號對照

2.字母和數(shù)字形狀相似

L的小寫字母“l(fā)”和數(shù)字“1”形式幾乎相同、O的小寫字母“o”與數(shù)字“0”也難以區(qū)，這在輸入代碼時要十分注意，避免單獨作為變量名使用。

3.對象名稱(Name)屬性寫錯

在窗體上創(chuàng)建的每個控件都有默認(rèn)的名稱，用于在程序中唯一地標(biāo)識該控件對象。系統(tǒng)為每個創(chuàng)建的對象提供了默認(rèn)的對象名，例如，Text1、Text2、Command1、Label1等。用戶可以將屬性窗口的(名稱)屬性改為自己所指定的可讀性好的名稱，如txtInput、txtOutput、cmdOk等。對初學(xué)者，由于程序較簡單、控件對象使用較少，還是用默認(rèn)的控件名較方便。

當(dāng)程序中的對象名寫錯時，系統(tǒng)顯示“要求對象”的信息，并對出錯的語句以黃色背景。用戶可以在代碼窗口的“對象列表”框檢查該窗體所使用的對象。

4.Name屬性和Caption屬性混淆

Name屬性的值用于在程序中唯一地標(biāo)識該控件對象，在窗體上不可見;而Caption屬性的值是在窗體上顯示的內(nèi)容。

5.對象的屬性名、方法名寫錯

當(dāng)程序中對象的屬性名、方法名寫錯時，VB系統(tǒng)會顯示“方法或數(shù)據(jù)成員未找到”的信息。在編寫程序代碼時，盡量使用自動列出成員功能，即當(dāng)用戶在輸入控件對象名和句點后，系統(tǒng)自動列出該控件對象在運行模式下可用的屬性和方法，用戶按空格鍵或雙擊鼠標(biāo)即可，這樣既可減少輸入也可防止此類錯誤

6.變量名寫錯

用Dim聲明的變量名，在后面的使用中表示同一變量而寫錯了變量名，VB編譯時就認(rèn)為是兩個不同的變量。例如，下面程序段求1~100的和，結(jié)果放在Sum變量中：

Dim sum As Integer，i As Integer

Sum=0

For i =1 to 100

Sum=Sun+i

Next i

Print Sum

顯示的結(jié)果為100。原因是累加和表達(dá)式Sum=Sun+i中的右邊的變量名Sum寫成Sun。VB對變量聲明有兩種方式，可以用變量聲明語句顯式聲明，也可以用隱式聲明，即不聲明直接使用。上述變量名的寫錯，系統(tǒng)為兩個不同的變量各自分配內(nèi)存單元，造成計算結(jié)果不正確。因此，為防止此類錯誤產(chǎn)生，必須對變量聲明采用限制其為顯式聲明方式，也就是在通用聲明段加Option Explicit語句。

7.語句書寫位置錯

在VB中，除了在“通用聲明”段利用Dim等對變量聲明語句外，其他任何語句都應(yīng)在事件過程中，否則運行時會顯示“無效外部過程”的信息。若要對模塊級變量進(jìn)行初始化工作，則一般放在Form Load()事件過程中。

8.無意形成控件數(shù)組

若要在窗體上創(chuàng)建多個命令按鈕，有些讀者會先創(chuàng)建一個命令按鈕控件，然后利用對該控件進(jìn)行復(fù)制、粘貼，這時系統(tǒng)顯示：已經(jīng)有一個控件為“Command1”。創(chuàng)建一個控件數(shù)組嗎?的信息，若單擊“是”按鈕，則系統(tǒng)創(chuàng)建了名稱為Command1的控件數(shù)組。若要對該控件的 Click事件過程編程，系統(tǒng)顯示的框架是：

Private Sub Command1_Click(Index As Integer)

End Sub

Index表示控件數(shù)組的下標(biāo)。

若非控件數(shù)組，Click事件過程的框架是：

Private Sub Command1_Click()

End Sub

請注意直到學(xué)習(xí)實驗 數(shù)組前，一律不使用控件數(shù)組

9.Print方法中定位問題

定位通過Tab、Spc函數(shù)和最后的逗號、分號和無符號來控制。VB中通過Print方法中各參數(shù)的綜合使用達(dá)到所需的結(jié)果，但初學(xué)者往往難以掌握。

(1)Tab(n)與Spc(n)的區(qū)別

Tab(n)從最左第1列開始算起定位于第n列，若當(dāng)前打印位置已超過n列，則定位于下一行的第n列，這是常常定位不好出現(xiàn)的問題。在格式定位中，Tab用得最多。

Spc(n)從前一打印位置起空n個空格。例如，下面程序段顯示了Tab與Spc的區(qū)別，效果如圖所示。

Private Sub Commandl_Click()

Print “1234567890”，Print Tab(1);”**“’;Tab(2);”%%%“;spc(2);”$$$$“

End Sub

(2)緊湊格式”;“分號的使用

緊湊格式”;“，即輸出項之間無間隔。但對于數(shù)值型，輸出項之間系統(tǒng)自動空一列，而由于數(shù)值系統(tǒng)自動加符號位，因此，大于零的數(shù)值，實際空兩列。對于字符型之間無空格。

例如，下面程序段，效果如圖所示。

Private Sub Command1_Click()

Print 1;-2;3

Print”1234“;”5678“

Print”A“;”B“;”C“;”D“,”E“,”F“

End Sub

從該例應(yīng)區(qū)分?jǐn)?shù)值和字符在緊湊格式輸出的差異。

10.打開工程時找不到對應(yīng)的文件

一般，一個再簡單的應(yīng)用程序也應(yīng)由一個工程.vbp文件和一個窗體.frm文件組成。工程文件

記錄該工程內(nèi)的所有文件(窗體.frm文件、標(biāo)準(zhǔn)模塊.bas文件、類模塊.cls文件等)的名稱和所存放在磁盤上的路徑。

若在上機結(jié)束后，把文件復(fù)制到U盤上保存，但又少復(fù)制了某個文件，下次打開工程時就會顯示”文件未找到“。也有在VB環(huán)境外，利用Windows資源管理器或DOS命令將窗體文件等改名，而工程文件內(nèi)記錄的還是原來的文件名，這樣也會造成打開工程時顯示”文件未找到“。解決此問題的方法：一是修改.vbp工程文件中的有關(guān)文件名;二是通過”工程“菜單的”添加窗體“中的”現(xiàn)存"選項，將改名后的窗體加入工程

第三篇：Vb設(shè)計實驗報告

Vb設(shè)計實驗報告

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

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

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

3、運行調(diào)試：在系統(tǒng)制作中的運行調(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個模塊，各個模塊之間可以自由訪問。

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

五、設(shè)計心得：

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

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

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

VB順序設(shè)計

教學(xué)目的：

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

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

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

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

課時安排：

理論教學(xué)安排6課時，上機練習(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 上機練習(xí)： P47-49 例1到例3 P78 上機調(diào)試題1

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

Int(n*rnd)+1

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

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

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

n=val(text1.text)3）產(chǎn)生x1,x2,x3三個隨機數(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 [輸出項列表] 具體語句如下：

Form1.print 輸出項表

Picture1.print 輸出項表 例如：

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

2、功能：

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

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

3、輸出項表的格式

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

Print 1 Print “1”

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

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

輸出數(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ù)項可以省缺。-------標(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)-------在分號分隔符輸出項之間產(chǎn)生指定個數(shù)的空格。Print “中國”;”湖北”

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

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

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

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

格式串輸出函數(shù)format(表達(dá)式，格式串)------常用于數(shù)值的輸出。上機練習(xí)： P51-54 例3.4,3.5 P79 上機調(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, “姓名輸出框” 上機練習(xí)：

1、P69 例3.8

2、P80 上機調(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 輸出項表

picture1.print 輸出項表

重點：輸出項表的格式

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 上機練習(xí)： P79、上機練習(xí)5、6 上機練習(xí)5

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

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

上機練習(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 上機練習(xí)3 四位數(shù)（1000-9999）Int((9999-1000+1)*rnd+1000)產(chǎn)生一個四位隨機整數(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方法中輸出項列表的格式。

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

第五篇：點彩游戲公開課教學(xué)設(shè)計

一、案例主題：

在學(xué)生成長的過程中，各種各樣的色彩是最能打動他們心扉的?？梢哉f，色彩也是最能夠引起他們興趣的美術(shù)語言之一。本課以真實性、樸實性和學(xué)科性為指導(dǎo)思想進(jìn)行教學(xué)設(shè)計。由于點彩畫的知識特別豐富，在一節(jié)課里要面面俱到是不可能的。因此，我根據(jù)教學(xué)目標(biāo)、教學(xué)的重點、難點以及學(xué)生的實際情況進(jìn)行了本課的設(shè)計。力求做到課件少而精，不擺花架子，讓學(xué)生學(xué)得扎實。

二、案例背景：

點彩是新印象主義以色彩分割原理為依據(jù)所采用的一種繪畫表現(xiàn)形式，又被稱為“點彩法”。其主要是利用不同的純色點和塊并列在一起形成的畫面。課本中展示了法國新印象主義畫家保羅·西涅克的作品《納蒂布港》和修拉的《大碗島星期天的下午》，目的是讓學(xué)生了解點彩畫的主要特征，提高研究點彩畫的興趣。而且通過學(xué)習(xí)了解簡單的點彩畫，讓學(xué)生初步接觸點彩，知道點彩的特點及簡單技巧。教材中還列舉了不同種類的色點的效果，提示學(xué)生可以根據(jù)表現(xiàn)內(nèi)容的需要運用不同的色點來表現(xiàn)色調(diào)，豐富學(xué)生的表現(xiàn)力。三、三維目標(biāo)：

1.知識與技能：學(xué)生初步接觸點彩畫，知道點彩的繪畫特點及簡單技巧，并用點彩法創(chuàng)作一幅畫。

2.過程與方法：通過思考、比較、欣賞與討論，使學(xué)生感知點彩畫的畫面效果，了解點彩畫的原理。

3.情感態(tài)度與價值觀：通過學(xué)習(xí)活動，引導(dǎo)學(xué)生富有創(chuàng)意地學(xué)習(xí)運用各種繪畫手段，豐富學(xué)生的想象力，激發(fā)其對美好事物的表現(xiàn)以及創(chuàng)造的欲望。

四、教學(xué)重點難點：

教學(xué)重點：充分利用色彩和不同的點法創(chuàng)作一幅點彩畫。

教學(xué)難點：能夠使用點彩的方法創(chuàng)作相對完整的作品，豐富表現(xiàn)手段。

五、課前準(zhǔn)備

教師：課件、水彩筆、油畫棒、水粉顏料等。

學(xué)生：水彩筆、油畫棒、水粉顏料、鉛筆、棉簽等工具。

六、教學(xué)過程：

（一）直接導(dǎo)入

出示課件，講述今天這節(jié)課我們要進(jìn)行一次點彩游戲，激發(fā)學(xué)生的學(xué)習(xí)興趣。然后講述這次游戲分成四關(guān)，要通過每一關(guān)才能算是取得勝利。

（二）進(jìn)行游戲

通過游戲的方式將教學(xué)內(nèi)容層層深入，每一關(guān)都設(shè)置一個小的教學(xué)目標(biāo)：

第一關(guān)，比眼力。

通過觀察發(fā)現(xiàn)點彩畫跟我們以往的作品有什么不同？同時插入對點彩派的簡介。（教學(xué)目標(biāo)：發(fā)現(xiàn)點彩的與眾不同之處）

第二關(guān)，比腦力。通過觀察老師事先準(zhǔn)備好的三幅不同工具點出來的作品，猜一猜他們是用什么工具點的？除了這些工具還有那些工具我們可以用來進(jìn)行點彩？（教學(xué)目標(biāo)：點彩使用的工具有很多種）

第三關(guān)，模仿力。出示幾張用不同點點的蘋果，讓學(xué)生觀察點與點的區(qū)別，同時選擇一種工具學(xué)者用點的方式做一個蘋果。（教師示范，學(xué)生第一次進(jìn)行練習(xí)）第四關(guān)，創(chuàng)作力。了解點彩可以使用的工具，以及點彩的方法，學(xué)著用點彩的方式創(chuàng)作一幅點彩畫。提出作業(yè)具體要求，進(jìn)行第二次作業(yè)。

師：第四關(guān)，也是我們的最后一關(guān)，這一關(guān)要考察的是同學(xué)們的創(chuàng)造力。在這里老師要具體講解一下這一關(guān)的游戲規(guī)則。游戲規(guī)則（作業(yè)要求）：ppt7

1、選擇任一種點彩工具進(jìn)行點彩游戲（如：水彩筆、油畫棒、水粉顏料等等）

2、先用深顏色點出圖案的邊緣或者是勾畫出邊緣，然后用點的方式給事先準(zhǔn)備好的圖案進(jìn)行填色。

3、背景可以留白，時間充足的同學(xué)可以用點彩的方式對背景進(jìn)行裝飾。師：最后一關(guān)了，希望同學(xué)們加油，爭取闖關(guān)成功。

（學(xué)生進(jìn)行作業(yè)練習(xí)…….）

（作業(yè)點評）

闖關(guān)成功，勝利就在眼前… …

師：經(jīng)過重重難關(guān)，我們終于來到了終點，讓我一起來欣賞點彩給我們的生活帶來的精彩?？匆豢?，點彩在我們生活中的應(yīng)用。Ppt8

師：這次游戲就到此結(jié)束了，希望同學(xué)們通過這次游戲，能將我們的點彩與電腦繪畫結(jié)合在一起，利用電腦繪畫中的噴槍工具、基本圖形等等來創(chuàng)作一幅電腦繪畫作品。

（結(jié)束）