【文章內容簡介】 （全路徑名） MsgBox 你剛才輸入的文件名是： + End Sub 3．“顏色”對話框 Private Sub Command1_Click() ?設置顏色窗體的形狀，有 8等四個常用， ‘ 請同學們自己試一試 = 1 39。顯示“顏色”對話框 39。根據(jù)選擇的顏色，改變文本框的前景色 = End Sub – 此外，還可以通過 ShowPrinter、 ShowFont和ShowHelp方法顯示打印、字體和幫助對話框，它們的用法請同學們自己通過 VB聯(lián)機幫忙學習 其他常用控件 – 當界面上的控件太多時，可以使用 TabStrip控件將它們分組布置 – 當需要顯示安裝進度、程序執(zhí)行進度時，可以使用 ProgressBar控件 – 當希望制作類似于 Windows資源管理器式的菜單時，可以使用TreeView控件 – 水平滾動條（ HScrollBar）和垂直滾動條控件（ VscrollBar）也可能會經常用到 – 而 VB的代碼就像一條線，將這些圖形界面元素串在一起，從而可以使窗體、控件通過事件驅動機制連接為一個有機整體 變量的聲明 Dim MyResult As Double 數(shù)據(jù)類型 變量名 ? 1．顯式聲明 – Dim 變量名 As 數(shù)據(jù)類型 ? 2．隱性聲明 – VB允許在使用變量前不使用 Dim語句進行事先定義，而由 VB自動將變量聲明為變體型（ Variant類型），這種方式稱為隱性聲明 ? 隱性聲明方法為書寫程序提供了較多的靈活性，但也會降低了程序的執(zhí)行效率，特別是可讀性。當把一個變量聲明為 Variant類型時，這個變量可以用來存儲各種數(shù)據(jù)。但是由此也會帶來內存空間消耗量的增大，也容易出現(xiàn)數(shù)據(jù)運算問題。因此，最好對每個變量都進行顯式聲明 ? 為了避免使用隱性聲明方法，我們可以在應用程序的模塊聲明部分，加入 Option Explicit語句，使 VB的變量在使用前必須進行強制聲明，否則就無法編譯執(zhí)行。 基本數(shù)據(jù)類型 數(shù)據(jù)類型 含義 數(shù)據(jù)范圍 Integer 整型 32768~32767 Long 長整型 2147483648~2147483647 Single 單精度浮點型 Double 雙精度浮點型 Currency 貨幣型 Byte 字節(jié)型 0~255 String 字符串型 Boolean 布爾型 Date 日期型 Variant 變體型 Object 對象型 實例 Private Sub Command1_Click() Dim MyInteger As Integer 39。聲明一個整型變量 Dim MyString As String 39。聲明一個變長的字符型變量 Dim MyString As String*10 39。聲明一個長度固定的字符型變量 Dim MyBoolean As Boolean 39。聲明一個布爾變量 Dim MyVariant As Variant 39。聲明一個變體型變量 End Sub Private Sub Command1_Click() Dim MyText As New TextBox 39。聲明一個類型為文本框的變量 Set MyText = Text1 39。將控件 Text1的值賦給對象變量 MyText = 你好！ 39。改變對象變量 MyText的標題 End Sub ? Private Sub Command1_Click() ? Dim MyObject As Control 39。聲明控件變量 ? Set MyObject = 39。將 Form1的 Text1控件賦給對象變量 ? = 你好！ 39。改變對象變量的標題 ? Set MyObject = ? = 確定 ? End Sub 變量初始值 – 數(shù)值型變量的初始值為 0 – 字符串變量初始值為空字符串，即“”，變體型變量初始值為空值，即 Null值 – 布爾型的初值為假，即 False。 – 當空值的變體變量在表達式中參加運算時，系統(tǒng)會根據(jù)實際情況將其解釋為 0或空字符串。 變量的作用域 –變量的作用域是從空間角度去分析變量屬性的。它規(guī)定了變量在應用程序中的使用范圍，即在什么范圍內是可見的 (Visible)、有效的（ Enabled）。 ? 1．過程級變量 – 過程級變量是指在過程內部聲明的變量。只有在該過程中的代碼才能訪問這個變量，不能用于程序的其他部分，建議使用 Dim關鍵字來聲明 ? 2． 窗體級和模塊級變量 – 窗體級變量是指在窗體或模塊的代碼聲明段用 Dim或Private聲明的變量，其作用范圍是整個模塊或窗體。即在窗體或模塊中的所有過程中，都可以共同使用這些變量，當離開了這個模塊或窗體，此變量就不起作用了。為了增加可讀性，建議使用 Private關鍵字聲明 ? 3．全局變量 – 全局變量在整個應用程序中有效，一般在模塊代碼編輯器的頂部使用 Public聲明 變量的生命周期 –所謂變量的生命周期，是指能夠保存變量值的時間。如果說變量的作用域是從空間角度來看待變量的，那么生命周期則是從變量存在的時間上來理解的。 ? 1．過程級變量 – 用 Dim聲明的過程級變量，只有在過程執(zhí)行期才存在。當過程執(zhí)行結束時（ End Sub），這些變量的值也將從內存中釋放。 – 直到下一次調用該過程時，才重新給該變量分配一個儲存空間，重新賦值，開始一個新的生命周期 – 但當使用 Static關鍵字來聲明局部變量時 ， 則該變量的生命周期是應用程序的整個運行期 ， 即在該過程執(zhí)行結束時 ， 系統(tǒng)并不釋放該變量的內存空間 ， 繼續(xù)保留其值 。 語法結構是： ? Static 變量名 As 數(shù)據(jù)類型 ? 2．模塊級、窗體級和全局變量 – 這些變量的生命周期是程序的運行期，不必使用 Static關鍵字進行聲明 –以兩個窗體的調用進行演示 ? Form2中定義一個窗體級變量 j ? Form2的 Load事件中 :j=j+1 常量 – Public Const PI As Double = – 在應用程序的任何地方出現(xiàn)的表達式 I=Pi * 25，等價于I= * 25。 運算符和表達式 – VB中有四種類型的運算符 – 算術運算符 – 字符串連接符 –關系運算符 – 邏輯運行符 1．算術運算符 ? VB中主要有 8個算術運算符 ， 按優(yōu)先級別的高低順序分別是： ? （ 1） 指數(shù)運算符： ^。 ? （ 2） 取負： 。 ? （ 3） 乘法 *、 除法 / ? （ 4） 整除： \ ? （ 5） 取模 （ 取余 ） ： Mod ? （ 6） 加 +、 減 2．關系運算符 ? VB中有 6種關系運算符 – 大于（ ）、小于（ ）、等于（ =）、不等于（ 或 ）、大于等于（ =）、小于等于（ =）。 – 它們的優(yōu)先級相同，按自左向右順序運算，即用于對字符串或數(shù)值型數(shù)據(jù)的比較分析 3．邏輯運算符 ? VB提供了以下 6個邏輯運算符 ， 按優(yōu)先順序排列如下 ： ? （ 1） 邏輯非： Not ? （ 2） 邏輯與 And ? （ 3） 邏輯或 or ? （ 4） 邏輯異或： Xor ? （ 5） 等價： Eqv ? （ 6） 蘊含： Imp 4．字符串連接符 –主要有 +和 amp。兩個符號，它們的運算結果基本相同 常用函數(shù) ? 1．數(shù)值型函數(shù) – 絕對值函數(shù)（ Abs） – 平方根函數(shù)（ Sqr） – 冪指函數(shù)（ Exp） – 十六進制函數(shù)（ Hex） – 八進制函數(shù)（ Oct） – 取整函數(shù)（ Fix） – 四舍五入函數(shù)（ Cint） – 最大整數(shù)函數(shù)（ Int） – 隨機數(shù)函數(shù) Rnd – 以及 Sin、 Cos、 Tan、 Atn等三角函數(shù) 2．字符串函數(shù) ? （ 1） Len(x)返回 x代表的字符串的長度 。 ? （ 2） Trim(x)去掉字符串 x前面的空格 。 ? （ 3） Left(x,n)返回字符串 x從左邊算起 n個長度的字符序列 。 ? （ 4） Right(x,n)返回字符串 x從右向左的 n個字符序列 。 ? （ 5） Mid(x,n,m)返回字符串從左邊第 n個字符開始 m個長度的字符序列 。 ? （ 6） Str(x)將數(shù)值型數(shù)據(jù) x轉化為字符串 。 這個函數(shù)的返回值總會在前頭保留一個空格 ， 因此多數(shù)情況下與 Trim函數(shù)結合使用 ， 去掉首部空格 。 – （ 7） Val(x)將數(shù)字字符串轉化為數(shù)值型數(shù)據(jù) 。 – （ 8） Chr(x)返回數(shù)值 x(0~255)所對應的 Ascii碼 。 比如 Chr(13)、Chr(10)分別表示回車 、 換行 。 – （ 9） Asc(x)返回字符串 x首字符的 Ascii碼值 。 – （ 10） UCase(x)和 Lcase(x)分別返回大寫和小寫字符串 。 3．日期函數(shù) –（ 1） Date返回當前系統(tǒng)日期 – （ 2） Time返回當前系統(tǒng)時間 – （ 3） Year(x)返回 x表示的日期中的年份。類似的還有 Month、 Day、 WeekDay等。 4．格式化函數(shù) – ?以系統(tǒng)設置的長時間格式返回當前系統(tǒng)時間。 MyStr = Format(Time, Long Time) – 39。以系統(tǒng)設置的長日期格式返回當前系統(tǒng)日期。 MyStr = Format(Date, Long Date) – MyStr = For