“神奇”的循環(huán)語(yǔ)句

“神奇”的循環(huán)語(yǔ)句一、學(xué)柯南破案（1）For…Next循環(huán)語(yǔ)句For…Next循環(huán)語(yǔ)句使用一種稱為計(jì)數(shù)器的變量（也稱為循環(huán)變量）來(lái)控制循環(huán)次數(shù)，它的格式如下：For計(jì)數(shù)器變量=初值To終值[Step步長(zhǎng)值]語(yǔ)句序列（循環(huán)體語(yǔ)句）Next[計(jì)數(shù)器變量]這種語(yǔ)句的執(zhí)行流程如下圖所示。（2）用For…Next語(yǔ)句編程，判斷牌照號(hào)碼第1步：確定算法，畫出如下所示的程序流程圖。第2步：設(shè)計(jì)如下圖所示的程序界面。第3步：為判斷按鈕編寫單擊事件驅(qū)動(dòng)程序，第4步：運(yùn)行程序，單擊判斷按鈕，得出肇事車的車牌號(hào)是7744。第5步：保存程序。（3）對(duì)象的方法

在“柯南破案”程序中，F(xiàn)orm1.Print是調(diào)用窗體對(duì)象的“方法”語(yǔ)句，它調(diào)用了Form1窗體對(duì)象的Print

方法。

對(duì)象的方法可以理解為對(duì)象所具有的本領(lǐng)或可以完成的動(dòng)作，不同的對(duì)象具有不同的方法。

調(diào)用對(duì)象方法的語(yǔ)句格式為：

對(duì)象名稱.方法[參數(shù)]

①窗體的Print方法。語(yǔ)句格式為：

窗體名稱.

Print

[表達(dá)式表]

[

，或；]

這條語(yǔ)句的作用是在窗體中顯示出文本或表達(dá)式的值。

②窗體的Cls方法。語(yǔ)句格式為：

窗體名稱.Cls

這條語(yǔ)句的作用是清除窗體中原來(lái)顯示的內(nèi)容和畫出的圖形。二、編寫程序解決趣味物理問(wèn)題（1）Do…Loop循環(huán)語(yǔ)句D…Loop循環(huán)語(yǔ)句的格式為：DoWhile表達(dá)式（條件表達(dá)式或邏輯表達(dá)式）語(yǔ)句序列（循環(huán)體語(yǔ)句）Loop下面我們按照“分析問(wèn)題——設(shè)計(jì)算法——編寫程序”的思路，使用Do...Loop語(yǔ)句設(shè)計(jì)一個(gè)完整的程序來(lái)解決以上問(wèn)題。①分析問(wèn)題。根據(jù)題目描述，畫出如下圖所示的小球彈跳過(guò)程圖示。②設(shè)計(jì)算法。用流程圖描述該算法，如下頁(yè)圖所示。③設(shè)計(jì)如下圖所示的程序界面。④編寫程序。為計(jì)算按鈕編寫單擊事件驅(qū)動(dòng)程序。⑤運(yùn)行程序。單擊工具欄上的“啟動(dòng)”按鈕

運(yùn)行程序，再單擊程序運(yùn)行界面中的計(jì)算按鈕，彈出如下面左圖所示的輸入框，輸入10，單擊口確定按鈕后，便會(huì)在窗體中顯示如下面右圖所示的計(jì)算結(jié)果。⑥保存程序。（2）InputBox輸入框函數(shù)在上述程序代碼中用到了InputBox輸入框函數(shù)，用來(lái)讓用戶輸入小球初始的高度。InputBox輸入框函數(shù)一般用在賦值語(yǔ)句中，其常用格式為：

變量=InputBox（“提示信息”）如“小球彈跳”程序中的語(yǔ)句

H=Val（InputBox（“請(qǐng)輸入小球的開始高度（米）：”））執(zhí)行的結(jié)果就是彈出如上面左圖所示的對(duì)話框，并把用戶輸入到輸入框中的數(shù)據(jù)賦給變量H。三、與計(jì)算機(jī)比賽“心算”（1）列表框控件單擊工具箱中的“列表框”控件圖標(biāo)，在窗體中按住左鍵拖動(dòng)鼠標(biāo)可以繪制出列表框控件。使用列表框控件可以顯示若干個(gè)數(shù)據(jù)項(xiàng)目。當(dāng)數(shù)據(jù)項(xiàng)目較多列表框中顯示不下時(shí)，其右側(cè)會(huì)自動(dòng)出現(xiàn)一個(gè)滾動(dòng)條，拖動(dòng)滾動(dòng)條中的滾動(dòng)塊，可以顯示當(dāng)前列表框中沒(méi)有顯示出來(lái)的項(xiàng)目。（2）設(shè)計(jì)“心算”程序第1步：?jiǎn)?dòng)VB，新建一個(gè)工程，設(shè)置窗體的大?。▽⒋绑w的Height屬性和Width屬性分別設(shè)置為4800和6400）。第2步：?jiǎn)螕艄ぞ呦渲械摹傲斜砜颉笨丶D標(biāo)目，將鼠標(biāo)指針移到窗體的設(shè)計(jì)界面上，畫出一個(gè)列表框控件，VB自動(dòng)給該控件起了個(gè)名稱List1，如下頁(yè)左圖所示。第3步：在窗體中再繪制三個(gè)命令按鈕控件Command1、Command2、Command3，如下頁(yè)右圖所示。第4步：在程序代碼窗口中為三個(gè)按鈕編寫單擊事件程序。第5步：雙擊窗體空白處，進(jìn)入窗體的Load事件過(guò)程，編寫下述程序代碼。

PrivateSubFormLoad（）

Command1.Caption=“開始“Command2.Caption