vbs小應(yīng)用

劉曉瑜，喬海珍

（張家口職業(yè)技術(shù)學(xué)院 信息工程系，河北 張家口 075000）

vbs小應(yīng)用

劉曉瑜，喬海珍

（張家口職業(yè)技術(shù)學(xué)院 信息工程系，河北 張家口 075000）

什么是vbs，怎樣使用它？通過生動的例子言簡意賅地介紹了Vbs的運行環(huán)境，編寫技巧及運行方法。

Vbs；程序；運行

一、認(rèn)識Vbs

vbs是什么？它來能做什么？隨著所見即所得的計算機(jī)操作界面的問世，DOS操作系統(tǒng)逐漸淡出了大多數(shù)人的視界，而現(xiàn)在我要向大家介紹的這一款小的工具語言vbs，其功能相當(dāng)于以前DOS環(huán)境下命令行能做的，或許還能比DOS做得更多，相比DOS而言，vbs是應(yīng)網(wǎng)絡(luò)應(yīng)用而生。

二、如何在電腦上運行一個vbs小程序

vbs的操作方法很簡單，在任意位置新建一個文本文件，將代碼寫入其中，保存后將文件的擴(kuò)展名改為“.vbs”，雙擊該文件，程序即可運行。即使是電腦本身沒有安裝高級語言軟件，只要是微軟的windows更或是微軟的移動智能設(shè)備都可以運行。可以用“’”、“rem”將非運行的語句注釋掉。

例：整數(shù)階乘。

Function Recursion（TempInt）'簡單階乘遞歸函數(shù)

If TempInt=0 then Recursion=1：Exit FunCtion

If TempInt=1 then Recursion=1：Exit FunCtion

If TempInt＞1 then Recursion=TempInt*Recursion（TempInt-1）

End Function

Msgbox Recursion（0）

Msgbox Recursion（1）

Msgbox Recursion（5）

將上述代碼復(fù)制到一個文本文件中，制作一個vbs文件，運行即可。

三、讓Vbs聽話地做些力所能及的事情

基于上例拓展一下，當(dāng)遇到一個需要計算機(jī)解決的問題的時候，操作員需要做些什么，操作員讓計算機(jī)幫著做些什么？例如有一組高空500Hpa的站點氣象數(shù)據(jù)如下。

diamond 2 13年10月24日20時500百帕高空觀測：

假設(shè)需要找的站點號是：54511、54161、56046、52866、53772既不連續(xù)也沒什么規(guī)律的5個站點，站在一個觀察者的角度，如果手工找一遍，工作量巨大且浪費時間，那就讓vbs來幫忙吧。

第一步：建立一個vbs腳本文件“FindData.vbs”。

第二步：按照大腦的邏輯用vbs寫出代碼：

代碼解讀：

*1：建立一個可以操作各種文件的對象，并把這個對象交給一個名為fso的參數(shù)；

*2：用OpenTextFile工具，打開"c：數(shù)據(jù).txt"這個文件；

*3：開始逐個查找所需要的數(shù)據(jù)，直到查找到（f.AtEnd-OfStream ＜＞ True）停止；

*4：開始讀取每行的數(shù)據(jù)，并把這些數(shù)據(jù)放在tempstr這里保存好；

*5、*6、*7、*8、*9依次分別是：從tempstr從左邊數(shù)5個數(shù)據(jù)是54511（left（tempstr，5）="54511"）、54161、56046、52866、53772那么就分別找到了一個符合要求的站點號，接著把符合要求的數(shù)據(jù)輸出到屏幕；

*10：找遍整個文件，到結(jié)尾停止工作（Loop）；

*11：關(guān)閉文件（f.close）；

*12：查找完畢，釋放對象（工具箱）（Set fso = Nothing）

第三步運行程序：

圖1 vbs文件

圖2 結(jié)果

1.將上面的數(shù)據(jù)部分復(fù)制到一個文本文件里面，保存成“數(shù)據(jù).txt”，并把這個新保存的文件放在“C：”下面。

2.將上面代碼部分復(fù)制到一個文本文件里面，保存成“FindData.vbs”如圖1所示，雙擊它，運行結(jié)果如圖2所示。

怎么樣，vbs很簡單吧！有興趣的朋友來繼續(xù)拓展它吧！

G712

A

1674-9324（2014）40-0156-02

劉曉瑜（1979-），女，河北沽源人，大學(xué)本科，碩士學(xué)位，張家口職業(yè)技術(shù)學(xué)院信息工程系高校講師，研究方向：計算機(jī)應(yīng)用；喬海珍（1972-），女，河北萬全人，大學(xué)本科，碩士學(xué)位，張家口職業(yè)技術(shù)學(xué)院信息工程系高校講師，研究方向：計算機(jī)應(yīng)用。