1.定義變量/常量

• dim 定義變量
  dim var=1
• const 定義常量
  const PI=3.14

2.注釋

• rem
• ’

3.條件判斷

' 判斷輸入數(shù)是否大于1dim num num=int(inputbox("請輸入一個(gè)整數(shù)")) if num>1 then msgbox("大于1") elseif num<1 then msgbox("小于1") elseif num=1 then msgbox("等于1") end if

相等符號不是== 而是=

'輸入數(shù)字判斷對應(yīng)的星期 dim num num=int(inputbox("請輸入1-7中一數(shù)字")) select case num case 1 msgbox("MON") case 2 msgbox("TUE") case 3 msgbox("TUR") case 4 msgbox("WED") case 5 msgbox("FRI") case 6 msgbox("SAT") case 7 msgbox("SUN") case else msgbox("不在范圍內(nèi)") end select

4.循環(huán)語句

• For…Next

'循環(huán)接收5個(gè)數(shù) 并計(jì)算其總和、平均值dim sum dim count count=5 dim i for i=1 to 5 step 1sum=sum+int(inputbox("第"&i&"個(gè)數(shù)")) next msgbox("總和:"&sum&" 絕對值:"&sum/count)

• For Each…Next

' 循環(huán)輸入數(shù)組 并遍歷出來dim arr(4) dim i for i=0 to 4arr(i)=int(inputbox("請輸入數(shù)字")) Next For Each x in arrmsgbox(x) Next

• Do…While Loop

'循環(huán)接收5個(gè)數(shù) 并計(jì)算其總和、平均值dim sum dim count count=0 dim i Do While count<5sum=sum+int(inputbox("第"&count+1&"個(gè)數(shù)"))count=count+1Loop msgbox("總和:"&sum&" 絕對值:"&sum/count)

• Do Until…Loop

5.數(shù)組

• 一維數(shù)組
  arr(4) 0-4 五個(gè)元素
• 多維數(shù)組
  arr(2,4) 行0-2 列0-4 3*5=15個(gè)元素

6.函數(shù)

*自定義函數(shù)

function 函數(shù)名(參數(shù)1，參數(shù)2) 函數(shù)名=xxx//返回值類似于return end function 調(diào)用函數(shù) 1.call 函數(shù)名(參數(shù)) 2.函數(shù)名(參數(shù)) ' 計(jì)算數(shù)的平方function square(num) square=num*num end function dim num num=int(inputbox("輸入一個(gè)整數(shù)")) msgbox(square(num))

• 常用內(nèi)建函數(shù)

7.子程序

• 與函數(shù)區(qū)別 * 無返回值*

sub 子程序名end sub

w3c vbs教程

總結(jié)

以上是生活随笔為你收集整理的vbs脚本学习笔记的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。