程序設(shè)計基礎(chǔ)

第四講主題定時器程序設(shè)計基礎(chǔ)數(shù)據(jù)類型常量變量運(yùn)算符表達(dá)式內(nèi)部函數(shù)定時器Timer定時器控件用來有規(guī)律地間隔一段時間完成一定的操作。建議名稱采用前綴tmr，如：tmrTimer。默認(rèn)名稱Timer1、Timer2……定時器的Interval屬性，表示時鐘間隔。單位：毫秒。如：間隔1秒，Interval設(shè)為1000。Interval設(shè)為0，時鐘不起作用。時鐘在運(yùn)行階段不可見，也無其他外觀等屬性定時器的Timer事件，唯一事件，按間隔自動觸發(fā)。舉例時鐘：通過定時器顯示系統(tǒng)時間Time()函數(shù)課外研究：圓盤時鐘移動字幕：通過定時器控制Label的移動（改變Label的Left屬性）字幕的循環(huán)移動推出字幕：通過定時器改變Label的FontSize屬性Label的居中字幕的定格：當(dāng)字體變到一定大小后停止改變閃爍顏色：紅蘭交替顯示“歡迎光臨”課堂練習(xí)：紅黃蘭三色交替顯示“歡迎光臨”如何控制定時器的啟動與關(guān)閉定時器的Enabled屬性（True|False）表示定時器可否使用，默認(rèn)True。如果定時器的Interval屬性為0，那么定時器也不起作用。思考題：計時器按“開始”進(jìn)行計時、到時間（如10秒）則停止計時，顯示時間到！如何計時？需要變量來保存用掉的時間變量？？？程序設(shè)計基礎(chǔ)注釋語句與程序書寫規(guī)范作用：對程序代碼進(jìn)行注解格式

（1）Rem

注釋內(nèi)容注意Rem是獨(dú)立的語句

（2）由單引號’開始的注釋內(nèi)容，可以是獨(dú)立的語句，也可以用于語句末尾注釋語句為非執(zhí)行語句，計算機(jī)自動改為綠色顯示例：Rem

下面進(jìn)行窗體初始化MoveLeft-100’窗體從當(dāng)前位置左移100Twips優(yōu)秀的程序代碼應(yīng)該是易讀的、可維護(hù)的、可擴(kuò)充的，這些都離不開注釋語句?？偨Y(jié)：盡量一行一條語句一行多條語句和一條語句多行的寫法結(jié)構(gòu)化程序設(shè)計和縮進(jìn)格式盡可能多的注釋語句數(shù)據(jù)類型數(shù)據(jù)是指可以被計算機(jī)處理的信息數(shù)據(jù)有數(shù)值型數(shù)據(jù)和非數(shù)值型數(shù)據(jù)（如字符、時間等）數(shù)據(jù)分類的目的是為了快速處理數(shù)據(jù)和有效利用存儲空間不同的數(shù)據(jù)類型占用不同的存儲空間、表示的數(shù)值范圍、格式都有不同的規(guī)定數(shù)據(jù)類型數(shù)值型整型Integer：2字節(jié)長整型Long：4字節(jié)單精度浮點(diǎn)數(shù)Single：4字節(jié)雙精度浮點(diǎn)數(shù)Double：8字節(jié)貨幣型Currency：8字節(jié)字節(jié)型Byte：1字節(jié)字符型變長String（1個字符占1字節(jié)）定長String*size(size：1～65535)邏輯型Boolean：2字節(jié)日期時間型Date：8字節(jié)變體型Variant：16字節(jié)直接常量整形、長整型與字節(jié)常量十進(jìn)制表示：與日常習(xí)慣相同八進(jìn)制表示：&O開頭十六進(jìn)制表示：&H開頭浮點(diǎn)型常量日常記數(shù)法：21.145、-0.012、.5指數(shù)記數(shù)法（科學(xué)記數(shù)法）：mE±n形式表示m×10±n；E可以用D代替；大小寫一樣字符串常量：用一對雙引號“括起來的字符邏輯常量：True|False日期時間常量：用一對#括起來，可以表示日期、時間、或同時表示日期時間如：#2002-3-108:35:10PM#符號常量符號常量：在聲明中用Const語句，語法：

Const符號常量名[As類型]=常量例：ConstPiAsSingle=3.14159Consta=3Constb=3*a符號常量的運(yùn)用使程序簡潔易維護(hù)系統(tǒng)的預(yù)定義常量如：vbRed、vbCr等變量Variable變量在程序運(yùn)行過程中值可以改變變量用于存儲程序運(yùn)行中的臨時數(shù)據(jù)變量有一定類型、占用一定空間變量的運(yùn)用通過變量名進(jìn)行操作變量命名規(guī)則：字母打頭，跟字母數(shù)字下劃線、最長255個字符。變量名的前綴建議（略）變量值的存取賦值語句：變量名=表達(dá)式復(fù)習(xí)：[對象名.]屬性名=表達(dá)式注意：無論屬性還是變量，出現(xiàn)在=右邊表示取值，不變；出現(xiàn)在=左邊存入新值，改變。例：t=34a=bs=a*bx=x+1

BackColor=vbRedHeight=Width*2FontSize=FontSize+4如何解決計時器問題?其他問題？交換兩個變量的值a←→b？兩個變量中尋找大數(shù)？任意兩個變量保持a>b？多個數(shù)中尋找最大數(shù)？多個數(shù)保持a>b>c>……變量聲明變量聲明的目的是說明變量的作用域和變量的類型，以便為變量分配內(nèi)存空間和及時回收內(nèi)存空間建議變量先聲明再使用在[通用][聲明]中寫OptionExplicit語句或菜單[工具|選項(xiàng)]…[代碼設(shè)置]

√要求變量聲明變量聲明變量類型的顯式說明:Dim語句，語法：

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

……]舉例：DimaAsSingleDimbAsDateDimintCountAsInteger,strPhoneAsString*7注意：

Dimm,nAsInteger（？）DimmAsInteger:nAsInteger（×）Print語句Print輸出空行Print<輸出項(xiàng)>[,|;<輸出項(xiàng)>……]；表示緊湊格式，表示標(biāo)準(zhǔn)輸出格式例：Print“x=”;6,“y=”;9PrintPrint-123.5,1.6E+4運(yùn)算符和表達(dá)式由圓括號以及若干運(yùn)算符將常量、變量以及函數(shù)連接組成的有意義的式子，稱為表達(dá)式。常量、變量、函數(shù)本身也是表達(dá)式。算術(shù)運(yùn)算符和表達(dá)式結(jié)果為數(shù)值+、-、*、/、^、\、MOD優(yōu)先級：（）、^、*/、\、MOD、+-例：?2^3/3Mod9\4算術(shù)表達(dá)式必須在一行中書寫，乘號*不能省略，注意()的運(yùn)用，特殊符號的表示運(yùn)算符和表達(dá)式字符串表達(dá)式和運(yùn)算符&、+：表示連接；&支持自動轉(zhuǎn)換例？“123”+“345”例？123+345例？Text1

&

123（假設(shè)Text1中輸入了123或小李)例？Text1

+

123（假設(shè)Text1中輸入了123或小李)日期時間運(yùn)算符和表達(dá)式日期時間±數(shù)值→新日期時間例：？#3/1/2002#+1.5日期時間-日期時間→數(shù)值（相差天數(shù)）例：？#3/1/2002#-#2/1/2002#運(yùn)算符和表達(dá)式關(guān)系表達(dá)式和運(yùn)算符結(jié)果為邏輯值：True|False=、<>、<、>、>=、<=數(shù)值的比較按數(shù)軸取值字符的比較按ASCII碼取值逐個比較、英文字母按字典順序、數(shù)字按數(shù)值順序、小寫字母大于大寫字母P.347附錄1例？4>5/2例？”cat”>”dog”例？“101”<“99”運(yùn)算符和表達(dá)式邏輯表達(dá)式和運(yùn)算符(表2-3)結(jié)果為邏輯值：True|FalseAnd邏輯與：兩者都為真才為真Or邏輯或：兩者有一個真就為真Not邏輯非：只有一個運(yùn)算量，取反優(yōu)先級：Not>And>Or例：？5>4AndNot4=2*2Or3<7注意：X>=0And<=10（×）0<=X<=10（×）條件構(gòu)造判斷一個整數(shù)是偶數(shù)判斷一個數(shù)是整數(shù)判斷兩個數(shù)中至少有一個>0判斷兩個數(shù)中只有一個>0判斷平面上一個點(diǎn)在圓心為(0,0)，半徑為2的圓內(nèi)判斷平面上一個點(diǎn)在中心為(0,0)，邊長為2的正方形內(nèi)常用內(nèi)部函數(shù)數(shù)學(xué)函數(shù)Sin(x)、Cos(x)、Tan(x)、Atn(x)Abs(x)、Log(x)、Exp(x)、Sqr(x)、Sgn(x)、Fix(x)、Int(x)Rnd(x)例子？Int(-9.7)?Fix(-9.7)寫出大于x的最小整數(shù)（設(shè)x>0）產(chǎn)生∈[1，100]的隨機(jī)整數(shù)Randomize語句Int(Rnd*(m-n+1))+n常用內(nèi)部函數(shù)字符串函數(shù)Trim(x)、Ltrim(x)、Rtrim(x)Left(x,n)、Right(x,n)、Mid(x,I,n)Len(x)Space(n)、String(n,ASCII碼|x)Ucase(x)、Lcase(x)Instr(x,y)例子?Mid(“thepeople’srepublicofchina”,5,6)?Len(“浙江理工大學(xué)”)?String(6,”abc”)?Instr(“China”,“in”)?Instr(“China”,“ch”)常用內(nèi)部函數(shù)日期時間函數(shù)Date、Time、NowHour(x)、Minute(x)、Second(x)類型轉(zhuǎn)換函數(shù)Chr(n)、Asc(x)Str(x)、Val(x)例子？Val("123")+Val("456")?Str(1)+Str(2)?Chr(Asc("xyz")-2)常用內(nèi)部函數(shù)只能在Print語句中使用的函數(shù)Tab(x)Spc(x)例子PrintTab(2);"abc";Tab(5);"def"PrintSpc(2);"abc";Spc(5);"def"PrintSpace(2);"abc";Space(5);"def"X=Space(2)+"abc"+Space(5)+"def"

PrintX輸入對話框InputBox函數(shù)作用：產(chǎn)生輸入對話框，返回用戶在對話框輸入的信息格式：

變量名=InputBox([提示信息][,對話框標(biāo)題][,默認(rèn)值])返回值：輸入框中輸入的內(nèi)容，字符型舉例：問候程序計算程序編程時如果要用戶從鍵盤輸入數(shù)據(jù)就要用上InputBox函數(shù)！??！消息對話框MsgBox函數(shù)作用：產(chǎn)生消息框格式：變量名=MsgBox([提示信息][[,對話框類型][,對話框標(biāo)題]])同時定義圖標(biāo)和按鈕時，數(shù)值取它們的和P.47表2-5P.48表2-6表2-7返回值：整數(shù)，對應(yīng)用戶的單擊的按鈕。P.49表2-8舉例：提示程序：結(jié)束程序的確認(rèn)提示：多行提示信息可以用Chr(13)[vbCr常量]或Chr(10)[vbLf常量]表示回車或換行MsgBox(“mynameis”+vbCr+“l(fā)i