国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > VBScript > 正文

VBS基礎編程教程 (第3篇)

2019-10-26 18:00:13
字體:
來源:轉載
供稿:網友
第三篇(共六篇): 
首先, 我來解決一下上次課程的幾個疑問 

第一, 那個余數問題, 16 / 5 = 3...1, 是因為我改過前面的部分, 后面的忘了改了, 不好意思. 

第二, 請看一下程序清單: 

1) 
Dim a,b,c 
a=inputbox("a是:","輸入半徑") 
b=Inputbox("b是:","輸入半徑") 
c=a*2+b*2 
Msgbox(c) 
這個 輸入1、2時是6 

2) 
Dim a,b,c 
a=inputbox("a是:","輸入半徑") 
b=Inputbox("b是:","輸入半徑") 
c=(a+b)*2 
Msgbox(c) 
這個輸入1、2時是24 

   為什么會不一樣呢? 在數學上c=(a+b)*2 和 c=a*2+b*2是等價的, 在VBS中也是如此. 問題出在"+"上, 在VBS中, +不僅僅是加號的意思還表示把兩個字符串連接起來, 例如"Hello"+"World"="HelloWorld" have you understood? 你還記得InoutBox函數的返回值嗎? 是字符串! 這就看出問題了吧, 在編程中"1"不等于(<>)1, "1"是一個字符, 而1是一個數, 所以a,b都是字符串變量, "1"+"2"="12", 這就好像我們小時跟伙伴開玩笑問他們1+1=?一樣, 我們總是笑著說"錯啦,應該是11".但為什么, a可以*2卻不發生錯誤呢? 這時VBS比較智能的一個表現, 如果這個字符串的內容是一個數且對他進行數學運算, 則把字符串強制轉換成數參與運算, 如果字符串代表一個數, 但不參加數學運算, 而是參加字符串運算(合并)則當作字符串處理, 所以你看到a+b=12, 這時候a+b的結果(12)是一個字符串, 當它要乘以2的時候就被強制轉換成了數字12, 這樣我就得到了結果24. 

  怎么修改這個程序呢? 我們需要用到另一個內建的函數:int, int函數的功能是將輸入值轉化成整數值, 我們這樣修改: 

c=(int(a)+int(b))*2 

  這個意思就是把a作為參數傳遞給int函數, int函數就會返回那個整數(你的輸入值), 然后讓返回值參與運算, 這樣就得到了正確答案.所以,以后如果你用的是inputbox函數的話,最好用int語句加工一下:比如c=int(c) 'c是你自己的變量 

  大家是不是覺得這個課程有點枯燥, 呵呵, 變量和運算符部分的確是這樣的, 不過多多練習也就好了, 這次, 我們寫寫真正好玩的東西: 流程控制語句. 這個部分開始才是真正的編程. 

  首先介紹判斷結構. 

  在此之前, 我們先介紹一種簡單的變量類型:布爾值(Boolean), 這種變量只有兩個可能值:True,Flase,即真或假. 這種變量在某些情況下很有用(比如"開關"). 我們定義一個bool變量的方法和其他變量一樣, 賦值也一樣, 例如: 
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表

圖片精選

主站蜘蛛池模板: 富阳市| 靖州| 嫩江县| 绵阳市| 龙州县| 太白县| 苏尼特左旗| 邵阳市| 神木县| 东丰县| 犍为县| 建昌县| 石渠县| 黄骅市| 金溪县| 广东省| 渑池县| 老河口市| 军事| 固镇县| 青冈县| 堆龙德庆县| 岳阳市| 沧源| 崇文区| 弥渡县| 阳春市| 辽宁省| 拉孜县| 广德县| 特克斯县| 柳州市| 杂多县| 清镇市| 西丰县| 依兰县| 乐清市| 正定县| 县级市| 冀州市| 金山区|