【課件】VB語(yǔ)言及程序開(kāi)發(fā)（課件）-高一信息技術(shù)下冊(cè)

第二章程序設(shè)計(jì)基礎(chǔ)2-2VB語(yǔ)言及程序開(kāi)發(fā)粵教版算法與程序設(shè)計(jì)（選修1）以下是一個(gè)“求半徑為r的圓的面積”的程序，Privatesubcommand1_click()'定義名為command1_click()的事件過(guò)程

ConstpiAsSingle=3.14'說(shuō)明程序中pi是常量DimrAsSingle,sAsSingle'定義半徑r和面積s為單精度實(shí)型r=InputBox("r=","請(qǐng)輸入半徑")'輸入r的值s=pi*r*r'把表達(dá)式pi*r*r的值賦給sPrint"圓的面積s=";sEndSub'過(guò)程結(jié)束

考察上述程序問(wèn)題一請(qǐng)你注意觀察程序1的組成結(jié)構(gòu)及其功能，并思考如下的問(wèn)題：

（1）程序有多少行，每一行的作用是什么？

（2）如果按語(yǔ)句的作用區(qū)分，這個(gè)程序包含幾個(gè)部分？小結(jié)：VB程序的一般包括如下部分：

（1）

數(shù)據(jù)類(lèi)型說(shuō)明部分

（2）

數(shù)據(jù)的輸入部分

（3）

數(shù)據(jù)的處理部分

（4）

數(shù)據(jù)的輸出部分

一、基本數(shù)據(jù)類(lèi)型【活動(dòng)任務(wù)1】閱讀表2-1中列出VB定義的常用的基本數(shù)據(jù)類(lèi)型二、常量和變量（1）常量：常量是指在程序運(yùn)行過(guò)程中始終保持不變的常量、字符串等?；顒?dòng)任務(wù)2：在上述程序1中，哪些是常量？

常量說(shuō)明語(yǔ)句的格式是：

Const常量名As類(lèi)型=表達(dá)式二、常量和變量（2）變量：對(duì)于輸入的數(shù)據(jù)、參加運(yùn)算的數(shù)據(jù)、運(yùn)行結(jié)果等臨時(shí)數(shù)據(jù)，通常把它們暫時(shí)存儲(chǔ)在計(jì)算機(jī)中。Dim變量As類(lèi)型

三、運(yùn)算符、函數(shù)和表達(dá)式（1）運(yùn)算符

運(yùn)算符是對(duì)數(shù)據(jù)進(jìn)行加工的過(guò)程。描述各種不同運(yùn)算的符號(hào)稱(chēng)為運(yùn)算符，參與運(yùn)算的數(shù)據(jù)稱(chēng)為操作數(shù)。在VB中，常用的運(yùn)算符有算術(shù)運(yùn)算符、字符串運(yùn)算符和邏輯運(yùn)算符等。【活動(dòng)任務(wù)3】：閱讀教材中的運(yùn)算符表，體會(huì)與數(shù)學(xué)運(yùn)算符的區(qū)別

（2）函數(shù)在VB中有兩類(lèi)函數(shù)，分別是內(nèi)部函數(shù)和自定義函數(shù)轉(zhuǎn)換函數(shù)。常用的內(nèi)部函數(shù)有數(shù)值函數(shù)、字符函數(shù)、時(shí)間/日期函數(shù)和其它函數(shù)等，如表2-2所示，自定義函數(shù)是由程序員根據(jù)需要定義的函數(shù)。在程序中要使用一個(gè)函數(shù)時(shí)，只需要給出函數(shù)名和一個(gè)或多個(gè)參數(shù)，就能得到函數(shù)值?！緦W(xué)生活動(dòng)任務(wù)4】：閱讀教材中的函數(shù)名（參數(shù)表）三、運(yùn)算符、函數(shù)和表達(dá)式

（3）表達(dá)式表達(dá)式是指某個(gè)求值規(guī)則，它由運(yùn)算符和配對(duì)的圓括號(hào)將變量、常量、函數(shù)等操作數(shù)以合理的形式連接起來(lái)的式子。例如在上述的程序中，式子pi*r*r是合法的表達(dá)式。【活動(dòng)任務(wù)5】：課堂檢測(cè)題一、1-4三、運(yùn)算符、函數(shù)和表達(dá)式

【活動(dòng)任務(wù)6】打開(kāi)VB程序，認(rèn)識(shí)界面。VB程序設(shè)計(jì)語(yǔ)言的開(kāi)發(fā)環(huán)境中，控件工具箱、代碼窗口、窗體設(shè)計(jì)器窗口、工程資源管理器窗口、屬性窗口是一些常用的程序設(shè)計(jì)與調(diào)試工具四、可視化程序的開(kāi)發(fā)環(huán)境

程序2：求s=1×2×3×?×n問(wèn)題的VB程序如下：PrivateSubcommand1_click()n=InputBox("n=","請(qǐng)輸入n的值")s=1ForI=1Tons=s*INextIMsgBox"s="+Str(s),0,"計(jì)算結(jié)果"五、拓展任務(wù)【活動(dòng)任務(wù)7】1.設(shè)計(jì)簡(jiǎn)單界面2.錄入程序代碼（或復(fù)制教師給出的代碼）

當(dāng)n=22時(shí)，運(yùn)行的結(jié)果是多少？說(shuō)說(shuō)你對(duì)VB界面的認(rèn)識(shí)？說(shuō)說(shuō)你如何理