【正文】 另一個與之配合的屬性是ScrollBars屬性，它有4個值，0到3，分別是沒有滾動條，水平滾動條，垂直滾動條，和二者都有，它是一個只讀屬性，也就是說只有在程序設(shè)計過程中才能改變，而不能在程序運行中改變，但是我們可以通過API解決運行中改變的問題，我們放在以后再講。是不是有種受騙的感覺，啊喲喲，可不是我的錯，就是這么容易嘛！　　從剛才的例子里，我們接觸了一些VB中的輸入方法，其實數(shù)據(jù)輸入不僅僅局限于向Text框中輸入數(shù)據(jù)，數(shù)據(jù)的輸入還有許多其他的方法，譬如前面的Check1也是向程序發(fā)出一定的信息，只要是通過操作向計算機發(fā)布命令就可以叫做輸入，下面我們來一一介紹。檢查X、Y坐標(biāo)是否有效Check1_Click 事件：Private Sub Check1_Click()If = 1 ThenLabel1(3).Enabled = TrueLabel1(4).Enabled = TrueText1(3).Enabled = TrueText1(4).Enabled = TruePosChk = TrueElseLabel1(3).Enabled = FalseLabel1(4).Enabled = FalseText1(3).Enabled = FalseText1(4).Enabled = FalsePosChk = FalseEnd IfEnd Sub接著在按鈕中填寫代碼：Private Sub Command1_Click(Index As Integer)Dim Prompt, Title, Default As StringDim xPos, yPos As IntegerSelect Case IndexCase 0Prompt = Text1(0).TextTitle = Text1(1).TextDefault = Text1(2).TextIf PosChk ThenxPos = Val(Text1(3).Text)yPos = Val(Text1(4).Text)a$ = InputBox(Prompt, Title, Default, xPos, yPos)Elsea$ = InputBox(Prompt, Title, Default, xPos, yPos)End IfLabel1(5).Caption = 謝謝您的投票，您的選擇是 amp?！　”纠谐霈F(xiàn)了一個Frame1控件，它是一種框架，可以用來把窗體分成好幾個部分，首先應(yīng)該在窗體上畫出Frame1控件，然后再選擇相應(yīng)的控件，在Frame1上描出輪廓，使其是出現(xiàn)在Frame1之上，本例中除去兩個按鈕，其余都在Frame1上面。　小知識：屏幕坐標(biāo)在計算機的屏幕上也有一個類似于我們在中學(xué)里常用到的直角坐標(biāo)系，之不過它的原點不在左下，而是在屏幕的右上角，屏幕的最右上方坐標(biāo)為（0，0），它的橫坐標(biāo)和我們的習(xí)慣是一致的，而縱坐標(biāo)則是越向下越大，不僅是屏幕，所有的對象里都是一樣，需要記清。xpos，ypos――數(shù)值表達(dá)式，以Twips為單位指定窗體出現(xiàn)在屏幕上的位置。以上就是所謂的人機對話或交互功能，尤其是在Windows操作里我們需要進(jìn)行更多的輸入工作，我們需要填寫各種各樣的表格，設(shè)置程序的重要參數(shù)，把數(shù)據(jù)輸入給計算機，再又它完成既定的工作就是今天我們本章要重點討論的問題――在VB中如何建立完整的輸入機制?！　〈蜷_Form_MouseDown事件，該事件有兩個參數(shù)：Button，當(dāng)按下左鍵時Button返回1，當(dāng)按下右鍵時Button返回2，；Shift，是指在點擊鼠標(biāo)時按下的鍵盤鍵，如Shift、Ctrl、Alt，這些我們將在以后討論，但很難避免在一章中不涉及到不該涉及的內(nèi)容，學(xué)習(xí)時有個大概的理解即可。的確，我們很輕易的實現(xiàn)了這么多的功能，但如果你仔細(xì)想想，我們的程序還什么也不會做呢！可以說是徒有其表，要實現(xiàn)強大的功能，恐怕要學(xué)很長很長時間，而現(xiàn)在僅僅是個開頭，并不是想入非非的時候，我們還要繼續(xù)努力！　　現(xiàn)在再次按下Ctrl+E，重回菜單設(shè)計窗口，接著添加菜單?！　∥覀冊诓藛卫镞€經(jīng)?？吹桨巡煌椃珠_的分隔條，在VB里也很容易做到，把Caption設(shè)為“”（減號），Name為mnuBar1。小知識：實際上我們在生活就中經(jīng)常用到縮排，寫文章時開頭要空兩格就是一種縮排，在編寫程序時更需要縮排，這樣使程序結(jié)構(gòu)化，便于觀察，當(dāng)然菜單設(shè)計里的縮排有更多的用處?！　∏懊嬲f過，菜單相當(dāng)于簡單的按鈕，它有幾個屬性，其中的大部分我們都曾經(jīng)見過，包括Name、Caption、Index、Checked、Enabled、Visible、快捷鍵和熱鍵等等。填寫代碼后運行：Private Sub cmdCancel_Click()MsgBox Cancel按鈕被按下, vbDefaultButton1, 提示End Sub　Private Sub cmdOK_Click()MsgBox OK按鈕被按下, vbDefaultButton1, 提示End Sub結(jié)果如圖4－4－10：快捷鍵大家一定都知道，在VB如何實現(xiàn)呢。1998/7/27, vbDefaultButton1, VB教程第四章范例End Sub　Private Sub Command1_Click(Index As Integer)Select Case IndexCase 0 To 9If FirstNum ThenStrNum1 = Str(Index)FirstNum = FalseElseStrNum1 = StrNum1 + Str(Index)End If = StrNum1Case 10If Not PointFlag ThenIf FirstNum ThenStrNum1 = 0.FirstNum = FalseElseStrNum1 = StrNum1 + .End IfElseExit SubEnd IfPointFlag = True = StrNum1Case 12 To 15FirstNum = TruePointFlag = False39。判斷是否是數(shù)字開頭Dim PointFlag As Boolean 39。還原標(biāo)記值If SignFlag Then’前面已有運算符未運算Call RunElseSignFlag = TrueStrNum2 = StrNum1’把字符串1復(fù)制給字符串2StrNum1 = ’字符串1清空End IfRunsign = Index 11 ‘儲存鍵入的運算符　　里面運算的部分我用了一個過程，是因為在按下等號時還會調(diào)用到運算過程，這樣可以減少代碼的輸入，也使程序便于瀏覽。判斷是否已有小數(shù)點我們知道小數(shù)點只能輸入一次，一個數(shù)據(jù)中不能有多個小數(shù)點存在，所以需要一個布爾變量做判斷?！　∠仍贕eneral里聲明窗體級全局變量：Dim Num1, Num2 As SingleDim StrNum1, StrNum2 As StringDim FirstNum As Boolean 39。 4. 按下“清除”，數(shù)據(jù)被全部清除。1. 按下數(shù)字鍵在液晶屏上會出現(xiàn)數(shù)字，這是最基本的功能。H00C0FFFFamp。 　　下面的例子要更加復(fù)雜些，大家一定都用過Windows附件中的計算器，它是一個標(biāo)準(zhǔn)的科學(xué)計算器，利用VB我們也可以做到，只是沒有那么復(fù)雜，四則運算而已。清除 = TrueEnd Sub　　運行程序，如圖4－5。按F5，運行程序，圖4－4，復(fù)原按鈕成為灰色，不可選。 41第四章　按鈕（一）　　從本章開始我們將正式進(jìn)入VB的編程世界，但這還僅僅是個開端，要編出功能強大的軟件，還要學(xué)很多東西，那就要看以后的VB高級教程了，我也得努力學(xué)啊！　　按鈕是我們在Windows操作見到最多的控件，它們有著各種各樣的功能：“確認(rèn)”、“取消”、“下一步”等等，這些都是按鈕的表現(xiàn)，另外還有很多圖形話的按鈕，其實它們并沒什么不同，所有的按鈕都是通過單擊（click）事件實現(xiàn)的，只不過是在外表不同罷了。八、函數(shù)與過程 函數(shù)與過程有許多相似的地方，它們之間最大也是最本質(zhì)的區(qū)別就在于，函數(shù)有一個返回值，而過程只是執(zhí)行一系列動作，所以可以簡單的把函數(shù)理解成為一個變量，而VB中的每個事件都是一個過程，比如Command1_Click()就是一個過程。 *：乘法運算。 For循環(huán)和Whlie循環(huán)應(yīng)當(dāng)根據(jù)適當(dāng)?shù)沫h(huán)境使用，它們有時也可替換。 Do …… Loop While While后面都跟邏輯條件判斷，“Do While …… Loop語句”和“While …… Wend 語句”作用相似，都是先判斷While后面的條件是否為“真”，如果為“真”則執(zhí)行里面的語句，如果為“假”，則退出循環(huán)，循環(huán)直至條件為“假”終止。 Do While …… Loop語句 Print “a does not equal to 1 or 2.”End Select五、循環(huán)語句循環(huán)結(jié)構(gòu)是計算機語言里一種重要的結(jié)構(gòu)，它的應(yīng)用廣泛，最簡單的例子是累加器的作用，還可以用于窮舉法，更直觀的例子是把某件事重復(fù)指定的次數(shù)，這樣就不用把要重復(fù)的語句輸入多次，而通過循環(huán)結(jié)構(gòu)完成，非常方便。 ……Case Else ……Case 情況2 語句Else If 它的一般語法是：If 條件 Then 語句語句………End If與C 語言不同，VB的條件語句更符合英語的語法，如果Then后面所跟的語句只有一條，可以寫成：If 條件 Then 語句而不用End If。在VB里，注釋語句有兩種，一種是用“Rem”關(guān)鍵字，這跟DOS里的批處理文件的用法一樣，還有一種是利用單引號“’”，例如：‘Dim a As String 與Rem Dim a As String 的作用是一致的。 VB在調(diào)用函數(shù)（Function）時，必須在函數(shù)名后跟一對括號。 還可以定義多維數(shù)組：Dim ThreeD(4,2 to 5,3 to 6) As Integer上例定義了一個三維數(shù)組(444)。注意：使用常量的好處，對于程序中經(jīng)常出現(xiàn)的數(shù)值，應(yīng)設(shè)常量等于它，這樣一是書寫方便，其二，如果要改變該數(shù)值，只需改變定義常量的語句值，而不需改變每個語句，提高了效率。整型可以用“%”代替，長整型可以用“amp。所以，為了程序的嚴(yán)謹(jǐn)和便于查看，正確的定義數(shù)據(jù)類型是必要的。對于屬性，可以在窗體的布局操作中完成，也可以在程序運行中改變，這取決你的需要，但有些屬性是只讀的，它只能在控件布局時改變。 二、屬性 PathChange事件：路徑改變事件，僅用于文件列表框（FileBox）對象。 DragOver事件：鼠標(biāo)在拖放過程中就會產(chǎn)生DragOver事件。 DbClick事件：鼠標(biāo)雙擊事件。 LostFocus事件：當(dāng)光標(biāo)離開該對象時發(fā)生事件。 （Focus）事件 Resize事件：當(dāng)對象的大小改變時觸發(fā)Resize事件。 Paint事件：當(dāng)某一對象在屏幕中被移動，改變尺寸或清除后，程序會自動調(diào)用Paint事件。這樣你就可以象在畫板上一樣，隨意點幾下鼠標(biāo)，一個按鈕就完成了，這些在以前的編程語言下是要經(jīng)過相當(dāng)復(fù)雜的工作的。兩種新方法的交叉使眾多的程序員重新陷入困境，程序員不僅要掌握程序驅(qū)動編程技術(shù)和六百多個函數(shù)的功能，而且還得用C語言描述這些問題。VB的誕生　　VB的出現(xiàn)可以說是Microsoft Windows的日漸成熟的必然產(chǎn)物。但在第四代計算機語言（可視化編程）出現(xiàn)后，可以確切的說它開發(fā)了人們的更多天賦，并不局限于那些頭腦異常清晰的人，每一個人都可以發(fā)現(xiàn)自己也可以編出一些從前不敢問津的程序，想象力的充分發(fā)揮才是第四代語言的精粹。Tahoma,8,134VB最簡單實例入門教程目 錄（提示：按ctrl,并單擊鼠標(biāo)，可以跳到相應(yīng)頁） 1 我們需要什么 3 2 第二章：事件、屬性及數(shù)據(jù)類型 3 3 第三章：VB語言 6 41第四章　按鈕（一） 12 4 第四章　按鈕（二） 19 5 第五章　菜單 27 61第六章　輸入（一） 34 62第六章　輸入（二） 42 63第六章　輸入（三） 52 7第七章　輸出 59附錄 63 VB教程 6363 1我們需要什么　　我們需要什么？當(dāng)我們在一個精彩的游戲世界中游歷了一番之后，或是驚嘆于某一工具軟件的小巧精致之余，多少總會產(chǎn)生些許編程的沖動。　　編程是需要天賦的，你必須在大腦中對整個程序有一個清晰的輪廓，一個高效的流程，這并不是每個人都能做到的，你必須思之慎之，這也使編程變成一件最枯燥無味的事情。對于VB現(xiàn)在也有一個很強的競爭對手――Delphi，有人把它稱作VB殺手，這顯然有偏激之處，VB的確有它的不足之處，但Delphi又何嘗不是呢，而且以微軟對VB的傾心，VB的功能必然會越來越強大。在這一開發(fā)環(huán)境中，程序員唯一困難的是Microsoft SDK提供了六百多個函數(shù)和與其一致的事件驅(qū)動（eventdriven）編程技術(shù)。 何為可視 在VB中引入了控件的概念，在Windows中控件的身影無處不在，各種各樣的按鈕、文本框、無線鈕，都是控件的種類，VB把這些控件模式化，并且每個控件都有若干屬性用來控制控件的外觀，工作方法。1. 窗體和圖象框類事件 Load事件：僅適用于窗體對象，當(dāng)窗體被裝載時運行。 MouseDown、MouseUp屬性：按下/放開鼠標(biāo)鍵事件。 KeyDown、KeyUp事件：按鍵的按下/