dim c as single '定義c為單精度型
dim s as single '定義s為單精度型
r = val( '輸入半徑r
c = 2 * 3.14159 * r '計算周長
s = 3.14159 * r * r '計算面積
= c '輸出周長
= s '輸出面積
end sub
private sub command2_click()
end退出
一、常量：批在程式進行過程中不變的量在vb中一般分數值常量與字元常量兩種
數值常量：就是數學中說的常數，分整型常量和實型常量兩種
整型常量：即整數，指不帶小數點的數值如1、0、、-10、+35等都是合法的整數
實型常量：即實數，指帶小數點的數值。
實型常量又分為定點數和浮點數兩種。
例：定點數：3.14159和-6.8，1.99
浮點數：2e6、1e5、88e
例：1.2345×103 可表示為1.2345e3，字母e表示底數10
浮點數就是數學上的科學計數法。
字串常量：被一對雙引號括起來的若干個合法的字元稱為字串常量。例如：
」china」、」visual basic」、」18」、」3.1415」等，雙引號中字元，不包括雙引號本身。
符號常量：如果多次用到同乙個常量，則可用乙個有意義的名字表示這個常量。
二、變數：在程式執行過程中，其值可以改變的量稱為變數
變數命名注意要點：1、必須以字母開頭,不能以數字或其他字元開頭。
2、只能由字母、漢字、數字學或下劃線組成，不能含有小數點、空格等字元。
3、最長不超過255個字元
4、不能以vb保留字作變數名，如語句定義符、函式名等。
5、vb不區分變數名中字母大小寫。如hello和hello是同乙個變數。
資料及運算
（1）常用資料型別：(整型)integer、（長整型）long、（單精度型）single、（雙精度型）double、（字串型）string、（布林型）boolean、（日期型）date
其中(整型)integer、（長整型）long、（單精度型）single、（雙精度型）double屬於數值型
表示範圍：
(整型)integer (-32768 —— 32767，儲存為 16 位 ， 2 個位元組)
(長整型)long(-21億 —— 21億，可以表示人口數量)
(布林型）boolean(true 真、是或 false假、非)
（字串型）string(定長字串：0——65535個字元，不定長字串：0——20億個字元)
字串型資料是指用 「 」括起來的一串字元。如「歡迎進入vb世界！」、「 visual basic」 、「1234 」都是字串型別。
（日期型）date（100/1/1——9999/12/31）
日期型資料專門用來處理日期和時間。vb採用一對「#」把日期和時間的值括起來，如#2003/08/20#表示2023年8月20日。
（2）變數的命名、宣告及賦值
變數的宣告：
dim 《變數名 >as 《變數型別》
如：dim a as integer 定義乙個整型變數，變數名為a
變數的賦值
vb中使用let語句給變數賦值，其形式如下：
變數 = 表示式
資料的輸出
程式中運算得到的結果，除可以使用文字框和標籤顯示外，對於大批量的資料更適合用pint方法輸出，格式如下
[物件] . print [表示式列表]
例題：private sub form_click()
dim x as single, y as single
-61; -34
9 * 2; 12
"this is"; "a book"
x = 3: y = 4
print "x="; x, "y="; y
end sub
注意：print 方法
運算子1、 算術運算：
+ 加 -- 減 *乘
^ 指數例：2^2 = 4
/ （浮點）除例：5 / 2 = 2.5
\ 整除例： 5 \ 2 = 2
mod 求餘數例：5 mod 2 = 1
關係運算
= 賦值 、 < 小於號
<> 不等於 > 大於號
>= 大於等於號 <=小於等於號
注意：關係表示式的運算結果為布林值true 或 false
例：3 > 2 結果為 true(真或是)
邏輯運算
not（取反）and（與） or（或）
運算結果為布林型（boolean）true 或 false
邏輯運算子的優先順序為：no > and > or
日期運算子與日期表示式
日期表示式是用日期運算子「+」或「-」將算式表示式、日期型常量、日期型變數、日期函式等連線起來的式子，如表示式「#2003/09/01# +30」的運算結果是「2003-10-1」；表示式「#2003/10/20# - #2003/10/10#」的運算結果為整數10
字元運算
字串連線符為「+」和「&」
「123」 + 「45」 = 「12345」
「123」 & 「45」 = 「12345」
123 + 「45」 = 168
「123」 + 45 = 168
運算子的執行順序
在vb中，當乙個表示式中同時出現多種運算子時，運算次序由運算子的優先順序決定，優先順序高的運算子先運算，優先順序相同的從左向右進行運算。不同性質的運算子優先順序如下。
算術運算子 > 字串運算子 > 關係運算子 > 邏輯運算子
常用函式
數學函式
abs(x) 求x 的絕對值，例：abs(-3.6) = 3.6
sqr(x) 求 x 的平方根，例：sqr(100) = 10
int(x)求≤x的最大整數例：int(3.6) = 3 int(--3.6) = --4
rnd(x)產生[0，1)之間的隨機數（不包括1）
sin(x)
cos(x)
tan(x)
atn(x)
exp(x)
log(x)
使用三角函式時，引數應是弧度，如數學中sin300應寫為：sin(30*3.14159/180)
字串函式
len(字串) 求字串的長度 ,例：len(「hello」) = 5
left(字串，擷取長度) 擷取字串左邊部分,例:left(「hello」,2) = 「he」
mid(字串，起始位置，擷取長度) ,例：mid(「hello」,2,2) = 「el」
right (字串,長度)
擷取字串右邊部分。例: right (「hello」,2) = 「lo」
string(數值，字元)生成指定長度與指定字元的字串，例：string(3,」9」) = 」999」
函式mid (c,n1,n2)的作用是從字串c中n1位開始取出長度為n2 的子串。那麼，
mid ("abcdefg", 3, 3)的值為（d）。
a、abc b、cde c、efg d、cde
常用轉換函式
val(字串) 將字串轉換為數值
str(數值) 將數值轉換為字串
使用者互動函式
vb提供inputbox( )和msgbox( )函式用於人機互動
inputbox( )其語法格式為：
inputbox( 提示[，標題][，預設值][,x座標][，y座標])
msgbox( ) 其語法格式為：
msgbox(提示資訊[，按鈕][，標題] )
程式設計的順序結構
順序結構：**按照由上到下的順序一行一行地執行。程式執行過程中沒有分支、沒有重複，這種結構稱為順序結構。
程式設計的分支結構
行if語句
行if是指在一行中寫完的if語句。其一般格式為：
格式一：if條件then語句
執行這種形式的if語句時，首先對條件進行判斷。若條件成立，則執行then後面的語句；若條件不成立，則執行if語句後繼程式行的語句
格式二：if條件 then 語句 1 else 語句 2
例題：輸入三個不相同的數，求出其中最小數。
private sub form_click()
dim a as single, b as single, c as single
dim min as single
a = inputbox("輸入a", "輸入框")
b = inputbox("輸入b", "輸入框")
c = inputbox("輸入c", "輸入框")
if a < b then min = a else min = b
if c < min then min = c
print "最小數＝"; min
end sub
執行這種形式的語句時，先進行判斷。若條件成立，則執行語句1；否則執行語句2。
塊if語句
上述if-then語句只能根據條件的真假是否執行一條語句，當then部分和else部分包含的內容較多時，則可選用「塊if語句」結構。
格式三：if 條件 then
語句塊end if
格式四：if 條件 then
語句塊1
else
語句塊2
end if
程式設計的迴圈結構
一、for-next迴圈
for迴圈變數一般形式是：
for迴圈變數=初值to終值step迴圈變數增量
迴圈體nxt迴圈變數
例題1：求s＝1+2+3+4.....+100
private sub form_click()
dim i as integer
dim sum as integer
sum = 0
for i = 1 to 100
sum = sum + i ' 迴圈體
next i
print "sum="; sum
end sub
例題2：step迴圈變數增量
private sub form_click()
高中資訊科技演算法與程式設計VB
高中資訊科技 演算法與程式設計vb 選修 知識要點 相關知識點 一 演算法 1.定義 相關題解 1演算法 就是解決問題的方法和步驟。演算法是程式設計的 靈魂 演算法 資料結構 程式。單選題1 運用電腦程式解決實際問題時，合理的步驟是 b a 設計演算法 分析問題 編寫程式 除錯程式 b 分析問題 設...
高中資訊科技招聘VB程式設計題
l len xend sub w for k 1 to l 1 v mid x,k,1 w w v next k w w right x,1 wend sub 4 編寫程式，從鍵盤輸入任一x的值，求分段函式的值 可用inputbox函式 private sub form click dim x as...
高中資訊科技演算法與程式設計教案滬教版選修
解析法一 基本說明 1 教學內容所屬模組 資訊科技選修1 演算法與程式設計 2 年級 高一年級 3 所用教材出版單位 上海科技教育出版社 4 所屬的章節 第三章第一節 5 學時數 45分鐘 二 教學設計 1 教學目標 1 了解解析演算法的基本概念。通過例項的學習，掌握用解析演算法設計程式的基本思路。...