2.2數(shù)據(jù)表示與處理

程序設(shè)計(jì)數(shù)據(jù)表示與處理程序設(shè)計(jì)中，往往要處理各種各樣的數(shù)據(jù)，不同的程序設(shè)計(jì)語(yǔ)言有不同的數(shù)據(jù)類型(DataType）在VB中，為了便于數(shù)據(jù)的表示與處理，VB提供了數(shù)值型、字符串型、布爾型、日期型等基本數(shù)據(jù)類型打字測(cè)試軟件代碼Dim

dtmBeginTime

As

Data,

dtmEndTime

As

Data

Private

Sub

cmdEnd_Click()

Dim

intTimeCost

As

Integer,

intWordCont

As

Integer

dtmEndTime

=

Time()

intTimeCost

=

DateDiff("s",

dtmBeginTime,

dtmEndTime)

intWordCunt

=

Len(txtInput.Text)

txtSpeed.Text

=

intWordCount

/

(intTimeCost

/

60)

End

Sub

Private

Sub

cmdStart_Click()

dtmBeginTime

=

Time()

End

Sub整型、長(zhǎng)整型、單精度和雙精度都屬于數(shù)值型，它們表示數(shù)值的范圍是不同的。字符串型數(shù)據(jù)是指用＂＂括起來(lái)的一串字符。如＂歡迎進(jìn)入VB世界?。?、＂VisualBasic＂、＂1234＂都是字符串類型。布爾型又稱邏輯型，常用于表示邏輯判斷的結(jié)果日期型數(shù)據(jù)專門用來(lái)處理日期和時(shí)間。VB采用一對(duì)“#”把日期和時(shí)間的值括起來(lái)，如#2015/03/24#表示2015年3月24日。2.2.2常量與變量常量

常量(constant)是指在程序運(yùn)行過(guò)程中保持不變的量，在VisualBasic中，常量有數(shù)值常量、字符串常量等。⑴數(shù)值常量

數(shù)值常量就是數(shù)學(xué)中說(shuō)的常數(shù)，數(shù)值常量有整型常量和實(shí)型常量?jī)煞N。

整型常量即整數(shù)，是指不帶小數(shù)的數(shù)值，如1、0、60等都是合法的整數(shù)。

實(shí)型常量即實(shí)數(shù)，是指帶小數(shù)的數(shù)值。如3.14159⑵字符串常量

用一對(duì)雙引號(hào)括起來(lái)的若干個(gè)合法的字符稱為字符串常量。字符串常量指的是雙引號(hào)中的字符，不包括雙引號(hào)本身。例如“china”、“VisualBasic”、“18”、“3.14”等。如果程序中多次用到同一個(gè)常量，往往用一個(gè)有意義的符號(hào)表示，這種常量稱為符號(hào)常量；代表常量的符號(hào)稱為“常量名”，其定義形式如下：

Const常量名[As類型]＝表達(dá)式如：Constpi=3.14159

r=5

s=pi*r*r

Print"s=";s

2.變量

在程序執(zhí)行過(guò)程中，其值可以改變的量稱為變量(variable)，例如：a=4a=3.14a先后有2個(gè)值，也就是說(shuō)a的值是可以變化的。

每個(gè)變量都應(yīng)該有一個(gè)名字，即變量名。VisualBasic變量名：①必須以字母或漢字開(kāi)頭；②由字母、漢字、數(shù)字或下劃線組成；③變量名最長(zhǎng)不超過(guò)255個(gè)字符；④不能以VB的保留字作為變量名，如a、i、x1、age、num等均為合法的變量名，而print、l*et則是非法的變量名；⑤對(duì)字母不區(qū)分大小寫(xiě)；⑥為加強(qiáng)程序的可讀性，變量名最好要有意義的名稱，如用“age”表示“年齡”，“sum”表示“總和”等。

變量是用來(lái)存儲(chǔ)數(shù)據(jù)的，數(shù)據(jù)分為不同的類型，相應(yīng)的變量也有不同類型：

變量在使用之前應(yīng)用Dim語(yǔ)句聲明其變量名及數(shù)據(jù)類型，Dim語(yǔ)句格式為：

Dim變量名As數(shù)據(jù)類型

例如：DimiAsInteger

DimsumAsSingle

DimnameAsString

以上三個(gè)語(yǔ)句分別將i、sum、name定義為整型、實(shí)型和字符串型變量。當(dāng)然，也可以在一行中定義多個(gè)變量，如上述三個(gè)變量可如下定義：

DimiAsInteger,sumAsSingle,nameAsString

對(duì)象的屬性在VB中的含義序號(hào)對(duì)象的屬性在VB中的含義1Caption設(shè)置窗體標(biāo)題欄上的文字2Font設(shè)置字體字號(hào)字形3Visible設(shè)置程序運(yùn)行時(shí)是否可見(jiàn)4Width設(shè)置窗體的寬度5Top設(shè)計(jì)程序運(yùn)行時(shí)的垂直位置6Enabled決定運(yùn)行時(shí)窗體是否響應(yīng)用戶事件7BackColor設(shè)置背景顏色8ForeColor設(shè)置背景顏色9BorderStyle設(shè)置窗體的邊框風(fēng)格2.2.3運(yùn)算符與表達(dá)式1.算術(shù)運(yùn)算符與算術(shù)表達(dá)式VB中有很多算術(shù)運(yùn)算符(Operator)，如“+”、“－”、“*”、“/”等，用它們可以構(gòu)造出各種各樣的算術(shù)表達(dá)式。算術(shù)運(yùn)算符要求參與運(yùn)算的量是數(shù)值型，算術(shù)表達(dá)式運(yùn)算的結(jié)果也是數(shù)值型.ConstA=2運(yùn)算符含義優(yōu)先級(jí)實(shí)例結(jié)果^指數(shù)1A^10？-取負(fù)2-5+a？*乘法35*a？/除5/a？\整除45\a？mod求余數(shù)55moda？+加法6A+3？-減法A-4？思考:下列表達(dá)式的結(jié)果-3+15mod6\2+2^32.字符串運(yùn)算符與字符串表達(dá)式VB中字符串運(yùn)算符有：+和&。它們的作用都是將兩個(gè)字符串連接起來(lái)?！坝?jì)算機(jī)”&“軟件”結(jié)果是“計(jì)算機(jī)軟件”“123”+“45”結(jié)果是“12345”

需要注意的是：當(dāng)一個(gè)數(shù)字字符串表達(dá)式(如“123”)與一個(gè)數(shù)值型表達(dá)式用“+”運(yùn)算時(shí)，結(jié)果將是數(shù)值型數(shù)據(jù)。如“123”+45結(jié)果是168；而用“&”運(yùn)算結(jié)果仍是字符串類型?！?23”&45結(jié)果是“12345“3.關(guān)系運(yùn)算符與關(guān)系表達(dá)式關(guān)系運(yùn)算符有：=、<>、<、>、>=和<=。關(guān)系表達(dá)式的運(yùn)算結(jié)果為布爾值True或False，如3>2的結(jié)果為True。關(guān)系運(yùn)算符優(yōu)先級(jí)相同4.邏輯運(yùn)算符與邏輯表達(dá)式常用的邏輯運(yùn)算符有：Not(取反)、And(與)、Or(或)等，運(yùn)算結(jié)果為布爾值True或False。邏輯運(yùn)算符的優(yōu)先級(jí)為：Not>And>Or。如程序代碼中的語(yǔ)句：If(NMod3=2)And(NMod5=3)And(NMod7=2)ThenprintN其中就包含了邏輯表達(dá)式。5.日期運(yùn)算符與日期表達(dá)式日期表達(dá)式是用日期運(yùn)算符“+”或“-”將算術(shù)表達(dá)式、日期型常量、日期型變量、日期函數(shù)等連接起來(lái)的式子，如表達(dá)式“#2003/09/01#+30”的運(yùn)算結(jié)果為#2003/10/01#；表達(dá)式“#2003/10/20#-#2003/10/10#”的運(yùn)算結(jié)果為整數(shù)10。幾種數(shù)據(jù)類型的關(guān)系比較1、數(shù)值型直接比較其數(shù)值大小2、字符串類型比較：例：“abc”<“abd”

“abc”>“AB”3、日期型#2004/03/21#<#2007/03/21#6.運(yùn)算符的執(zhí)行順序

當(dāng)一個(gè)表達(dá)式中同時(shí)出現(xiàn)多種運(yùn)算符時(shí)，如何決定運(yùn)算的次序呢？在VB中，運(yùn)算次序由運(yùn)算符的優(yōu)先級(jí)決定，優(yōu)先級(jí)高的運(yùn)算符先運(yùn)算，優(yōu)先級(jí)相同的從左向右進(jìn)行運(yùn)算。不同性質(zhì)的運(yùn)算符優(yōu)先級(jí)如下：算術(shù)運(yùn)算符＞字符串連接運(yùn)算符＞關(guān)系運(yùn)算符＞邏輯運(yùn)算符2.2.4常用語(yǔ)句與函數(shù)

1.賦值語(yǔ)句把常量、變量或表達(dá)式的值賦給一個(gè)變量VB中賦值語(yǔ)句用“=”來(lái)實(shí)現(xiàn)變量=常量、變量或表達(dá)式對(duì)象.屬性值=常量、變量或表達(dá)式例:dimaasinteger,basintegera=2b=ab=b+1Text1.text=“hello”2.Print語(yǔ)句(輸出)語(yǔ)法格式：[對(duì)象名.]Print[輸出內(nèi)容]輸出內(nèi)容可以是常量,變量或表達(dá)式的值(如果不指定對(duì)象名，默認(rèn)在當(dāng)前窗體上輸出)

例如:picture1.print“hello”print“hello”窗體、圖片框等輸出內(nèi)容可以是一個(gè)或多個(gè)，各內(nèi)容之間用“;”或“,”隔開(kāi)。比較用“;”或“,”隔開(kāi)輸出的區(qū)別例如:A=3B=2C=a+bPrint“c=”;cPrint“c=”,c用；隔開(kāi)，各個(gè)內(nèi)容緊跟著用，隔開(kāi)，按分區(qū)格式輸出3.注釋語(yǔ)句為了提高程序的可讀性，通常需要在程序適當(dāng)?shù)奈恢眉由媳匾淖⑨?。（添加注釋是編程的一個(gè)好習(xí)慣。）VB中注釋語(yǔ)句的格式為：⑴在字符“

‘

”后加注釋內(nèi)容

A=2‘把2賦給變量a⑵用“Rem注釋內(nèi)容”。Rem計(jì)算圓的周長(zhǎng)c=2*PI*r注意：如果用Rem語(yǔ)句注釋，應(yīng)將Rem語(yǔ)句單獨(dú)書(shū)寫(xiě)，不可像’一樣直接放在其他語(yǔ)句后面，否則VB將提示錯(cuò)誤，4.結(jié)束語(yǔ)句語(yǔ)法格式：End功能：強(qiáng)制程序結(jié)束運(yùn)行。函數(shù)內(nèi)部函數(shù)是由VB系統(tǒng)提供的，每個(gè)內(nèi)部函數(shù)完成某個(gè)特定功能。例：time()‘返回系統(tǒng)當(dāng)前時(shí)間在程序中使用函數(shù)稱為調(diào)用函數(shù)，函數(shù)調(diào)用后，一般都有返回一個(gè)確定的函數(shù)值。Begintime=time()Printtime()5.與用戶交互函數(shù)⑴InputBox(提示[,標(biāo)題][，默認(rèn)值][，x坐標(biāo)][，y坐標(biāo)])返回輸入對(duì)話框中輸入的數(shù)據(jù)X=inputbox(提示[,標(biāo)題][，默認(rèn)值][，x坐標(biāo)][，y坐標(biāo)])⑵MsgBox()函數(shù)是VB程序設(shè)計(jì)中常用的交互函數(shù)，其功能非常強(qiáng)大，可以顯示多種樣式的消息對(duì)話框?；菊Z(yǔ)法格式：MsgBox(提示信息[,按鈕][，標(biāo)題])6.數(shù)學(xué)函數(shù)

三角函數(shù)中的參數(shù)應(yīng)是弧度數(shù)，如數(shù)學(xué)中sin30°應(yīng)寫(xiě)為：sin(30*3.1415926/180)Rnd函數(shù)返回[0,1)即包括0，但不包括1）之間的一個(gè)隨機(jī)雙精度數(shù)，它往往和randomize結(jié)合使用。返回<=X的最大整數(shù)7.字符串函數(shù)8.日期函數(shù)

Date()函數(shù)返回系統(tǒng)的當(dāng)前日期。Time()函數(shù)返回系統(tǒng)的當(dāng)前時(shí)間，如：dtmBeginTime=Time()，將系統(tǒng)當(dāng)前時(shí)間賦給變量dtmBeginTime。以此類推，Day()、Month()、Year()函數(shù)分別返回指定日期的日數(shù)、月份數(shù)、年份數(shù)。9.常用轉(zhuǎn)換函數(shù)

練習(xí)：1.VB的數(shù)據(jù)類型分為()A．?dāng)?shù)值型、字符型、布爾型、日期型B．?dāng)?shù)值型、字符型、對(duì)象型、日期型C．基本類型、擴(kuò)展類型D．整型、實(shí)型、字符型、日期型、布爾型2.下列變量名中，合法的變量名是()A.

C24

B.

AB

C.

A:B

D.1+23.VB中運(yùn)算符被分為四類，分別是()A．算術(shù)運(yùn)算符、字符串運(yùn)算符、關(guān)系運(yùn)算符、邏輯運(yùn)算符B．算術(shù)運(yùn)算符、比較運(yùn)算符、關(guān)系運(yùn)算符、邏輯運(yùn)算符C．算術(shù)運(yùn)算符、連接運(yùn)算符、布爾運(yùn)算符、邏輯運(yùn)算符D．連接運(yùn)算符、比較運(yùn)算符、邏輯運(yùn)算符、關(guān)系運(yùn)算符AAA4.表達(dá)式(2*3)>=5And12/3<=4的值為()5.數(shù)學(xué)關(guān)系3≤x<10表示成正確的VB表達(dá)式為()A.3=<x<10B.3=<xAndx<10C.x>=3Orx<10D.x>=3Andx<106.A為True，B為False,則“AandB”

和“AOrB”

的值分別是（）和（）A.True，TrueB.True，F(xiàn)alseC.False，TrueD.False，F(xiàn)alseTrueDC7.在VB中表達(dá)式11\3+11Mod3的運(yùn)算結(jié)果值是()A.3B.4C.5D.68.語(yǔ)句段

a=3:b=5

t=a:a=b:b=t執(zhí)行后，（）A.a值為3，b值為3B.a值為3，b值為5C.a值為5，b值為5D.a值為5，b值為3CD9.假設(shè)a=2,b=3,c=4,d=5,表達(dá)式a>bAnd2*a>cOrc<=d的值是()A.TrueB.FalseC．－1D.110.執(zhí)行下面的程序段后，b的值為_(kāi)_____________

a=300

b=20

a=a+b

b=a－b

a=a－bA300程序的基本結(jié)構(gòu)①順序結(jié)構(gòu)：按照由上到下的順序一行一行地執(zhí)行。程序中沒(méi)有分支，沒(méi)有重復(fù)。

②選擇結(jié)構(gòu)：根據(jù)不同的條件判斷來(lái)決定程序執(zhí)行走向的結(jié)構(gòu)。程序中有分支，沒(méi)有重復(fù)。

③循環(huán)結(jié)構(gòu)：根據(jù)條件判斷，需要重復(fù)執(zhí)行某一段代碼的程序。程序中可能存在分支和重復(fù)。1、順序結(jié)構(gòu)PrivateSubcommand1_Click()DimaAsSingleDimbAsSingleDimcAsSinglea=text1.textb=text2.textc=aa=bb=ctext1.text=atext2.text=bEndSub開(kāi)始輸入a,bc=aa=bb=c輸出a,b結(jié)束2、選擇結(jié)構(gòu)Privatesubcommand1_click()DimaassingleA=val(text1.text)Ifa>=60thenPrint“合格”Elseprint“不合格”EndifEndsub開(kāi)始輸入aa>=60輸出“合格”輸出“不合格”結(jié)束YNIF語(yǔ)句有：?jiǎn)畏种нx擇結(jié)構(gòu)，形式為If<條件成立>Then語(yǔ)句塊

EndIf；雙分支選擇結(jié)構(gòu)，形式為

If<條件成立>Then

語(yǔ)句1Else語(yǔ)句2EndIf；Ifxmod2=0thenPrint“偶數(shù)”Elseprint“奇數(shù)”endif例如：

ifxmod2=0thenprint“偶數(shù)”

endif多分支選擇結(jié)構(gòu)，形式為If<條件1成立>Then<語(yǔ)句塊1>ElseIf<條件2成立>Then <語(yǔ)句塊2>

…

[Else

語(yǔ)句塊n+1]EndIfX=t/(s*s)Ifx>23thenStr=“您的體形偏胖”Elseifx<19.5thenstr=“您的體形偏瘦”

elsestr=“您的體形很完美”endif

例：輸入一學(xué)生成績(jī)，評(píng)定其等級(jí)。方法是：90~100分為“優(yōu)秀”，80~89分為“良好”，70~79分為“中等”，60~69分為“及格”，60分以為“不合格”使用IF語(yǔ)句實(shí)現(xiàn)的程序段如下：Ifx>=90thenPrint"優(yōu)秀"ElseIfx>=80ThenPrint"良好"ElseIfx>=70ThenPrint"中等"ElseIfx>=60ThenPrint"及格"ElsePrint"不及格"EndIfSelectcasexCase90to100Print“優(yōu)秀”Case80to89Print“良好”Case70to79Print“中等”Case60to69Print“及格”Elseprint“不及格”Endselect當(dāng)程序出現(xiàn)多分支選擇時(shí)，用If語(yǔ)句比較煩瑣，而使用多分支選擇SelectCase語(yǔ)句就方便多了。SelectcasexCaseis>23str=“您的體形偏胖”Caseis<19.5str=“您的體形偏瘦”Caseelsestr=“您的體形很完美”EndselectbSelectcasemonthCase1,3,5,7,8,10,12print“大月”Case2print“平月”

Caseelseprint“小月”EndselectSelectcasexmod2Case0print“偶數(shù)”Case1print“奇數(shù)”Endselect語(yǔ)法格式為：SelectCase表達(dá)式的值Case情況1

語(yǔ)句塊1[Case情況2

語(yǔ)句塊2]……[CaseElse

語(yǔ)句塊n]EndSelect課堂練習(xí)編寫(xiě)程序：用計(jì)算機(jī)產(chǎn)生一個(gè)1到12之間的隨機(jī)數(shù)整數(shù)做為月份數(shù)，然后判斷這個(gè)月是哪個(gè)季節(jié)的，并輸出該月數(shù)及判斷結(jié)果。程序代碼PrivateSubcommand1_Click()DimaAsIntegerRandomizea=Int(Rnd()*12)+1ifa<=3then

Label1.Caption=Str(a)&"月份是"&"春季"elseifa<=6then

Label1.Caption=Str(a)&“月份是”

&“夏季”

elseifa<=9thenLabel1.Caption=Str(a)&"月份是"&"秋季"elseLabel1.Caption=Str(a)&"月份是"&"冬季"

endifendSubPrivateSubcommand1_Click()DimaAsInteger

Randomizea=Int(Rnd()*12)+1SelectCaseaCase1To3Label1.Caption=Str(a)&"月份是春季"Case4To6Label1.Caption=Str(a)&"月份是夏季"Case7To9Label1.Caption=Str(a)&"月份是秋季"CaseElseLabel1.Caption=Str(a)&"月份是冬季"EndSelectendSub下面是兩種正確的嵌套形式：（1）

IF<條件1>Then

…..IF<條件2>Then

……Else

…..EndIf

….Else

….IF<條件3>Then

…..Else

…..EndIf

…..EndIF選擇結(jié)構(gòu)的嵌套（2）IF<條件1>Then

…..SelectCase…Case……IF<條件2>Then

……Else

…..EndIf

……Case….

…..EndSelect

….EndIF3、循環(huán)結(jié)構(gòu)循環(huán)結(jié)構(gòu)：根據(jù)條件判斷，需要重復(fù)執(zhí)行某一段代碼的程序。程序中可能存在分支和重復(fù)。VB中提供了兩種類型的循環(huán)語(yǔ)句：計(jì)數(shù)循環(huán)語(yǔ)句和條件型循環(huán)語(yǔ)句

1.

For循環(huán)語(yǔ)句（已知循環(huán)次數(shù)的計(jì)數(shù)型循環(huán)）語(yǔ)句形式：

For

循環(huán)變量=初值To終值

[Step

步長(zhǎng)]

循環(huán)體語(yǔ)句塊

Next

循環(huán)變量‘相當(dāng)于循環(huán)變量=循環(huán)變量+stepStep缺省則默認(rèn)為1For-Next循環(huán)的執(zhí)行過(guò)程是：①循環(huán)變量取初值；②循環(huán)變量與終值比較，沒(méi)有超過(guò)終值轉(zhuǎn)③，否則循環(huán)結(jié)束，接著執(zhí)行循環(huán)語(yǔ)句的后繼語(yǔ)句；③執(zhí)行一次循環(huán)體；④循環(huán)變量增加一個(gè)步長(zhǎng)增量；⑤重復(fù)步驟②～④。循環(huán)變量取得初值循環(huán)變量有沒(méi)超過(guò)終值循環(huán)體語(yǔ)句循環(huán)變量增加一個(gè)步長(zhǎng)YN

For

循環(huán)變量=初值To終值

[Step

步長(zhǎng)]

循環(huán)體語(yǔ)句塊

Next

循環(huán)變量說(shuō)明：1）循環(huán)變量必須為數(shù)值型

2）步長(zhǎng)一般為正，初值小于終值；若為負(fù)，初值大于終值；缺省步長(zhǎng)為1；

3）語(yǔ)句塊可以是一句或多句語(yǔ)句，稱為循環(huán)體；

循環(huán)次數(shù)=int（（終值-初值）/步長(zhǎng)+1）

4）退出循環(huán)后，循環(huán)變量的值保持退出時(shí)的值；

5）在循環(huán)體內(nèi)對(duì)循環(huán)變量可多次引用，但不要對(duì)其賦值，否則影響結(jié)果。思考：1.若有如下一段代碼：Forj=15to3Step–2 PrintjNextj

則循環(huán)結(jié)束時(shí)，循環(huán)變量j的值是多少？

2.循環(huán)變量的增量能否為0，如果為0，