Visual Basic語(yǔ)言程序設(shè)計(jì)及實(shí)驗(yàn)教程課件：Visual Basic語(yǔ)言基礎(chǔ)

VisualBasic語(yǔ)言基礎(chǔ)2.1基本數(shù)據(jù)類(lèi)型2.2變量與常量2.3運(yùn)算符和表達(dá)式2.4常用內(nèi)部函數(shù)2.5編碼規(guī)則2.1基本數(shù)據(jù)類(lèi)型

VisualBasic語(yǔ)言基礎(chǔ)—基本數(shù)據(jù)類(lèi)型VisualBasic提供的數(shù)據(jù)類(lèi)型主要有：

VisualBasic語(yǔ)言基礎(chǔ)—基本數(shù)據(jù)類(lèi)型數(shù)值型、字符型、布爾型、日期型、變體型、對(duì)象型。2.1.1數(shù)值(Numeric)型數(shù)據(jù)整數(shù)類(lèi)型實(shí)數(shù)類(lèi)型

VisualBasic語(yǔ)言基礎(chǔ)—基本數(shù)據(jù)類(lèi)型整型長(zhǎng)整型字節(jié)型單精度型雙精度型貨幣型2.1.2字符串型(String)

字符可以包括西文字符和漢字,并用雙引號(hào)“”（英文狀態(tài)下）括起來(lái),如“1234”、“abcd456”、“程序設(shè)計(jì)”、“A”等。

VisualBasic語(yǔ)言基礎(chǔ)—基本數(shù)據(jù)類(lèi)型

字符串中包含的字符數(shù)稱(chēng)為字符串的長(zhǎng)度?？兆址拈L(zhǎng)度為0。在VisualBasic中，通常把一個(gè)漢字作為一個(gè)字符來(lái)處理。2.1.3布爾型(Boolean)

布爾型又稱(chēng)為邏輯型，其數(shù)據(jù)只有兩個(gè)值，True(真)和False(假)，常用于表示邏輯判斷的結(jié)果。

VisualBasic語(yǔ)言基礎(chǔ)—基本數(shù)據(jù)類(lèi)型當(dāng)把數(shù)值型數(shù)據(jù)轉(zhuǎn)換成邏輯型數(shù)據(jù)時(shí),非0True0False當(dāng)把邏輯型數(shù)據(jù)轉(zhuǎn)換為數(shù)值型數(shù)據(jù)時(shí)False0True-12.1.4日期型(Date)

日期型數(shù)據(jù)用來(lái)表示日期和時(shí)間。表示的日期范圍從公元100年1月1日～9999年12月31日，時(shí)間范圍是0:00:00～23:59:59。日期型數(shù)據(jù)的表示方法有兩種：

一般表示法和序號(hào)表示法。

VisualBasic語(yǔ)言基礎(chǔ)—基本數(shù)據(jù)類(lèi)型2.1.5對(duì)象型(Object)

對(duì)象型數(shù)據(jù)可以用來(lái)表示應(yīng)用程序中的對(duì)象。使用時(shí)先用Set語(yǔ)句給對(duì)象賦值，其后才能引用對(duì)象。

VisualBasic語(yǔ)言基礎(chǔ)—基本數(shù)據(jù)類(lèi)型2.1.6變體型(Variant)

變體型數(shù)據(jù)是一種可變的數(shù)據(jù)類(lèi)型，可以存儲(chǔ)任何系統(tǒng)類(lèi)型的數(shù)據(jù)。如果把任何類(lèi)型的數(shù)據(jù)賦予Variant變量，則不必在這些數(shù)據(jù)的類(lèi)型間進(jìn)行轉(zhuǎn)換，VisualBasic會(huì)自動(dòng)完成任何必要的轉(zhuǎn)換。

VisualBasic語(yǔ)言基礎(chǔ)—基本數(shù)據(jù)類(lèi)型總結(jié)：基本數(shù)據(jù)類(lèi)型數(shù)據(jù)名稱(chēng)占用字節(jié)數(shù)類(lèi)型符范圍整型Integer2%-32768～32767長(zhǎng)整型Long4&-2147483648～2147483647單度型Single4!±1.4E-45～±3.40E38雙精度型Double8#±4.94D-324～±1.79D308貨幣型Currency8@字節(jié)型Byte10～255字符串型String字符串長(zhǎng)$布爾型Boolean2True或False日期型Date8100.1.1～9999.12.31對(duì)象型Object4可供任何對(duì)象引用變體型Variant

按需分配2.2變量與常量

VisualBasic語(yǔ)言基礎(chǔ)—變量和常量2.2.1VisualBasic符號(hào)的命名規(guī)則

VisualBasic語(yǔ)言基礎(chǔ)—變量和常量（１）必須以字母或漢字開(kāi)頭

VisualBasic語(yǔ)言基礎(chǔ)—變量和常量例

：下列各項(xiàng)中，可以作為變量名的是（）；A.a1_0B.DimC.K6/600D.CD[1]例：下列各項(xiàng)中，不能作為變量名的是（）。A.ABCabcB.A12345C.18ABD.Namel2.2.2常量

常量是指程序運(yùn)行過(guò)程中保持不變的常數(shù)、字符串等。在VB中，常量又為一般常量和符號(hào)常量。

VisualBasic語(yǔ)言基礎(chǔ)—變量和常量字符串常量數(shù)值常量布爾常量日期常量例：下列各項(xiàng)中，是常量的是（）；

A.E-3B.E+03C.10^3D.1.E03例：各項(xiàng)中，不是常量的是（）。

A.1E-3B.13C."abc"D.Xl*32.2.3變量變量=內(nèi)存單元

VisualBasic語(yǔ)言基礎(chǔ)—變量和常量1.用Dim顯式聲明變量

Dim變量名[As數(shù)據(jù)類(lèi)型][,變量名[As數(shù)據(jù)類(lèi)型],…]

VisualBasic語(yǔ)言基礎(chǔ)—變量和常量例：使用變量x存放數(shù)據(jù)12345678.987654，應(yīng)該將x聲明為（）類(lèi)型。

A.單精度(Single)B.雙精度(Double)C.長(zhǎng)整型(Long)D.貨幣型(Currency)2.3運(yùn)算符和表達(dá)式

VisualBasic語(yǔ)言基礎(chǔ)—運(yùn)算符和表達(dá)式

2.3.1算術(shù)運(yùn)算符與表達(dá)式

VisualBasic語(yǔ)言基礎(chǔ)—運(yùn)算符和表達(dá)式

1.算術(shù)運(yùn)算符

^-*,/\mod+,-例：表達(dá)式3^2*12-4^(2/4)的值為（）。

A.104B.106C.108D.出錯(cuò)例：表達(dá)式33Mod17\3*2的值為（）。

A.10B.1C.2D.3

例如:有表達(dá)式,

在VB中，該表達(dá)式書(shū)寫(xiě)為：

(((3*x+y)*z)/((x*y)^4))^(1/2)

或

Sqr((3*x+y)*z)/((x*y)^4)

VisualBasic語(yǔ)言基礎(chǔ)—運(yùn)算符和表達(dá)式2.表達(dá)式的書(shū)寫(xiě)規(guī)則

課堂練習(xí)：選做把下列數(shù)學(xué)式寫(xiě)成等價(jià)的VB表達(dá)式。(1)sin50°寫(xiě)成（）。(2)寫(xiě)成（）。(3)寫(xiě)成（）。

(4)寫(xiě)成（）。

VisualBasic語(yǔ)言基礎(chǔ)—課后練習(xí)2.3.2字符串運(yùn)算符與表達(dá)式

VisualBasic語(yǔ)言基礎(chǔ)—運(yùn)算符和表達(dá)式&

連接兩個(gè)字符串，其操作數(shù)可以是字符串型，也可以是數(shù)值型，系統(tǒng)首先把操作數(shù)轉(zhuǎn)換為字符型，然后連接兩字符串。+若兩個(gè)運(yùn)算量均為字符串，則正常連接，否則就進(jìn)行加法運(yùn)算。例：下列表達(dá)式的值為“ABC”+123“123”+123×√2.4常用內(nèi)部函數(shù)

VisualBasic語(yǔ)言基礎(chǔ)—常用內(nèi)部函數(shù)

VisualBasic語(yǔ)言基礎(chǔ)—常用內(nèi)部函數(shù)數(shù)學(xué)運(yùn)算函數(shù)字符串函數(shù)

2.4.1數(shù)學(xué)運(yùn)算函數(shù)

VisualBasic語(yǔ)言基礎(chǔ)—常用內(nèi)部函數(shù)①Abs(N)②Sgn(N)③Sqr(N)④Exp(N)⑤Int(N)

⑥Rnd

VisualBasic語(yǔ)言基礎(chǔ)—常用內(nèi)部函數(shù)(1)函數(shù)Int():

返回小于或等于N的最大整數(shù)。利用Int函數(shù)可以對(duì)數(shù)據(jù)進(jìn)行四舍五入處理。例如N≥0，按四舍五入處理，只保留整數(shù)，可以采用如下式子：Int(N+0.5)

思考？如果要四舍五入保留小數(shù)點(diǎn)后一位,兩位….該怎樣表示?例:給定一個(gè)兩位整數(shù)，要求交換個(gè)位數(shù)和十位數(shù)的位置，把處理后的數(shù)顯示在窗體上。

VisualBasic語(yǔ)言基礎(chǔ)—常用內(nèi)部函數(shù)命令按鈕的單擊事件過(guò)程：PrivateSubCommand1_Click()DimxAsInteger,aAsIntegerDimbAsInteger,cAsIntegerx=Val(Text1.Text)a=Int(x/10)'求十位數(shù)

b=xMod10'求個(gè)位數(shù)

c=10*b+aText2.Text=cEndSub

VisualBasic語(yǔ)言基礎(chǔ)—常用內(nèi)部函數(shù)

★

（2）隨機(jī)函數(shù)Rnd:

VisualBasic語(yǔ)言基礎(chǔ)—常用內(nèi)部函數(shù)

為了利用函數(shù)Rnd()生成某個(gè)范圍內(nèi)的隨機(jī)正整數(shù)，可使用以下公式：Int((上限值-下限值+1)*Rnd+下限值)例：表達(dá)式Int(-20.9)+Int(20.9+0.5)-Fix(-17.9)的值是（）。

A.-17B.16C.17D.18例:單擊窗體，隨機(jī)產(chǎn)生一個(gè)三位正整數(shù)，并將其百位、十位、各位分離出來(lái)顯示在窗體上。

VisualBasic語(yǔ)言基礎(chǔ)—常用內(nèi)部函數(shù)2.4.2字符串函數(shù)

VisualBasic語(yǔ)言基礎(chǔ)—常用內(nèi)部函數(shù)Asc(C)、Chr(N)Str(N)、Val(C)Len(C)、LenB(C)Ucase(C)、Lcase(C)Space(N)、String(N,C)Left(C,N)、Right(C,N)、Mid(C,N1[,N2])InStr([N,]C1,C2)例：如果a,b,c的值分別是3,2,-3,則下列表達(dá)式的值是（）。Abs(b+c)+a*Int(Rnd+3)+Asc(Chr(65+a))

A.10B.68C.69D.78

VisualBasic語(yǔ)言基礎(chǔ)—課后練習(xí)（1）函數(shù)Val()：將數(shù)字字符串轉(zhuǎn)換為數(shù)值型數(shù)據(jù)，會(huì)自動(dòng)將字符串中的空格去掉，并依據(jù)字符串中排列在前面的數(shù)值常量來(lái)定值，

Val("A12")的值為0Val("123A12")的值為123Val("1.2e2")的值為120

VisualBasic語(yǔ)言基礎(chǔ)—常用內(nèi)部函數(shù)★

（2）Mid(C,N1[,N2])函數(shù):從C的第N1開(kāi)始取N2個(gè)字符如:Mid("ABCDEF",2,3)返回值為"BCD"

VisualBasic語(yǔ)言基礎(chǔ)—常用內(nèi)部函數(shù)例：設(shè)A=“12345678”，則表達(dá)式

Val(Left(A,4)+Mid(A,4,2))的值是（）。

A．123456B．123445C．8D．6

VisualBasic語(yǔ)言基礎(chǔ)—課后練習(xí)例:使用字符串操作函數(shù)。將含有一個(gè)空格的字符串如”VisualBasic”,從空格處拆分開(kāi)，并在窗體上輸出拆分后的結(jié)果。編寫(xiě)窗體的Activate事件過(guò)程的代碼如下：PrivateSubForm_Activate()

DimaAsString,bAsString,cAsString,nAsIntegera="VisualBasic"n=InStr(a,"")'查找空格位置

b=Left(a,n-1)'取空格左邊部分

c=Mid(a,n+1)'取空格右邊部分

PrintbPrintcEndSub2.4.3日期與時(shí)間函數(shù)

VisualBasic語(yǔ)言基礎(chǔ)—常用內(nèi)部函數(shù)★Time：返回系統(tǒng)時(shí)間PrivateSubForm_Click()PrintDatePrintTimePrintNowPrintYear(Date);Month(Date);Day(Date);Weekday(Date)PrintHour(Time);Minute(Time);Second(Time)EndSub2.4.4類(lèi)型轉(zhuǎn)換函數(shù)（略）2.4.5格式輸出函數(shù)使用格式輸出函數(shù)Format()可以使數(shù)值、日期或字符串型數(shù)據(jù)按指定的格式輸出。Format函數(shù)的語(yǔ)法格式為：Format(表達(dá)式，格式字符串)表2-9常用數(shù)值格式化符號(hào)符號(hào)作用數(shù)值表達(dá)式格式化字符串顯示結(jié)果0實(shí)際數(shù)字小于格式符號(hào)位數(shù)時(shí)，數(shù)字前后加01234.5671234.567"00000.0000""000.0"01234.56701234.6#實(shí)際數(shù)字小于格式符號(hào)位數(shù)時(shí)，數(shù)字前后不加01234.5671234.567"#####.####""###.#"1234.5671234.6.加小數(shù)點(diǎn)12345"00000.00"12345.00,千分位1234.567"##,##0.00"1,234.5670%數(shù)值乘以100,加百分號(hào)1234.567"####.##%"123456.7%$在數(shù)字前強(qiáng)加$1234.567"$###.##"$1234.57+在數(shù)字前強(qiáng)加+-124.567"+###.##"+-124.57-在數(shù)字前強(qiáng)加-1234.567"-###.##"-1234.57E+用指數(shù)表示.1234"0.00E+00"1.23E-01E-用指數(shù)表示1234.567"0.00E-00"1.23E032.5編碼規(guī)則

VisualBasic語(yǔ)言基礎(chǔ)—編碼規(guī)則2.5.1語(yǔ)句及語(yǔ)法編寫(xiě)程序語(yǔ)句時(shí)所必須遵循的構(gòu)建規(guī)則稱(chēng)為語(yǔ)法。程序語(yǔ)句是VB關(guān)鍵字、對(duì)象屬性、函數(shù)、運(yùn)算符以及其它VB編譯解釋器能識(shí)別的符號(hào)的有序組合，一般占用一行。例如賦值語(yǔ)句：

Label1.Caption

=Time↑

↑

↑

↑

對(duì)象名屬性名賦值號(hào)VB函數(shù)

VisualBasic語(yǔ)言基礎(chǔ)—編碼規(guī)則2.5.2代碼書(shū)寫(xiě)規(guī)則2.5.3程序的基本結(jié)構(gòu)其基本結(jié)構(gòu)只有三種，即順序結(jié)構(gòu)、選擇結(jié)構(gòu)和循環(huán)結(jié)構(gòu)，而且這三種基本結(jié)構(gòu)具有單入口、單出口的特點(diǎn)。

VisualBasic語(yǔ)言基礎(chǔ)—編碼規(guī)則課后練習(xí)

VisualBasic語(yǔ)言基礎(chǔ)—課后練習(xí)一．單選題1．下列①各項(xiàng)中，只有

才是常量；②各項(xiàng)中，

不是常量。

①A.E-3B.E+03C.10^3D.1.E03②A.1E-3B.13C."abc"D.Xl*32.下列①各項(xiàng)中，可以作為變量名的是

；②各項(xiàng)中，

不能作為變量名。

①A.a1_0B.DimC.K6/600D.CD[1]②A.ABCabcB.A12345C.18ABD.Namel

VisualBasic語(yǔ)言基礎(chǔ)—課后練習(xí)3.空字符串是指。

A.長(zhǎng)度為0的字符串B.只包含空格字符的字符串

C.長(zhǎng)度為1的字符串D.不定長(zhǎng)的字符串4.使用變量x存放數(shù)據(jù)12345678.987654，應(yīng)該將x聲明為類(lèi)型。

A.單精度(Single)B.雙精度(Double)C.長(zhǎng)整型(Long)D.貨幣型(Currency)5.表達(dá)式3^2*12-4^(2/4)的值為。

A.104B.106C.108D.出錯(cuò)6.表達(dá)式33Mod17\3*2的值為。

A.10B.1C.2D.3

VisualBasic語(yǔ)言基礎(chǔ)—課后練習(xí)7.表達(dá)式Int(-20.9)+Int(20.9+0.5)-Fix(-17.9)的值是

A.-17B.16C.17D.188.如果a,b,c的值分別是3,2,-3,則下列表達(dá)式的值是。

Abs(b+c)+a*Int(Rnd+3)+Asc(Chr(65+a))

A.10B.68C.69D.78

VisualBasic語(yǔ)言基礎(chǔ)—課后練習(xí)9.設(shè)m="morning"，下列表達(dá)式的值是"mor"。

A.Mid(m,5,3)B.Left(m,3)C.Right(m,4,3)D.Mid(m,3,1)10.表達(dá)式Sin(a+b)^6所對(duì)應(yīng)的數(shù)式是。

A.sin(a+b)6B.sin6(a+b)C.sin6(a+b)D.6sin(a+b)

VisualBasic語(yǔ)言基礎(chǔ)—課后練習(xí)11.如果x是一個(gè)正實(shí)數(shù)，對(duì)x的第3位小數(shù)四舍五入的表達(dá)式是。

A.0.01*Int(100*x+0.5)B.0.01*Int(10*x+0.5)C.0.01*Int(x+0.5)D.0.01*Int(x+5)12.求一個(gè)三位正整數(shù)n的十位數(shù)的方法是。

A．Int(n/l0)-Int(n/100)*10B．Int(n/l0)-Int(n/100)C．n-Int(n／100)*100D．Int(n-Int(n/100)*100)

VisualBasic語(yǔ)言基礎(chǔ)—課后練習(xí)13．設(shè)A=“12345678”，則表達(dá)式

Val(Left(A,4)+Mid(A,4,2))的值是。

A．123456B．123445C．8D．614．要使右列式子成立，x應(yīng)取。

Int(x+2)=16A．14≤x<15B．14<x≤15C．14<x<15D．14≤x≤15

VisualBasic語(yǔ)言基礎(chǔ)—課后練習(xí)15．在下列函數(shù)中，函數(shù)的執(zhí)行結(jié)果與其他三個(gè)不一樣。(都一樣)A．String(3,"5")B．Str(555)C．Right("5555",3)D．Left("55555",3)16．設(shè)變量A的值為-2，則函數(shù)的執(zhí)行結(jié)果與其他三個(gè)不一樣。

A．Val("A")B．Int(A)C．Fix(A)D．-Abs(A)

VisualBasic語(yǔ)言基礎(chǔ)—課后練習(xí)17．要在窗體Forml的標(biāo)題欄上顯示"統(tǒng)計(jì)程序"，可用語(yǔ)句。

A．Forml.Name="統(tǒng)計(jì)程序"B．Form1.Caption="統(tǒng)計(jì)程序"C.Forml.Caption=統(tǒng)計(jì)程序

D．Forml.Name=統(tǒng)計(jì)程序18．函數(shù)String(n,"str")的功能是。

A．把數(shù)值型數(shù)據(jù)轉(zhuǎn)換為字符串

B．返回由n個(gè)字符組成的字符串

C．從字符串中取出n個(gè)字符

D．從字符串中第n個(gè)字符的位置開(kāi)始取子字符串

VisualBasic語(yǔ)言基礎(chǔ)—課后練習(xí)二.多選題1．從字符串變量S中取出最后(右邊)2個(gè)字符，可以采用函數(shù)。

A．Instr(1,S,2)B．Mid(S,Len(S)-1)C．Mid(S,2,2)D．Right(S,2)E．Right(S,Len(S)-2)2．已知A=Space(1)，要產(chǎn)生3個(gè)空格，可以采用函數(shù)。

A．Right(A,3)B．Space(3*A)C．String(3,A)D．A&A&AE．3*A

VisualBasic語(yǔ)言基礎(chǔ)—課后練習(xí)3．已知a>b，c>d，下列表達(dá)式中其值為0的有.A．Sgn(b-a)+Sgn(c-d)B．Sgn(a-b)-Sgn(d-c)C．Sgn(b-a)-Sgn(d-c)D．Sgn(a-b)+Sgn(c-d)E．Sgn(b-a)+Sgn(d-c)4．要求一個(gè)正整數(shù)n除以8所得的余數(shù)，可以采用

A．nMod8B．n-Int(n/8)C．n\8D．n-Int(n／8)*8E．n-Int(n\8)

VisualBasic語(yǔ)言基礎(chǔ)—課后練習(xí)三.填空題1．把下列數(shù)學(xué)式寫(xiě)成等價(jià)的VB表達(dá)式。(1)sin50°寫(xiě)成。(2)寫(xiě)成。(3)寫(xiě)成。

(4)寫(xiě)成。

VisualBasic語(yǔ)言基礎(chǔ)—課后練習(xí)2．要產(chǎn)生50～55范圍內(nèi)(含50及55)的隨機(jī)整數(shù)，采用的VB表達(dá)式是Int(6*rnd+50)

。3．寫(xiě)出下列表達(dá)式的值。(1)Val("153")-Val("15-1a3")的值是138

。(2)7Mod3+8Mod5*1.2-Int(Rnd)的值是3

。(3)Val("120")+Asc("abc")-Ins