算法與程序設(shè)計(jì)高中信息技術(shù)（必修）第二章程序設(shè)計(jì)基礎(chǔ)《VB中的數(shù)據(jù)類型、變量、函數(shù)》高中信息技術(shù)（必修）

信息技術(shù)基礎(chǔ)第一節(jié)順序結(jié)構(gòu)程序設(shè)計(jì)廣東汕頭華僑中學(xué)技術(shù)組一、VB語(yǔ)言概述Privatesubcommand1_click()

constpiassingle=3.14

dimrassingle,sassingler=inputbox(”r=”,”輸入半徑”)s=pi*r*r

print

”圓的面積s=”；sendsub

下面是一個(gè)“求半徑為r的圓的面積”，請(qǐng)注意觀察程序的組成結(jié)構(gòu)，思考一下問題：1、程序有多少行，每一行的作用？2、如按語(yǔ)句作用區(qū)分，這個(gè)程序包含及部分？

定義事件過程（自帶）說明常量pi（省略）說明變量r，s（不可省略）輸入r的值計(jì)算圓的面積把計(jì)算結(jié)果輸出到窗體上過程結(jié)束（自帶）高中信息技術(shù)（必修）

信息技術(shù)基礎(chǔ)第一節(jié)順序結(jié)構(gòu)程序設(shè)計(jì)廣東汕頭華僑中學(xué)技術(shù)組一、VB語(yǔ)言概述VB程序一般包含如下部分：1、數(shù)據(jù)類型說明部分2、數(shù)據(jù)輸入部分3、數(shù)據(jù)處理部分4、數(shù)據(jù)輸出部分高中信息技術(shù)（必修）

信息技術(shù)基礎(chǔ)第一節(jié)順序結(jié)構(gòu)程序設(shè)計(jì)廣東汕頭華僑中學(xué)技術(shù)組一、VB語(yǔ)言概述1、常用數(shù)據(jù)類型數(shù)據(jù)類型類型說明符所占字節(jié)取值范圍整形Integer2字節(jié)-32768~32767長(zhǎng)整形Long4字節(jié)-2147483648~2147483647單精度Single4字節(jié)實(shí)數(shù)雙精度型Double8字節(jié)實(shí)數(shù)比單精度大的多字符串型String10字節(jié)+字符串長(zhǎng)度定長(zhǎng)字符串長(zhǎng)度0~65536個(gè)字符日期型Date8字節(jié)日期布爾型Boolean2字節(jié)True或flase是/非真/假整形、長(zhǎng)整形、單精度和雙精度都屬于數(shù)值型。字符串型數(shù)據(jù)必須用英文””。布爾型又稱邏輯型，VB中常用0表示假值，-1表示真值。日期型，VB中采用一對(duì)#把日期和時(shí)間括起來如#2018/08/20#高中信息技術(shù)（必修）

信息技術(shù)基礎(chǔ)第一節(jié)順序結(jié)構(gòu)程序設(shè)計(jì)廣東汕頭華僑中學(xué)技術(shù)組一、VB語(yǔ)言概述2、常量：指在運(yùn)行過程中始終保持不變的常數(shù)、字符串等。如上程序段中的3.14、“r=”、“輸入半徑”等。常量定義：Const常量名【AS類型】=表達(dá)式如：ConstPI=3.14ConstPIASsingle=3.14即【】?jī)?nèi)的內(nèi)容可選。高中信息技術(shù)（必修）

信息技術(shù)基礎(chǔ)第一節(jié)順序結(jié)構(gòu)程序設(shè)計(jì)廣東汕頭華僑中學(xué)技術(shù)組一、VB語(yǔ)言概述3、變量:在程序處理數(shù)據(jù)時(shí)，對(duì)于輸入的數(shù)據(jù)、參加運(yùn)算的數(shù)據(jù)、運(yùn)行結(jié)果等臨時(shí)數(shù)據(jù)，通常把它們暫時(shí)存儲(chǔ)在計(jì)算機(jī)的內(nèi)存中。變量就是命名的內(nèi)存單元位置。5a變量名稱變量值存儲(chǔ)單元(1)變量命名1、必須以字母或漢字開頭，而不能以數(shù)字或其它字符開頭。2、只能由字母、漢字、數(shù)字和下劃線組成，不能含有小數(shù)點(diǎn)、空格等字符。3、長(zhǎng)度不超過255個(gè)4、變量名不能使用VB中的保留字。如：VB

printsubEND5、VB變量名不區(qū)分大小寫(2)變量聲明變量應(yīng)該先聲明后使用。聲明方法：Dim變量名AS數(shù)據(jù)類型如：DimNasintegerDimaasinteger,basinteger例：DimcountAsIntegercount是整數(shù)類型的變量

DimxAsDouble,yAsDoublex和y都是雙精度實(shí)數(shù)類型的變量

DimNameAsStringName是字符串類型的變量4、VB中的基本運(yùn)算和表達(dá)式基本運(yùn)算運(yùn)算符優(yōu)先級(jí)乘冪^1取負(fù)-2乘法*3實(shí)數(shù)除法/3整數(shù)除法\4求余數(shù)Mod5加法+6減法-6表達(dá)式表達(dá)式的值25^0.55-aa的相反值3*2.57.53/21.53\218Mod5-7Mod33-1a+ba與b的和a-ba和b的差算術(shù)運(yùn)算符基本運(yùn)算運(yùn)算符優(yōu)先級(jí)相等=7不相等<>7小于<7大于>7小于等于<=7大于等于>=7關(guān)系運(yùn)算符表達(dá)式表達(dá)式的值1990Mod4=0False〞abc〞<>〞abd〞True5<10True10>100False10<=20True10>=20False基本運(yùn)算運(yùn)算符優(yōu)先級(jí)非Not8與And9或Or10邏輯運(yùn)算符表達(dá)式表達(dá)式的值Not(3>2)False(25>=10)

And(25<=100)True(25>100)Or(25<2)False邏輯“非”運(yùn)算：計(jì)算結(jié)果是原始數(shù)據(jù)的邏輯值的相反邏輯“與”運(yùn)算：僅當(dāng)運(yùn)算符兩邊的表達(dá)式的邏輯值都為真時(shí)，計(jì)算結(jié)果值才為真，否則計(jì)算結(jié)果總是假。邏輯“或”運(yùn)算：僅當(dāng)運(yùn)算符兩邊的表達(dá)式的邏輯值都為假時(shí)，計(jì)算結(jié)果值才為假，否則計(jì)算結(jié)果總是真。5、VB常用的標(biāo)準(zhǔn)函數(shù)函數(shù)名函數(shù)功能Abs(x)求X的絕對(duì)值Int(x)求不大于X的最大整數(shù)Sqr(x)求X的算術(shù)平方根Rnd(x)返回[0，1）的隨機(jī)數(shù)Exp(x)求e的x次方Log(x)求以e為底的x的對(duì)數(shù)Sin(x)求x的正弦值Cos(x)求x的余弦值Tan(x)求x的正切值舉例返回值A(chǔ)bs(-3.5)3.5Int(4.1)Int(-4.1)4-5Sqr(4)2Exp(2)7.389056Log(3)1.098612Sin(3.1416/2)0.9999999Cos(3.1416/3)0.4999999Tan(3.1416/3)1.7320606常用數(shù)學(xué)函數(shù)函數(shù)名函數(shù)功能Asc(x)字符轉(zhuǎn)換為ASCIIChr(x)ASCII轉(zhuǎn)換為字符Val(x)數(shù)字字串轉(zhuǎn)換為數(shù)值Str(x)數(shù)值轉(zhuǎn)換成字符串Len(x)計(jì)算字符串的長(zhǎng)度Mid(x,n,k)取字符串x中第n個(gè)字符起長(zhǎng)度為k的子串Fix(x)截掉數(shù)據(jù)的小數(shù)部分舉例

返回值A(chǔ)sc("A")65Chr(48)"0"Val("-170")170Str(-170)"-170"Len("asd")3Mid(“abcd",3,1)"c"Fix(2.56)2常用類型轉(zhuǎn)換函數(shù)和字符串函數(shù)高中信息技術(shù)（必修）

信息技術(shù)基礎(chǔ)第一節(jié)順序結(jié)構(gòu)程序設(shè)計(jì)廣東汕頭華僑中學(xué)技術(shù)組一、VB語(yǔ)言概述常用函數(shù)：內(nèi)部函數(shù)和自定義函數(shù)函數(shù)名函數(shù)的功能應(yīng)用舉例返回值A(chǔ)bs(x)求X的絕對(duì)值A(chǔ)bs(-3.5)3.5Sqr(x)求X的算術(shù)平方根Sqr(9)3Val(x)數(shù)字字符串轉(zhuǎn)換為數(shù)值Val(“123”)123練習(xí)：表達(dá)式ABS（-3.6）*Sqr（100）的值是（）

A：-360B：360C：-36D：36高中信息技術(shù)（必修）

信息技術(shù)基礎(chǔ)第一節(jié)順序結(jié)構(gòu)程序設(shè)計(jì)廣東汕頭華僑中學(xué)技術(shù)組一、VB語(yǔ)言概述6、表達(dá)式：指由運(yùn)算符、圓括號(hào)、將變量、函數(shù)等以合理的形式連接起來的式子高中信息技術(shù)（必修）

信息技術(shù)基礎(chǔ)第一節(jié)順序結(jié)構(gòu)程序設(shè)計(jì)廣東汕頭華僑中學(xué)技術(shù)組二、賦值語(yǔ)句基本格式：變量=表達(dá)式例：

a=ba=123a=a+10第三句表示將變量a的值加上10后再賦給a,注意與數(shù)學(xué)表達(dá)式的區(qū)別高中信息技術(shù)（必修）

信息技術(shù)基礎(chǔ)第一節(jié)順序結(jié)構(gòu)程序設(shè)計(jì)廣東汕頭華僑中學(xué)技術(shù)組二、賦值語(yǔ)句實(shí)踐：如果a=30，b=40，則依次執(zhí)行語(yǔ)句t=a，

a=b，b=t后，兩個(gè)變量a，b的值會(huì)怎樣？變量t變量a變量b開始狀態(tài)第一步：t=a第二步：a=b第三步：b=t30404040304040303030303040高中信息技術(shù)（必修）

信息技術(shù)基礎(chǔ)第一節(jié)順序結(jié)構(gòu)程序設(shè)計(jì)廣東汕頭華僑中學(xué)技術(shù)組三、Print語(yǔ)句1.基本格式：

print輸出內(nèi)容2.功能：（1）計(jì)算功能（2）將值輸出到窗體上3.輸出內(nèi)容說明：（1）輸出內(nèi)容：引號(hào)引起來的字符串→原樣輸出

Print"你好"

結(jié)果為你好（2）輸出內(nèi)容：表達(dá)式→先計(jì)算，后輸出計(jì)算值；

Print5＋3

結(jié)果為8

Print"x=";

5＋3

結(jié)果為x=8高中信息技術(shù)（必修）

信息技術(shù)基礎(chǔ)第一節(jié)順序結(jié)構(gòu)程序設(shè)計(jì)廣東汕頭華僑中學(xué)技術(shù)組三、Print語(yǔ)句4.輸出項(xiàng)的間隔符：輸出內(nèi)容可以是一個(gè)或多個(gè)。如果是多個(gè)輸出內(nèi)容，則各輸出內(nèi)容之間可以用逗號(hào)或分號(hào)分隔

（1）分號(hào)：則后面一個(gè)輸出內(nèi)容緊跟前一個(gè)輸出（緊湊格）

Print"早安";

"中國(guó)"

結(jié)果為早安中國(guó)（2）逗號(hào)，則按照分區(qū)(14個(gè)字符位置)格式輸出（分區(qū)格）

Print“早安”，“中國(guó)”結(jié)果為早安中國(guó)（3）如果Print中沒有輸出內(nèi)容，則表達(dá)輸出一個(gè)空行。

print“x=”;x,

“y=”;y結(jié)果為x=xy=y

PrintPrint"China"China高中信息技術(shù)（必修）

信息技術(shù)基礎(chǔ)第一節(jié)順序結(jié)構(gòu)程序設(shè)計(jì)廣東汕頭華僑中學(xué)技術(shù)組三、Print語(yǔ)句3.實(shí)踐1：運(yùn)行下面的代碼，觀察結(jié)果，體會(huì)輸出語(yǔ)句中各個(gè)符號(hào)的作用。a=5b=3print“a=”；a，“b=”；b高中信息技術(shù)（必修）

信息技術(shù)基礎(chǔ)第一節(jié)順序結(jié)構(gòu)程序設(shè)計(jì)廣東汕頭華僑中學(xué)技術(shù)組三、Print語(yǔ)句3.實(shí)踐2：運(yùn)行下面的代碼，觀察結(jié)果，體會(huì)輸出語(yǔ)句中各個(gè)符號(hào)的作用。a=5b=3print“a=”；a；“b=”；b高中信息技術(shù)（必修）

信息技術(shù)基礎(chǔ)第一節(jié)順序結(jié)構(gòu)程序設(shè)計(jì)廣東汕頭華僑中學(xué)技術(shù)組三、Print語(yǔ)句3.實(shí)踐3：運(yùn)行下面的代碼，觀察結(jié)果，體會(huì)輸出語(yǔ)句中各個(gè)符號(hào)的作用。a=5b=3print“a=”；a，Print“b=”；b高中信息技術(shù)（必修）

信息技術(shù)基礎(chǔ)第一節(jié)順序結(jié)構(gòu)程序設(shè)計(jì)廣東汕頭華僑中學(xué)技術(shù)組三、Print語(yǔ)句3.實(shí)踐4：運(yùn)行下面的代碼，觀察結(jié)果，體會(huì)輸出語(yǔ)句中各個(gè)符號(hào)的作用。a=5

b=3print“a=”；aPrint“b=”；b高中信息技術(shù)（必修）

信息技術(shù)基礎(chǔ)第一節(jié)順序結(jié)構(gòu)程序設(shè)計(jì)廣東汕頭華僑中學(xué)技術(shù)組三、Print語(yǔ)句3.實(shí)踐5：輸出以下圖形*********

print“*”Print“***”

Print“*****”思考：*********15行？****高中信息技術(shù)（必修）

信息技術(shù)基礎(chǔ)第一節(jié)順序結(jié)構(gòu)程序設(shè)計(jì)廣東汕頭華僑中學(xué)技術(shù)組四、輸入函數(shù)1.Inputbox（）函數(shù)基本格式：變量=Inputbox("提示信息"

，

"標(biāo)題"

，默認(rèn)值，位置)例：

R=inputbox(”請(qǐng)輸入R”,”輸入圓半徑”)說明：由于inputbox（）是一個(gè)函數(shù)，因此不能單獨(dú)使用。一定要把它的返回值賦給一個(gè)變量。該函數(shù)返回值的是字符串類型高中信息技術(shù)（必修）

信息技術(shù)基礎(chǔ)第一節(jié)順序結(jié)構(gòu)程序設(shè)計(jì)廣東汕頭華僑中學(xué)技術(shù)組四、輸入函數(shù)2.Inputbox（）函數(shù)應(yīng)用例1：編程求半徑為r=6的圓的面積提問：如果圓的半徑為8，15，30分別計(jì)算圓的面積，上述程序段如何修改？

r=6s=3.14*r*r

print“圓的面積s=”；s提問：如果計(jì)算任意半徑圓的面積，上述程序如何修改？高中信息技術(shù)（必修）

信息技術(shù)基礎(chǔ)第一節(jié)順序結(jié)構(gòu)程序設(shè)計(jì)廣東汕頭華僑中學(xué)技術(shù)組四、輸入函數(shù)2.Inputbox（）函數(shù)應(yīng)用例2：編程求半徑為r=6的圓的面積r=inputbox(“r=”,”輸入半徑”)s=3.14*r*r

print“圓的面積s=”；s提問：例2與例1相比，好在哪？val()MsgBox()函數(shù)基本語(yǔ)法格式：MsgBox(提示信息[,按鍵][標(biāo)題])如：j=MsgBox(”你輸入的數(shù)據(jù)格式不正確，是否繼續(xù)？”，VBYesNO,”錯(cuò)誤提示”)

蘋果問題MsgBox("您輸入了一個(gè)不正確的斤數(shù)，請(qǐng)重新輸入！")例1：在VB中，用變量h1存儲(chǔ)人民幣與美元的匯率（如：6.348），則變量h1的數(shù)據(jù)類型應(yīng)說明為（）（A）Integer（B）Single（C）Date（D）LongB例2：在VisualBasic中，用變量code存儲(chǔ)學(xué)生的借閱卡編碼(如“CH20130036”)，則變量code的數(shù)據(jù)類型應(yīng)說明為

（A）Integer

（B）Single

（C）String

（D）DateC例3：在VB中，下列能作為變量名的是（）（A）End（B）b@7（C）2a（D）pass_1D（2）設(shè)a=2,b=3,c=4,d=5,表達(dá)式a>bANDc<=dOR2*a>c的值是（A）True（B）Flase（C）-1（D）1B（3）在物理學(xué)中，兩個(gè)物體質(zhì)量分別為m1和m2，計(jì)算它們之間的萬有引