《化學(xué)平衡的移動-》課件8

網(wǎng)頁開發(fā)技術(shù)

函數(shù)和陣列國立臺灣師範(fàn)大學(xué)工業(yè)教育研究所戴建耘教授龍清榮主任吳美華組長主要參考書目教你用VisualBasicScriptNow（碁峰）

吳國柱譯者戴建耘&龍智工作群校閱1網(wǎng)頁開發(fā)技術(shù)

函數(shù)和陣列國立臺灣師範(fàn)大學(xué)1本章重點字串函數(shù)陣列亂數(shù)函數(shù)時間、數(shù)字函數(shù)2本章重點字串函數(shù)2有用的字串函數(shù)String(個數(shù),字元)：重覆用某個字元Lcase(字串)：使字串的字元變成小寫Ucase(字串)：使字串的字元變成大寫X=StrComp(A,B)：比較兩字串A<B –1A=B 0A>B 1A或B其中一個為空字串 Null3有用的字串函數(shù)String(個數(shù),字元)：重覆用某個字元3去除空白的函數(shù)Trim:去除空白Ltrim：去除右邊空白Rtrim：去除右邊空白4去除空白的函數(shù)Trim:去除空白4字串分析如果一個一個字元分析使用者輸入的字串：For每個字元每個字元要做的處理Next5字串分析如果一個一個字元分析使用者輸入的字串：5分析字串函數(shù)

Len,Mid,Left和RightLen：算出字串長度Mid(字串,啟始[,長度])第一個參數(shù)是你要分析的字串第二個參數(shù)是要取出的字元位置第三個參數(shù)是設(shè)定取出字元個數(shù)(雙位元的中文字也代表一個字元),Left(字串,啟始)：從字串前面開始Right(字串,啟始)：從字串尾端開始算起6分析字串函數(shù)

Len,Mid,Left和RightLen：算Replace函數(shù)語法：Replace(Expression,Find,Replacewith[,Start[,Count[,Compare]]])範(fàn)例：Test="Javaisthebestprogramminglanguage"Test=Replace(Test,"Java","VBScript")結(jié)果：Test="VBScriptisthebestprogramminglanguage"被取代原字串尋找取代字串更換字串7Replace函數(shù)語法：被取代原字串尋找取代字串更換字串7用InStr和InStrRev函數(shù)來尋找子字串語法：Instr([Start,]OriginalString,Substring[,Compare])Start設(shè)定從原字串的第幾個字元開始搜尋，如果省略此參數(shù)表示從頭開始尋找OriginalString表被搜尋的原字串Substrin表欲查詢的子字串Compare參數(shù)設(shè)定搜尋字串是否有大小寫之分InStrRev函數(shù)自字尾開始尋找子字串8用InStr和InStrRev函數(shù)來尋找子字串語法：8陣列DIM陣列名稱(索引值)清單方塊內(nèi)的項目都是儲存在一個特別的清單屬性中例如：lstBox1.List(0)表示陣列第一個項， lstBox1.List(1)是第二項，以此類推。ListCount屬性是表示此清單方塊有幾項注意：清單陣列是從0開始算起 最後一項是lstBox1.List(ListCount-1)9陣列DIM陣列名稱(索引值)9動態(tài)與固定陣列固定大小的陣列：DIMA(10)要改變大小需用REDIM指令，但資料會全部刪除。動態(tài)陣列，可改變大小：DIMA()Ubound函數(shù)：傳回陣列的陣列的大小括號內(nèi)不放入最大索引值10動態(tài)與固定陣列固定大小的陣列：DIMA(10)括號內(nèi)不放入多重陣列範(fàn)例：九九乘法表DimMultiplicationTable(9,9)ForI=0To9ForJ=0To9MultiplicationTable(I,J)=(I+1)*(J+1) NextNext這種陣列是十行十列，有100個空間。(注意：陣列的開始是0)11多重陣列範(fàn)例：九九乘法表11儲存變數(shù)到陣列中DimAA=Array(1,2,3,4)1放到陣列A(0)，把2放到陣列A(1)DimATable,MultiplicationTable(9,9)ATable=MultiplicationTable12儲存變數(shù)到陣列中DimA12清單方塊放置在陣列雖清單方塊list屬性是陣列，但現(xiàn)在不能直接加入到陣列中，需用迴圈一個個傳送。範(fàn)例：DimIReDimArrayC(lstBox1.ListCount-1)ForI=0TolstBox1.ListCount-1

ArrayC(I)=lstBox.List(I)Next現(xiàn)在不能用ArrayC=lstBox.List這是陣列這是清單方塊13清單方塊放置在陣列雖清單方塊list屬性是陣列，但現(xiàn)在不能直字串分離函數(shù)SplitSplit函數(shù)用空白做為分隔，把字串分離開範(fàn)例：DimTest,A,ITest="BertrandArthurWilliamRussell"A=Split(Test)ForI=0ToUBound(A)MsgBoxA(I)Next注意：A並非宣告成陣列最後A可成為陣列，並得到分離字串14字串分離函數(shù)SplitSplit函數(shù)用空白做為分隔，把字串分Filter函數(shù)Filter函數(shù)把字串中符合條件的字元過濾到新的字串，或是符合條件的不傳回到新字串中。語法：Filter(InputStrings,Value[,Include[,Compare]])範(fàn)例：找出字串陣列沒有alt.FilteredNewsgroups=Filter(NewsgroupNames,"alt.",False)15Filter函數(shù)Filter函數(shù)把字串中符合條件的字元過濾到格式化輸出FormatNumber：設(shè)定傳回幾位數(shù)字FormatPercent：把小數(shù)點轉(zhuǎn)成百分比FormatCurrency：傳回字串前選擇加入 何種符號FormatDateTime：轉(zhuǎn)換成日期的格式16格式化輸出FormatNumber：設(shè)定傳回幾位數(shù)字16Rnd函數(shù)與Randomize敘述Rnd函數(shù)產(chǎn)生了10個0到1之間的亂數(shù)Randomize讓Rnd函數(shù)產(chǎn)生不同的秩序亂數(shù)範(fàn)例： ForI=1To10Document.WriteRndDocument.Write"<BR>"Next17Rnd函數(shù)與Randomize敘述Rnd函數(shù)產(chǎn)生了10個0到模擬骰子公式：Fix((上限-下限+1)*Rnd)+下限例如骰子是1到6公式是fix(6*Rnd)+118模擬骰子公式：18進階Rnd函數(shù)和Randomize敘述19進階Rnd函數(shù)和Randomize敘述19Int和Fix函數(shù)Int函數(shù)的功能和Fix很相似。Int函數(shù)給予此數(shù)最小的整數(shù)。Int如果是負(fù)數(shù)就數(shù)到下一個負(fù)數(shù)例如Int(-3.5)等於-4，Int(-4.1)等於-5，以此類推。Fix和Int函數(shù)在正數(shù)時是一樣，負(fù)數(shù)就不同，Int函數(shù)會使帶有小數(shù)的負(fù)數(shù)加上-1而大於此整數(shù)。20Int和Fix函數(shù)Int函數(shù)的功能和Fix很相似。20各種Date和Time函數(shù)(一)函數(shù) 描述Date 傳回現(xiàn)在日期DateAdd 將指定日期加一段時間DateDiff 傳回兩個日期的差距DatePart 傳回日期指定DateSerial 傳回日期參數(shù)的組合DateValue 把字串轉(zhuǎn)換成日期型態(tài)Day 傳回數(shù)字轉(zhuǎn)成日期型態(tài)Hour 傳回數(shù)字轉(zhuǎn)成的小時Minute 傳回數(shù)字轉(zhuǎn)成的分鐘21各種Date和Time函數(shù)(一)函數(shù) 描述21各種Date和Time函數(shù)(二)函數(shù) 描述Month 傳回數(shù)字轉(zhuǎn)成的月份MonthName 傳回月份的全名Now 傳回現(xiàn)在的日期和時間Second 傳回數(shù)字轉(zhuǎn)成的秒鐘Time 傳回現(xiàn)在的時間TimeSerial 傳回日期參數(shù)組合資料Weekday 傳回指定是一週第幾天WeekdayName傳回指定日期星期名稱Year 傳回數(shù)字轉(zhuǎn)成年代22各種Date和Time函數(shù)(二)函數(shù) 描述22時間函數(shù)的實作倒數(shù)千禧年txtDaysToGo文字方塊cmdCalculate按鈕主要副程式SubcmdCalculate_ClicktxtDaysToGo=#1/1/2000#-DateEndSub23時間函數(shù)的實作倒數(shù)千禧年23Round(四捨五入)遇上偶數(shù)，而且其小數(shù)點後一位是5則捨去。

Round(4.5)=4

遇上奇數(shù)，而且其小數(shù)點後一位是5則進位。

Round(5.5)=6第二位參數(shù)決定保留第幾位小數(shù)點。

Round(4.567,2)=4.57

24Round(四捨五入)遇上偶數(shù)，而且其小數(shù)點後一位是5則捨去Sgn(判斷正負(fù)數(shù))如果是正數(shù)傳回1，負(fù)數(shù)傳回-1，0則傳回0。範(fàn)例：只要A不等於B就會執(zhí)行For-Next迴圈，而不管A大於B或小於B。ForI=AToBStepSgn(B-A)25Sgn(判斷正負(fù)數(shù))如果是正數(shù)傳回1，負(fù)數(shù)傳回-1，0則傳回AbsAbs(取絕對值)常用在找兩數(shù)間的距離範(fàn)例：測試實際數(shù)值是否在經(jīng)驗數(shù)值容許的範(fàn)圍內(nèi)，例如下面的程式是TrueAnswer和EmpiricalValue相差在±.001之內(nèi)時迴圈停止執(zhí)行。DoUntilAbs(TrueAnswer-EmpiricalValue)<.00126AbsAbs(取絕對值)常用在找兩數(shù)間的距離26其他函數(shù)Sqr平方根函數(shù)是取括號內(nèi)數(shù)值的平方根，但是參數(shù)不能是負(fù)數(shù)。Exp函數(shù)是取自然對數(shù)e的x次方，其運算結(jié)果是雙精密度的數(shù)值。Log函數(shù)是取自然對數(shù)，一般都是以10