1/661前言Application.WorksheetFunction.Sum(arg1,arg2,arg3)。2/662mIntegerIntegerrmAscstring必要的string(字符串)參數(shù)可以是任何有效的字符串表達(dá)式。如7、EndSub：程序的結(jié)束語(yǔ)句，和“Sub示例_1_01()”相對(duì)應(yīng)。3/663字符集的前128個(gè)字符(0到127)對(duì)應(yīng)于標(biāo)準(zhǔn)的U.S.鍵盤上的字符與符號(hào)。4/664必要的charcode(字符代碼)參數(shù)是用來識(shí)別某字符的。yChararbmyCharmyChar7、EndSub：程序的結(jié)束語(yǔ)句，和“Sub示例_1_02()”相對(duì)應(yīng)。hooseNumSub。5/665MsgBoxChoose(Num,"一月","二月","三月")：Chooseindexchoice1[,choice-2,...[,choice-n]])Index是必要參數(shù)，數(shù)值表達(dá)式或字段，它的運(yùn)算結(jié)果是一個(gè)數(shù)值，且界jiaodu=1.36/666Sub。Dimjiaoduzenge型。當(dāng)聲明常odu4、zenge=1/Cos(jiaodu)：利用1/余弦算得正割(sec())的值，賦給MsgBox函數(shù)顯示算得的正割(sec())的值。Sub。7/667要求編寫一段代碼，運(yùn)用DateAdd函數(shù)顯示返回一定間隔后的日期。jglx="m"dyrqInputBox)djglxndyrqSub。8/668erdateyr數(shù)(得到未來的日期)，也可以為負(fù)數(shù)(得到過去的日期)。9/669Sub07。fftervaldatedatefirstdayofweekfirstweekofyear10/6610zdrq=InputBox("請(qǐng)輸入一個(gè)日期:")Sub08。11/6611PartDatePart(interval,date,[,firstdayofweek[,firstweekofyear]])12/6612SerialSub09。teSerialDateSerial13/6613ValueAugustSub010。14/6614zdrq2-8#drqSub11。sgBox15/6615rSWINiniDOWSiniwjm=DirSub12。CWINDOWSWINini如果該文件存在則返回“WIN.INI”(在C:\Windows文件夾中)，把返回的4、wjm=Dir("C:\WINDOWS\*.ini")：16/6616pathname17/6617Sub13。要求編寫一段代碼，運(yùn)用Format函數(shù)對(duì)指定字符串返回指定格式的輸出。sj=q“19:08:43”“2008-8-8”18/6618Sub14。MFormat(expression[,format[,firstdayofweek[,firstweekofyear]]])19/6619PMSub15。20/6620要求編寫一段代碼，運(yùn)用IIF函數(shù)根據(jù)判斷條件返回結(jié)果。CheshiIIFdx00,"大","小")Sub16。、Cheshi=IIF(dx>1000,"大","小")：21/6621IIF函數(shù)IIF(expr,truepart,falsepart)e22/6622MyValue=InputBox(Msg,bt,Default)IfMyValue<10OrMyValue>25ThenbOKThenExitSubSub17。x23/6623xInputBox函數(shù)在一對(duì)話框來中顯示提示，等待用戶輸入正文或按下按鈕，并返回包含文本框InputBox(prompt[,title][,default][,xpos][,ypos][,helpfile,context])t24/6624yczChar"P"gyczCharyczChar25/6625Sub_1_18。PpP對(duì)方式為二進(jìn)制比較(最后一個(gè)參數(shù)可省略)。第一個(gè)參數(shù)省略默認(rèn)從第一個(gè)26/6626InStr函數(shù)InStr([start,]string1,string2[,compare])常數(shù)值描述mpare27/6627yczChar"p"harSub_1_19。vstringmatchstartcompare28/6628常數(shù)值描述要求編寫一段代碼，運(yùn)用IsArray函數(shù)，返回一個(gè)變量是否為一個(gè)數(shù)組。rray29/6629Sub_1_20。Array函數(shù)listIsArray函數(shù)30/6630要求編寫一段代碼，運(yùn)用IsNumeric函數(shù)，返回一個(gè)變量是否為一個(gè)數(shù)值。Sub_1_21。blIsNumeric函數(shù)31/6631IsNumeric(expression)要求編寫一段代碼，運(yùn)用Join函數(shù)，通過連接某個(gè)數(shù)組中的多個(gè)子字符串而創(chuàng)ssArray"三月")Sub_1_022。32/6632Join函數(shù)數(shù)組中的多個(gè)子字符串而創(chuàng)建的。Join(sourcearray[,delimiter])33/6633Sub_1_023。r34/6634rimensiongUBound(arrayname[,dimension])35/6635要求編寫一段代碼，運(yùn)用LCase函數(shù)來將某字符串轉(zhuǎn)成全部小寫，并運(yùn)用Sub_1_024。36/6636整型Integer%長(zhǎng)整型Long&單精度浮點(diǎn)型Single!雙精度浮點(diǎn)型Double#變比整型Currency@ase37/6637gtRYzfcSub_1_025。38/6638SHANGHAIEXPOringlengthstring要參數(shù)。字符串表達(dá)式其中最左邊的那些字符將被返回。如39/6639stringlengthSub_1_026。40/6640SHANGHAIEXPOingvarnamem41/6641cSub_1_027。42/6642imstringSub_1_028。IEXPO43/6643Midstring,start[,length])或length超過文本的字符數(shù)(包括start處的字符)，將返回字符串中44/6644onthrqSub_1_029。q45/6645MonthName(month[,abbreviate])作。46/6646Yhhy=MsgBox(Msg,An,Bt)Sub_1_030。Box個(gè)按鈕)賦給變量Yhhy。47/6647MsgBox(prompt[,buttons][,title][,helpfile,context])t48/6648vbOKOnlyVbOKCancel01ncelVbYesNo4ryVbExclamation48顯示W(wǎng)arningMessage圖標(biāo)。vbApplicationModal0應(yīng)用程序強(qiáng)制返回；應(yīng)用程序一直被掛起直到用VbMsgBoxSetForeground65536指定消息框窗口作為前景窗口49/6649vbMsgBoxRight值。值描述1確定3放棄4重試6是7否50/6650wDimjtjt=Now2、Dimjt：聲明變量jt為可變型變量。3、jt=Now：把系統(tǒng)當(dāng)前的日期與時(shí)間賦給變量jt。51/6651返回一個(gè)Variant(Date)，根據(jù)計(jì)算機(jī)系統(tǒng)設(shè)置的日期和時(shí)間來指定日期和時(shí)I=35lueColorhsSub_1_032。52/6652Bredgreenblue分53/6653imxForx=1To10Cells(x,2)=Int((100*Rnd)+1)'生NextxSub_1_033。如果number的值是Rnd生成54/6654boundRndlowerbound55/6655DimZdzSub_1_034。Round(expression[,numdecimalplaces])56/6656numdecimalplaces可選的。數(shù)字值，表示進(jìn)行四舍五入運(yùn)算時(shí)，小數(shù)點(diǎn)右邊aa=aa&x&“,”aLenaaArrSplitaa,”)Sub_1_035。57/6657變量aa。返回”1,2,3,4,5,”Split(expression[,delimiter[,limit[,compare]]])er格字符("")作為分隔符。如果delimiter是一個(gè)長(zhǎng)度為零的字符串，則返回的數(shù)值描述58/6658erereGou=3qrGouGouGuGuSub_1_036。59/66596、Pfg=Sqr(-4)：生成一個(gè)運(yùn)行時(shí)錯(cuò)誤(負(fù)數(shù)不能用此函數(shù)開平方根)。Sqr數(shù)rtr60/6660Zfc=Str(-459.65)ZfcCStr(459)Zfc=CStr(-459.65)Sub_1_037。ctr61/6661tStr.)為有效的小數(shù)點(diǎn)。如果使用不同的小數(shù)點(diǎn)(例如，國(guó)際性的應(yīng)用程序)，可使用CStr將數(shù)字轉(zhuǎn)成字符串。CBool(expression)CByte(expression)CCur(expression)CDate(expression)CDbl(expression)CDec(expression)CInt(expression)CLng(expression)CSng(expression)CStr(expression)CVar(expression)CStr函數(shù)CStr(expression)62/6662DimXtdqsj,Xtdqsj=TimeSj=#12:10:00#Time=sjSub_1_038。Time函數(shù)63/6663要求編寫一段代碼，運(yùn)用T