VrisualBasic

1、Private Sub Cmd2_Click()如果兩個(gè)Cmd控件使用復(fù)制得到 的話，那么Click()括號(hào)里要加 XX is integer這樣的語(yǔ)句條件：使用TabPrint vbCrLf & "A="& A(1); Tab(10); "A(2) = " & A(2)Tab前要使用；分號(hào))或(逗號(hào))分割條件：換行時(shí)Print vbCrLf & "A(1) = " & A(1); Tab(10); "A(2) = " & A(2); Tab(10); _“ _下劃線

2、前必須空格，否那么編譯錯(cuò)誤條件：間隔性TabPrint vbCrLf & "A(1) = " & A(1); Tab(10); "A(2) = " & A(2); Tab(10); "A(3) = " & A(3); Tab(10); "A(4) = " & A(4)Tab第一次出現(xiàn)確實(shí)是空了，只空2格 但后面出現(xiàn)的Tab都將把后面要現(xiàn)實(shí)的A(n)與前一個(gè)左對(duì)齊如圖:描入前顯石A(1)：=l A(2) = 2A(3J = 3A(4) = 4條件：字符間用逗號(hào)和分號(hào)的差異Pri

3、nt vbCrLf & "A(1) = " & A(1), "A(2) = " & A(2), "A(3) = " & A(3), "A(4) = " & A(4) 逗號(hào)代替分號(hào)的結(jié)果 就是A(n)到A(n+1)間的間隔為12個(gè)空格A(1J = 1A12) = 2A訂削逗號(hào)：前蠱示:1叭卻附地44條件：Tab右為逗號(hào)Print vbCrLf & "A(1) = " & A(1), Tab(15), "A(2) = " &

4、amp; A(2) 只有當(dāng)tab(n)括號(hào)內(nèi)n>=15時(shí)，A(2)才會(huì)和A(1)在一行上n =15W I ¥ 口 1 *菇人刖21U6 «A(2) = 2當(dāng)于;Tab(29) ； 14+15価入俞顯示:Sri)-in =14AC?)-2條件：Tab右為分號(hào)Print vbCrLf & "A(1) = " & A(1); Tab(9); "A(2) = " & A(2)Tab(n)括號(hào)內(nèi)數(shù)值=9數(shù)組才會(huì)在一條線上II播入前業(yè)TH ； W=iA|2) = 2前顯/ '1J-1 A(2|-2情況：間隔差

5、異主要由于Tab右邊的逗號(hào)，左邊的差異如上！Print vbCrLf & "A="& A(1), Tab(15), "A(2) = " & A(2)等價(jià)與Print vbCrLf & "A(1) = " & A(1); Tab(29); "A(2) = " & A(2) 關(guān)鍵在于那個(gè)紅色的逗號(hào)造成間隔差距。Tab左邊的符號(hào)區(qū)別如上解釋的那樣：<0為了下述目的查看相應(yīng)控件顯示一個(gè)按鈕Buttun Con trol顯示檢查框Checkbox Con trol*建立事

6、件驅(qū)動(dòng)窗體FormMa nager Con trol*顯示數(shù)據(jù)庫(kù)中一個(gè) HTML表中的數(shù)據(jù)Grid Con trol*盡可能從數(shù)據(jù)庫(kù)中顯示文本Label Con trol*對(duì)最終用戶提供一組選擇Listbox Con trol*提供一組排它選擇Optio nGroup Con trol*把頁(yè)面像一個(gè)對(duì)象來(lái)處理|PageObject Con trol在頁(yè)面之間導(dǎo)航PageNavbar Con trol進(jìn)入頁(yè)面或離開(kāi)頁(yè)面時(shí)加上特殊效果PageTra nsiti ons Con trol使得一組記錄可用于數(shù)據(jù)綁定Recordset Con trol*使用導(dǎo)航按鈕條在一組記錄中移動(dòng)RecordsetN

7、avbarC on trol*從最終用戶那里接受文本輸入TextBox Con trol*使用期間確定改變頁(yè)面TimeLines Control查看Visual In terDev 1.0控件的使用情況Legacy Con trols在設(shè)計(jì)期間設(shè)置影響頁(yè)面的屬性DOCUMENT可以是綁定數(shù)據(jù)<P><BR> <Hn><DIR><MENU><UL><OL><LI TYPE=a,A,I,i,1 ></>2<SELECT MULTIPLE NAME= SIZE= >vOPTION V

8、ALUE=指定提交時(shí)的控件值 ><SELECTED>g認(rèn)選項(xiàng)3vTABLE ALIGN=BACKGROUND=BGCOLOR= BORDER=5BORDERCOLOR=BORDERCOLORDARBKO=RDERCOLORLIGHCT=ELLPADDING=CELLSPACING=COLS= FRAME= 顯 示 外 框 VOID,ABOVE,BELOW,HSIDES,LHS,VSIDES,BOX,BORDER RULES= 內(nèi) 框 “NONE,GROUPS,ROWS,COLS,AWLILDTH= >vTR>vTD>vTH>vCAPTION>v/

9、>v/>vCAPTIONALIGN='水 平 LEFT,CENTER,RIGHTVALIGN='豎 直“TOP,MIDDER,BOTTOM,BASEL“IN>Ev/>vTR ALIGN= BACKGROUNDB=GCOLOR=BORDERCOLOBRO= RDERCOLORDARBKO=RDERCOLORLIGHT= VALIGN>v/>vTD ALIGN= BACKGROUNDB=GCOLOR=BORDERCOLOBRO= RDERCOLORDARBKO=RDERCOLORLIGHT= COLSPAN= NOWRAP行 ROWSPAN單元格

10、占表行數(shù) VALIGN></> 4vB,I,TT,EM,CODE><FONT COLOR= FACE 字體 SIZE=></>vTEXTAREA COLS區(qū)寬度 NAME= ROWS=區(qū)高度 >5vINPUT TYPE= BUTTONCHECKBOXHIDDER IMAGE PASSWORDRADIO RESET SUBMITTEXT TEXTAREA ALIGN= CHECKED針對(duì) checkbox 和 radio 控件指定默認(rèn)，MAXLENGT'= 針對(duì) password, text 和 textarea。 NAME= SIZ

11、E=針對(duì) password, text 的字符長(zhǎng)度和 textarea 的控件高度寬度“格式 width,height 。 SRC= VALUE= password， text 和 textarea 控件默認(rèn)值， checkbox 和 radio 控件的表單輸入變量值，對(duì)于 reset 和 submit 控件是標(biāo)題。 EVENT>v/> <INPUT>放于 <FORMx中vINPUT TYPE= BUTTONNAME= VALUE'= 顯示在按鈕上的文本ONCLICK= ONFOCUS=>vINPUT TYPE= CHECHBO X NAME= VA

12、LUE= CHECKEDONCLICK= ONFOCUS= >vINPUT TYPE= HIDDENNAME= VALUE= >ONFOCUS=接受焦點(diǎn)時(shí)激發(fā)> vINPUT TYPE= RADIO vINPUT TYPE= RESET vINPUT TYPE= SELECTONCHANGE控件改變時(shí)激發(fā) vINPUT TYPE= SUBMITvINPUT TYPE= PASSWORD NAME= VALUE= SIZE= MAXLENGTHO=NBLUR'= 失 去 焦 點(diǎn) 激 發(fā)NAME= VALUE= CHECKEDONCLICK= ONFOCUS= >N

13、AME= VALUE= ONCLICK= ONFOCUS=>NAME= SIZE= MULTIPLE ONBLUR= ONFOCUS= OPTION SELECTEDV ALUE= >NAME= VALUE= ONCLICK= ONCLICK= ONFOCUS= >vINPUT TYPE= TEXT NAME= VALUE= SIZE= MAXLENGTH= ONBLUR= ONFOCUS=ONSELECT=$件內(nèi)容被選中時(shí)激發(fā) ONCHANGEh vINPUT TYPE= TEXTAREA NAME= ROWS=COLS= ONBLUR= ONFOCUS=ONSELECT=

14、ONCHANGE>=</>6<FORMACTION= URL METHOD二GET,POS NAME= ONSUBMlT=提交表單時(shí)調(diào)用的事件 處理程序 TARGET= 指向各種不同的目標(biāo)窗口包括： _blank,_parent,_self,_top></>例子：<FORM NAME=MYFORM ACTION=HTTP:/NT-SERVER/MYSTUFFMETHOD=POST><INPUT TYPE= TEXT NAME=TEXTFIELD><INPUT TYPE= SUBMIT></FORM><

15、;IMG ALIGN= LEFT,RIGHT|對(duì)圖像,TOP,CENTER,MIDDLE,BOTTO對(duì)文本ALT='閃顯文字 BORDER=CONTROLS加載一套視頻控件，和 DYNSR一起使用，配套的。DYNSRC=URL '視頻 HEIGHT= HSPACE= ISMAP'錨 LOOP=播放次數(shù)SRC= url START= FILEOPEN,MOUSEOVER USEMAP二圖像為映射。 VSPACE二圖像上下邊 距， WIDTH=>注：DYNSR優(yōu)先于SRC8字幕滾動(dòng)<MARQUEE ALIGN=TOP,MIDDLE,BOTTOMBEHAVIOR=

16、SCROLL,SLIDE,ALTERNATEBGCOLOR=DIRECTION= LEFT,RIGHT '方向 INFINITE " SCROLLAMOUNT滾動(dòng)每次移動(dòng)距離 ></>9FRAMESE框架<FRAMESETCOLS=25%,100,* ' 分 3FRAMEBORDER=0 三維邊框是否顯示 FRAMESET >HEIGHT= HSPACE= LOOP= 次 數(shù) 或 者 SCROLLDELA滾動(dòng)時(shí)間間距 VSPACE= WIDTH=列 。 按 百 分 ， 像 素 ， 相 對(duì) 尺 寸 分FRAMESPACING框 架間距 RO

17、WS二></FRAME,IFRAME<FRAME FRAMEBORDER=0 MAGINHEIGHT=框高M(jìn)ARGINWIDT框?qū)扤AME=NORESIZE'框架大小不可調(diào)整SCROLLING二YES,NO SRC= URL ></>注：不支持框架的可以在vFRAMESE容器中用<NOFRAISE【提醒?！縱/NOFRAM提醒用戶10vA HREF= NAME= TARGET= TITLE=>v/A>11vSCRIPTLANGUAGE“=VBS,VBSCRIPT EVENT'= 關(guān)聯(lián)事件 FOR= 關(guān)聯(lián)對(duì)象 >VBSC

18、RIPT關(guān)鍵字：數(shù)組處理 :dim， redim ， private,public ， isarray 檢測(cè)是否數(shù)組 ,erase '初始化定長(zhǎng)數(shù)組， lbound 返回?cái)?shù)組下界， ubound賦值注釋 := let set '為變量指定對(duì)象 REM常量:empty '未初始化的對(duì)象nothing '釋放對(duì)象null true flase控制:do loop for next for each nextif then else select case while wend類型轉(zhuǎn)換：Abs Asc ,AscB,AscW'返回字符 ASCII碼 chr,ch

19、rB,chrW '返回 ASCII碼的字符 cbool,cbyte,cdata,cdbl,cint,clng,csng,cstr,dataserial,datavalue,hex,oct,fix,int,sgn,timeserial,timevalue date,time,dataserial,datavalue,day,month,weekday,year,hour,minute,second,now,timeserial ,timevalue.錯(cuò)誤處理 ： on error err輸入/ 輸出： INPUTBOX OUTPUT數(shù)學(xué)函數(shù) ： atn,cos,sin,tan,exp,l

20、og,sqr,randomize,rnd對(duì)象 ：createobjectisobject過(guò)程 ： call,functionsub字符串 ：asc,ascb,ascwchr,chrb,chrwinstr,instrblen ,lenblease,ucase, left,leftbmid,midbright,rightbspace,strcomp stringltrim,rtrim,trim變體： isarray,isdate,isempty,isnull,isnumberic,isobject,vartype整理：vartype 測(cè)試變量子類型 ! 返回值為整型type name測(cè)試變量子類型

21、！返回值為字符串VBSCRIPT的根本輸入輸出1. 賦值注釋 ：2. 信息框：let set '為變量指定對(duì)象REM1. alert “2. msgbox函數(shù)： x=msgbox(msg,type,title)type=05+16,32,48,64+0,256,512msgbox 返回值為按鈕值 1-ok.2-ca ncel.3-abort中止.4-retry.5-ig nore.6-yes.7-no.3. msgbox語(yǔ)句:msgbox msg,type,title4. inputbox 函數(shù)：inputbox(prompt,title,default,xpos,ypos)返回值為輸

22、入值prompt ： 提示輸入語(yǔ)句 如需回車換行 插入 chr(13) chr(10) default： 輸入?yún)^(qū)默認(rèn)信息vbscript 的對(duì)象id,name,color,fontsize,visible對(duì)象常見(jiàn)屬性標(biāo)志： id,name,co對(duì)象事件 ：對(duì)象名. 屬性名稱 =新設(shè)置屬性值 click,dbclick,load,mousemove ,change, sub對(duì)象名稱(name)_事件() 代碼 end sub對(duì)象方法 ：調(diào)用：對(duì)象名稱 . 方法名稱<INPUT TYPE= TEXT NAME= VALUE= SIZE= MAXLENGTH= ONBLUR= ONFOCUS=

23、ONSELECT=g件內(nèi)容被選中時(shí)激發(fā) ONCHANGEhdisabled: 不可使用 maxlength= 最大字符數(shù) readonly accesskey: 光標(biāo)定位快捷鍵 tabindex<INPUT TYPE= TEXTAREANAME= ROWS=COLS= ONBLUR= ONFOCUS=ONSELECT=ONCHANGE>=cols: 多行文本寬度 rows: 多行文本高度 wrap: 換行方式 取值“ off soft hard off 回車換行數(shù)組的定義：dim A(m,n)數(shù)組內(nèi)容去除： erase 數(shù)組名，數(shù)組名 .數(shù)組元素輸入：dim A()sub butt

24、on_onclick()redim A(size)for i=1 to ntemp= inputbox(msg)A(i) =tempnextEnd sub數(shù)組元素的先輸入再輸出：dim A(m,n)sub button_onclick()redim A(size)for i=0 to mfor j=0 to nA(i ，j)= inputbox(msg)NextNextDocument.write( “<pre 標(biāo)簽> )for i=0 to mfor j=0 to ndocument.write(A (i,j )& “)NextDocument.writeLn 換行寫(xiě) N

25、ext Document.write( “</pre> )End sub數(shù)組初始化：數(shù)組變量名=array(數(shù)組元素值)window 對(duì)象window 對(duì)象： name opener top locationdefaultframeshistorynavigatedocumentwi ndow 方法： alert confirm prompt ope n, close settimeout,cleartimeoutn avigate.open 方法： newwindow = window.open url,target 窗口名 ,toolbar=bool 是否顯示工具欄 “ yes

26、,no,1,0 ,lacation=bool是否顯示瀏覽器地址框 ,directories= bool 目錄表顯示 ,status=bool 狀態(tài)條顯示 ,menuber=bool 菜單條顯示 ,scrollbars=bool 滾動(dòng)條顯示 , resizeable=bool 窗口大小是否改 ,width=pixels,height=pixels, top=pixels, left=pixels 左上 角坐標(biāo) 注： 最后四個(gè)定位的不放“內(nèi) , 其他的要帶引號(hào)。黃色為必需的close:I1newwindow=window.open newwindow.closesettimeout:id 返 回

27、值 =window.settimeoutexpression 函 數(shù) 過(guò) 程 名 ,msec 調(diào) 用 過(guò) 程 前 經(jīng) 歷 的 時(shí)間 ,languagevbs 或者 js例如：ID=window.settimeout gourl已定義,10000,vbscriptcleartimeout:window.cleartimeout IDnavigate：window.navigate urlDOCUMENT象的屬性Document.linkcolor =yellow/#00FFFF 設(shè)置超鏈接的顏色 Document.alinkcolor 鼠標(biāo)左鍵按下未放的超鏈接顏色 Document.vlinkc

28、olor 已訪問(wèn)的超鏈接顏色 Document.bgcolor =Document.fgcolor =Anchor 屬性/ 對(duì)象 ： anchor.length 文檔中錨的個(gè)數(shù) Title ： 當(dāng)前文檔標(biāo)題 , 只讀 Cookie： 客戶機(jī)上存放字符串 ,vbs 的 I/O, 實(shí)現(xiàn)多個(gè)頁(yè)面信息共享 .Cookie 的有效期 ： 例子：Document.Cookie= UserName& “expires=the,01 Dec1999 12：00：00 GMT Link ： 和 Anchor 屬性相似 , 對(duì)超鏈接而言的 Lasemodified 返回文檔最后修改日期Referrer返回

29、文檔的URL地址DOCUMENT象的方法Open： 先 open 內(nèi)容將被去除 后 write & writelnWrite :如果open 了要用close關(guān)閉文檔后顯示.字符串可以是字符串常變量以及 HTML標(biāo)記，超鏈接. Writeln ： 同 write, 寫(xiě)完字符串換行 .CloseClear : 去除文檔內(nèi)容ColorValue =#& Hex(0)& Hex(128)& Hex(256) 顏色:#00ffff.#000000.#0000ff.#ff00ff.#00e000.#00ff00.#008000.#800000.#000080.#808000.#800080 .#ff0000.#c0c0c0.#ffffff.#ffff00.Document塊輸出：Document.write( “<pre>)Document.write( “輸出項(xiàng) )Document.write( “輸出項(xiàng) )Document.writeln 換行用 Document.write( “<