續程序設計基礎詳解演示文稿目前一頁\總數三十八頁\編于九點（優選）續程序設計基礎目前二頁\總數三十八頁\編于九點數據類型基本數據類型1字符串（String）是一個字符序列，由ASCII字符組成。放在雙引號的若干個字符，長度為0的為空字符。分為變長字符串0-2的31冪，定長字符串為2的16次冪。目前三頁\總數三十八頁\編于九點2.數值整型數整數Interger-32768~32767兩個字節長整數Long四個字節浮點數符號、指數及尾數12.345E2單精度浮點數Single4個字節雙精度浮點數Double8個字節目前四頁\總數三十八頁\編于九點3貨幣Currency8個字節，小數點后四位，其余四舍五入4變體（Variant）任何值（數值，字符串，日期時間）5其他數據類型字節Byte，布爾Boolean，日期Date對象Object，Decimal數據類型目前五頁\總數三十八頁\編于九點目前六頁\總數三十八頁\編于九點用戶定義的數據類型Type數據類型名數據類型元素名as類型名數據類型元素名as類型名。。。EndType舉例目前七頁\總數三十八頁\編于九點

TypeStudent XhAsString XmAsString XbAsString NlAsInteger CjAsSingleEndType例如:對于一個學生的“學號”、“姓名”、“性別”、“年齡”、“入學成績”等數據，為了處理數據的方便，常常需要把這些數據定義成一個新的數據類型（如Student類型）。目前八頁\總數三十八頁\編于九點記錄類型中可以變長字符串，也可以是定長字符串記錄類型的定義必須放在模塊（標準和窗體）的聲明部分。在記錄類型中不能使用動態數組。在隨機文件操作中，記錄類型數據有著重要作用枚舉類型目前九頁\總數三十八頁\編于九點保留字文字常量符號常量在程序中，某個常量多次被使用，則可以使用一個符號來代替該常量，這樣不僅在書寫上方便，而且有效地改進了程序的可讀性和可維護性。

VB中使用關鍵字Const聲明符號常量。其格式如下：

Const常量名

[As類型]=常數表達式

或：Const常量名

[類型符號]=常數表達式例如：

ConstPIAsDouble=2.1415926535等價于：

ConstPI#=2.1415926535常量目前十頁\總數三十八頁\編于九點例如，要將文本框Text1的前景顏色設置為紅色，可以使用下面的語句：

Text1.ForeColor=vbRed

這里的vbRed就是系統常量。這比直接使用16進制數來設置要直觀得多。2.3.3系統常量

VB系統提供的應用程序和控件的系統定義常數。它們存放于系統的對象庫中，在“對象瀏覽器”中的VisualBasic（VB）和VisualBasicforapplications（VBA）對象庫中列舉了VisualBasic的常數常量目前十一頁\總數三十八頁\編于九點2.4.1變量的命名規則

1.以字母或漢字開頭，后可跟字母、數字或下劃線組成.2.變量名最長為255個字符；

3.VB中不區分變量名的大小寫，不能使用VB中的關鍵字；

4.字符之間必須并排書寫，不能出現上下標以下符是合法的變量名：

a,x,x3,BOOK_1,sum5

以下標識符是非法的：

3s以數字開頭s*T出現非法字符*

-3x以減號開頭bowy-1出現非法字符-(減號)if使用了VB的關鍵字變量目前十二頁\總數三十八頁\編于九點2.4.2變量聲明

1.用Dim語句顯式聲明變量形式：Dim變量名[AS類型] Dim變量名[類型符]

例：

DimabAsinteger,sumAssingle

等價于Dimab%,sum!變量目前十三頁\總數三十八頁\編于九點用Static聲明，定義靜態變量及數組變量。每次引用該變量，其值會繼續保留。Public用來在標準模塊中定義全局變量或數組。Redim用來重新定義數組DefType可以在模塊中聲明部分定義變量。DefType字母范圍。目前十四頁\總數三十八頁\編于九點一個變量未被顯式定義，則被隱含說明為變體類型。VariantDefType只對它所在的模塊起作用。使用時可以省略類型說明符。目前十五頁\總數三十八頁\編于九點下面是一個很簡單的程序，其使用的變量a,b,Total都沒有事先定義。PrivateSubForm_Click()Total=0a=10:b=20Total=a+bPrint“Total=";TotalEndSub2.隱式聲明

VisualBasic允許用戶在編寫應用程序時，不聲明變量而直接使用，系統臨時為新變量分配存儲空間并使用，這就是隱式聲明。所有隱式聲明的變量都是Variant數據類型。VisualBasic根據程序中賦予變量的值來自動調整變量的類型。例如：變量目前十六頁\總數三十八頁\編于九點3.強制顯式聲明——OptionExplicit語句良好的編程習慣都應該是“先聲明變量，后使用變量”，這樣做可以提高程序的效率，同時也使程序易于調試。VisualBasic中可以強制顯式聲明，可以在窗體模塊、標準模塊和類模塊的通用聲明段中加入語句：

OptionExplicit目前十七頁\總數三十八頁\編于九點

4．變量的默認值當執行變量的聲明語句后，VisualBasic系統就給變量賦值一個默認值，在變量首次賦值之前，一直保持這個默認值。對于不同類型的變量，默認值如表2-3所示。2.4變量表2-3不同類型變量的默認值變量類型數據類型數值型0（或0.0）邏輯型False日期型#1899-12-300:00:00#變長字符串空字符串""定長字符串空格字符串，其長度等于定長字符串的字符個數對象型Nothing變體類型Empty目前十八頁\總數三十八頁\編于九點記錄類型變量TypeTypeDemoNum1asdoubleVar1asString*8EndTypeStaticGenvarasTypeDemoGenvar.Num1;Genvar.Var1目前十九頁\總數三十八頁\編于九點變量的作用域結構應用程序窗體模塊聲明部分，通用部分，事件過程標準模塊聲明部分，通過過程1局部變量在過程（事件和通用）內定義的變量叫做局部變量，作用于它所在過程目前二十頁\總數三十八頁\編于九點2模塊變量窗體變量可用于該窗體內的所有過程。通用區域，顯示聲明標準模塊變量，對其內過程可見，其他模塊內過程不可見。3全局變量PublicGlobal每個過程和每個過模塊中使用。目前二十一頁\總數三十八頁\編于九點VB提供了上百種內部函數（庫函數），要求掌握這些常用函數的功能及使用。調用方法：

函數名（參數列表）有參函數函數名無參函數說明：

（1）使用庫函數要注意參數的個數及其參數的數據類型（2）要注意函數的定義域（自變量或參數的取值范圍）例如：sqr(x)要求：x>=0（3）要注意函數的值域。如：exp(23773)的值就超出實數在計算機中的表示范圍。常用內部函數目前二十二頁\總數三十八頁\編于九點1、數學函數常用的數學函數有:Abs(N)Cos(N)Sin(N)Exp(N)Log(N)Sqr(N)Sgn(N)

說明：（1）在三角函數中的自變量是以弧度為單位。如：sin300sin(2.14159/180*30)

常用內部函數目前二十三頁\總數三十八頁\編于九點（2）Abs(x)：返回x的絕對值。（3）Exp(x)：返回e的指定次冪，即ex。（4）Log(x)：返回x的自然對數。（5）符號函數Sgn(x)，根據x值的符號返回一個整數（-1、0或1）。

1x>0Sgn(x)=0x=0-1x<0（6）Sqr(x)：返回x的平方根，如Sqr(25)的值為5，Sqr(2)的值為1.4142.。此函數要求x>0，如果x<0則出錯。常用內部函數目前二十四頁\總數三十八頁\編于九點2.轉換函數說明：（1）要區別兩個取整函數int()和fix()Fix(N)為截斷取整，即去掉小數后的數。Int(N)不大于N的最大整數。N>0與int(N)相同，當N<0時，int(N)

與fix(N)-1相等。例如：Fix(9.59)=9,Int(9.59)=9Fix(-9.59)=-9,Int(-9.59)=-10

思考：如何實現四舍五入取整？（2）Asc("Abcd")

值為：65（只取首字母的Ascii值）

（3）Val("abc123")值為：0,Val("1.2sa10")值為1.2注意：Val()函數只將最前面的數字字符轉換為數值。常用內部函數目前二十五頁\總數三十八頁\編于九點3.字符串操作函數

（1）刪除空格函數Ltrim(x)返回刪除字符串x前導空格符后的字符串。Rtrim(x)返回刪除字符串x尾部空格符后的字符串。Trim(x)：返回刪除前導和尾隨空格符后的字符串。（2）取子串函數Left(x,n)：返回字符串x前n個字符所組成的字符串。Right(x,n)：返回字符串x后n個字符所組成的字符串。Mid(x,m,n)：返回字符串x從第m個字符起的n個字符所組成的字符串。常用內部函數目前二十六頁\總數三十八頁\編于九點3.字符串操作函數（3）Len(x)：返回字符串x的長度，如果x不是字符串，則返回x所占存儲空間的字節數。（4）Lcase(x)和Ucase(x)：分別返回以大寫字母、小寫字母組成的字符串。（5）Space(n)：返回由n個空格字符組成的字符串。（6）Instr(x,y)：字符串查找函數，返回字符串y在字符串x中首次出現的位置。如果y不是x的子串，即y沒有出現在x中，則返回值為0。

（7）String$（n,ASCII碼），String$（n,字符串）返回由N個指定字符組成的字符串。常用內部函數目前二十七頁\總數三十八頁\編于九點3.字符串操作函數例：

len("Thisisabook!")15Left$("ABCDEFG",3)"ABC"Right("ABCDEFG",3)“EFG"Mid$("ABCDEFG",2,3)"BCD“Ucase("ABcd")"ABCD"Lcase("ABcd")"abcd"Trim("Abcd")"ABcd"String(5,"A")"AAAAA"InStr(2,“ABCDEFGEF”,“EF”)5（第一次出現的位置）常用內部函數目前二十八頁\總數三十八頁\編于九點4.日期、時間函數

（1）Date：返回系統當前日期。（2）Time：返回系統當前時間。（3）Minute(Now)、Minute(Time)：返回系統當前時間“hh:mm:ss”中的mm（分）值。（4）Second(Now)、Second(Time)：返回系統當前時間“hh:mm:ss”中的ss（秒）值。

常用內部函數目前二十九頁\總數三十八頁\編于九點5.隨機函數Rnd與Randomize語句（1）隨機函數RndRnd函數可以不要參數，其括號也省略。返回[0~1]（即包括0，但不包括1）之間的雙精度隨機數。若要產生1~100的隨機整數，則可通過下面的表達式來實現：Int(Rnd*100)+1'包括1和100Int(Rnd*99)+1'包括1，但不包括100產生[N，M]區間的隨機數的VisualBasic表達式：

Int(Rnd*(M-N+1))+N常用內部函數目前三十頁\總數三十八頁\編于九點（2）Randomize語句該語句的作用是初始化VB的隨機函數發生器（為其賦初值），可使Rnd產生相同序列的隨機數。

Randomize語句使用形式：Randomize[Seed]其中：Seed是隨機數生成器的種子值，若省略，系統將計時器返回的值作為新的種子值。例如：下段程序每次運行，將產生不同序列的20個[10，99]之間的隨機整數。RandomizeFori=1To20PrintInt(Rnd*90)+10;NextiPrint常用內部函數目前三十一頁\總數三十八頁\編于九點運算符和表達式.算術運算符與算術表達式

1.算術運算符例：5+2*10mod10\9/3+2^2結果是：11（ia=3）目前三十二頁\總數三十八頁\編于九點2.算術表達式

（書寫中需注意的問題）（1）運算符不能相鄰。例a+*b是錯誤的。（2）乘號不能省略。例x乘以y應寫成：x*y

（3）括號必須成對出現，均使用圓括號。（4）表達式從左到右在同一基準并排書寫，不能出現上下標（5）要注意各種運算符的優先級別，為保持運算順序，在寫VB表達式時需要適當添加括號（）,若用到庫函數必須按庫函要求書寫。如：

運算符和表達式(-b-sqr(b*b-4*a*c))/(2*a)(a+b)/(a-b)目前三十三頁\總數三十八頁\編于九點.字符串運算符與字符串表達式

字符串運算符有：＆、+

。功能是字符串連接例如：

"ABCD"+"EFGHI"'結果為：ABCDEFGHI“VB”&“程序設計教程”'結果為：VB程序設計教程說明：當連接符兩旁的操作量都為字符串時，上述兩個連接符等價。它們區別是：

+（連接運算）：兩個操作數均應為字符串類型；

&（連接運算）：兩個操作數既可為字符型也可為數值型，當是數值型時，系統自動先將其轉換為數字字符，然后進行連接操作。運算符和表達式目前三十四頁\總數三十八頁\編于九點例："100"+123'結果為

223"100"+"123"'結果為

100123"Abc"+123'出錯"100"&123'結果為

100123100&123'結果為

100123"Abc"&"123"'結果為

Abc123"Abc"&123'結果為

Abc123注意：使用運算符“&”時，變量與運算符“&”之間應加一個空格。這是因為符號“&”還是長整型