荷甲直播免费观看直播在线_丰满的继牳3中文字幕系列免费_久久婷婷激情精品综合_有码 无码 中文字幕 丝袜_国内外成人激情视频_亚洲乱码中文字幕234_韩国理论福利片午夜_亚洲一区二区三区高清精油按摩_日本韩国欧美三级在线_在线Ⅴ片免费观看视频

知ing

vb程序設(shè)計(第三版)

龔沛曾 編 / 高等教育出版社

? ? 上傳

查看本書

習(xí)題三
1. 合法常量:
(1) Double
(2) 錯誤
(3) Double
(4) Double
(5) 錯誤
(6) Integer
(7) String
(8) String
(9) Date
(10) Double
(11) 錯誤(漢字字符)
(12)Integer(八進制)
(13) 錯誤(八進制無數(shù)碼8)
(14) Integer
(15) Boolean
(16) 錯誤
(17) 錯誤(十六進制無數(shù)碼g)
(18) Single


說明:浮點型變量默認(rèn)為Double類型而非Single。

2. 合法變量名:
(1) √
(2) √
(3) 誤:數(shù)字開頭
(4) 誤:含空格
(5) 誤:關(guān)鍵字
(6) √
(7) 誤:關(guān)鍵字
(8) 誤:有括號
(9) √
(10) √
(11) √
(12) √(漢字字符可作為變量名,但不常用,且此名稱易誤解)
變量命名規(guī)則見P.41-42。
字母(漢字)開頭,字母(漢字)、數(shù)字、下劃線組成,長度為1-255個字符;關(guān)鍵字不可作為變量名,但可在變量名中嵌入關(guān)鍵字;不區(qū)分大小寫。
常量、數(shù)組、類型、函數(shù)、過程、對象命名規(guī)則與此相同。常量名通常全用大寫。

3. 寫VB表達(dá)式
(1) Abs(x + y) + z ^ 5
(2) (1 + x * y) ^ 6
(3) (10 * x + Sqr(3 * y)) / (x * y)
(4) (-b + Sqr(b ^ 2 - 4 * a * c)) / (2 * a)
(5) 1 / (1 / r1 + 1 / r2 + 1 / r3)
(6) Sin(45 * 3.14159 / 180) + (Exp(10) + Log(10)) / Sqr(x + y + 1)

4. 根據(jù)條件寫表達(dá)式
(1) 隨機產(chǎn)生大寫字母 Chr(Int(Rnd * (Asc("L") - Asc("C") + 1) + Asc("C")))
(2) [100,200]內(nèi)的隨機數(shù) Int(Rnd * 101) + 100
(3) 點(x,y)位于第一或第三象限 x > 0 And y > 0 Or x < 0 And y < 0 或 x * y > 0
(4) x是5或7的整數(shù)倍 x Mod 5 = 0 Or Int(x / 7) = x / 7
(5) 將兩位整數(shù)x的個位與十位對換 x \ 10 + (x Mod 10) * 10
(6) 四舍五入取兩位小數(shù) Round(x, 2)
(7) 字符變量C是字母字符(不區(qū)分大小寫)——準(zhǔn)確地說是:字符變量C的第一個字符是字母
C >= "A" And C <= "Z" Or C >= "a" And C < "z"
或 UCase(C) >= "A" And UCase(C) <= "Z"
或 LCase(C) >= "a" And LCase(C) <= "z"
(8) 字符變量S第5個字符起取6個字符 Mid(S, 5, 6)
(9) 10≤x<20 10 <= x And x < 20
(10) x,y至少有一個小于z x < z Or y < z
(11)x,y都大于z x > z And y > z

5. 寫表達(dá)式的值
(1) 188 ——注意運算的優(yōu)先級順序,以及整除運算“\”的計算
(2) 200100 —— 計算100 + "100"時,由于兩個操作數(shù)類型不同,在可能的情況下自動采用精度較高的類型,即把字符型轉(zhuǎn)換為數(shù)值型,100 +100 得到200;然后進行字符串連接運算200 & 100 ,再自動將兩個數(shù)值轉(zhuǎn)換為字符串,得200100。
(3) 68.56 ——在四舍五入函數(shù)產(chǎn)生之前,這就是四舍五入的計算方法
(4) 876554 ——先進行字符串的“+”運算,再轉(zhuǎn)換成數(shù)值。在變量名和函數(shù)名后可加上類型符,以強調(diào)其類型,但不是必須的。
(5) 2000-2-29
(6) 6

6.Shell函數(shù)調(diào)用
i = Shell("mspaint.exe", 1) '啟動畫圖
i = Shell("C:\Program Files\Microsoft Office\OFFICE11\winword.exe", 1) '啟動Word
說明:“畫圖”是Windows本身提供的程序,可以省略路徑。

8. 答:單精度浮點型

第7,9題答案在教材中找。

查看更多