第 6 章 我的程式會轉彎
|
|
|
- 碑 从
- 5 years ago
- Views:
Transcription
1 新觀念的 Visual Basic.NET 教本 第 6 章我的程式會轉彎
2 6-1 強制跳躍的 GoTo
3 GoTo 敘述 跳到 的意思, 執行之後可以跳到前面的敘述, 也可以跳到後面的敘述 使用 GoTo 以前必須先有 標記 存在, 例如 : GoTo L40 Console.WriteLine(10) Console.WriteLine(20) Console.WriteLine(30) L40: Console.WriteLine(40) 標記 跳到標記為 L40 的敘述 標記為 L40 的敘述
4 標記的設定 標記名稱 =Label_1 Label_1: Console.WriteLine("Hello, VB.NET") 用 ':' 號將標記與敘述分開 標記必須放在敘述的前面, 並且以冒號 : 分隔 標記之後可以不必接續任何敘述, 唯 : 仍不可省略 標記的命名規則與識別字的命名規則相同, 有關識別字的命名規則請參考 2-1 節 敘述 除了標記名稱可以作為標記之外, 數字 0~ 也可以作為標記 已使用的標記不能重複使用
5 標記的設定 正確用法 : 使用例 說明 123: Console.WriteLine() 數字標記 標記 _X: Dim X = 10 Label_A: 標記名稱也可以使用中文 標記後面可以不必接續任何敘述 錯誤用法 : 錯誤的使用例 說明 -123: Dim X = 10 超過數字標記的範圍 Label-X: Console.WriteLine() 100: Console.WriteLine("100") 使用減號 '-', 不符合識別字命名規則 100: Console.WriteLine("200") 標記 100 重複使用
6 上機 :GoTo: 敘述與無窮迴圈 1. 建立一主控台應用程式專案, 專案名稱定為 ch 在程式模組視窗中輸入以下程式 : Sub Main() Dim I L10: I = I + 1 Console.WriteLine( I ) GoTo L10 ' GoTo 跳到前面的敘述 End Sub 3. 執行程式, 結果數字會一直累加, 並且不停地顯示, 如圖 程式無法正常停止, 按下 Ctrl+C 或選取功能表的 偵錯 >> 停止偵錯 結束程式
7 避免無窮迴圈 將 GoTo 標記改成 : If 條件式 Then GoTo 標記 實例 : Sub Main() Dim I L10: I = I + 1 Console.WriteLine( I ) If I < 10 Then GoTo L10 End Sub I 小於 10 才跳回 L10, 不然就向下執行
8 上機 : 只能輸入正數的程式 1. 建立一主控台應用程式專案, 專案名稱定為 ch 在程式模組視窗中輸入以下程式 : Sub Main() Dim X L10: Console.Write(" 請輸入正數 :"): X = Console.ReadLine.ReadLine() If Val(X) <= 0 Then GoTo L10 Console.WriteLine.WriteLine(" 你輸入了 " & X) End Sub 3. 執行程式, 第一次輸入 -99,, 第二次輸入 0, 第三次輸入 123,, 結果直到輸入 123 之後, 程式才會結束執行
9 6-2 條件式
10 If 敘述的流程圖 If 敘述 False 條件式 True 條件式成立時所執行的敘述 If 敘述的下一行 ( 條件式不成立時 )
11 If 敘述的流程圖 Sub Main() Dim I L10: I = I + 1 Console.WriteLine( I ) If I < 10 Then GoTo L10 End Sub Sub Main() Dim I I = I + 1 Console.WriteLine(I) If I < 10 Then GoTo L10 I < 10 True GoTo L10 False End Sub
12 布林資料與條件式 為了方便我們在程式中表示條件式是否成立, VB.NET 用 True 來表示條件式成立, 用 False 來表示條件式不成立條件式不成立 實例 : Dim I, X I = 0 X = I < 10 ' X 等於 I < 10 條件式 Console.WriteLine.WriteLine(( X ) ' 輸出 : True I = 20 X = I < 10 ' X 等於 I < 10 條件式 Console.WriteLine.WriteLine(( X ) ' 輸出 : False
13 比較運算式 比較運算在比較 ' 運算符號 ' 兩邊的資料, 若結果成立, 得到 True, 否則得到 False 在 VB.NET 的程式設計中, 常用的比較運算符號有 6 種, 如下表 : 比較運算符號相當於數學上的使用例 = = 1 = 2 得到 False > > 1 > 2 得到 False < < 1 < 2 得到 True >= 1 >= 2 得到 False <= 1 <= 2 得到 True <> 1 <> 2 得到 True
14 日期時間的比較 1. 在時間的比較中, 後面的時間大於前面的時間 實例 : #9:30# > #8:30# 得到 True 注意事項 : #12:00:00 AM# 被視為 '0 時 ',, 而 #12:00:00 PM# 被視為一天的中午 12 時
15 日期時間的比較 2. 在日期的比較中, 後面的日期大於前面的日期 #7/1/2003# > #1/1/2003# 得到 True 3. 同時涵蓋日期及時間的比較中, 先比較日期再比較時間 #1/1/2003 0:00:00# > #12/31/ :59:59# 得到 True #1/1/2003 3:00:00# > #1/1/2003 0:00:00# 得到 True
16 日期時間的比較 4. 如果比較的一方有日期, 一方沒有日期, 則將沒有日期那一方的日期視為 #01/01/0001#,, 例如 #20:00:00# 相當於 #01/01/ :00:00#,, 所以 : #1/1/2003 9:00:00# > #20:00:00# 得到 True 5. 如果比較的一方有時間, 一方沒有時間, 則將沒有時間那一方的時間視為 #0:00:00#,, 所以 : #1/1/2003# < #1/1/2003 0:0:1# 得到 True
17 字串的比較 比較的依據是字元的字元碼 比較方式是從字串的第一個字元開始依次比較其字元碼, 直到比較出大小為止 如果未比較出大小, 而某一個字串已先達到最後一個字元, 則長度較小的字串小於長度較大的字串 V B. N E 1. 先依序比較字元碼 V B. N E T 2. 若比較不出, 再比較長度
18 取得字元的字元碼 英文範圍 (0~127) 內的字元 : 利用 Asc( 字元 ) 得知該字元的字元碼 中文字 : 利用 Asc( 中文字 )) 得知該中文字的字元碼 實例 : Console.WriteLine.WriteLine( Asc("A") ) 輸出 : 65, 表示字元 A 的字元碼等於 65 Console.WriteLine.WriteLine( Asc("B") ) 輸出 : 66, 字元 B 的字元碼大於 A Console.WriteLine.WriteLine( Asc(" 程 ") ) 輸出 : 46459, 中文字 ' 程 ' 的字元碼等於 46459
19 判斷字元碼大小的規則 英文字母順序在前面者, 其字元碼較小, 例 :"a": < "b" 小寫英文字母 " 大於 " 大寫英文字母, 例 :"a": > "A" 數字 " 小於 " 英文字母, 例 :"2": < "A"" 中文字 " 大於 " 英文字母, 例 :": 程 " > "a"
20 實例 : 判斷字元碼的大小 "kg" > "KG" 得到 True "COPY" < "COPYRIGHT" 得到 True "ANGEL" < "ANGLE" 得到 True "3-ANGEL" > "ANGLE" 得到 False " 中文 " > "English"" 得到 True 練習一 : (1) " 中國 " > "USA"" (2) "cm" < "CM" (3) "ABC" > "123" 練習二 : (1) Dim A = 100 Dim B = Console.WriteLine.WriteLine(( A > B ) (2) Dim X = "100" Dim Y = "100-50" Console.WriteLine.WriteLine(( X > Y ) (3) Console.WriteLine.WriteLine(( #10/01/1999# > #10/1/1998# ) (4) Console.WriteLine.WriteLine(( "10/01/1999" > "10/1/1998" )
21 邏輯運算 運算符號使用例功能說明 Not Not A 反 A 若 A 為 True, 則 Not A 為 False 若 A 為 False, 則 Not A 為 True And A And B A 且 B 只有當 A 及 B 同時為 True 時, 其結果方為 True, 否則為 False Or A Or B A 或 B 只要 A 或 B 為 True, 其結果便為 True A B Not A A And B A Or B TRUE TRUE FALSE TRUE TRUE TRUE FALSE FALSE FALSE TRUE FALSE TRUE TRUE FALSE TRUE FALSE FALSE TRUE FALSE FALSE
22 邏輯運算 實例 :4: 4 > 3 And 1 > 4 4 > 3 And 1 > 4 先進行比較運算 = True And False 再進行邏輯運算 = False 實例 : (True Or False) And (Not True) (True Or False) And (Not True) = True And False = False 實例 :True: Or False And Not True True Or False And Not True = True Or False And False = True Or False 最後才是 Or = True 先運算 Not 再運算 And
23 實例研究 : 限制輸入範圍 目的 : 我們在第四章曾經撰寫程式讓使用者輸入 國文 數學 及 英文 成績, 然後計算其平均分數 (ch0409 專案 ),, 現在讓我們來改良這個程式 -- 如果使用者輸入的成績小於 0 或大於 100,, 則要求其重新輸入 1. 開啟 ch04 目錄的 ch0409 專案
24 實例研究 : 限制輸入範圍 2. 開啟程式模組視窗, 檢視其程式碼, 如下 : Private Sub Button1_Click(...) Handles Button1.Click Dim A, B, C A = Val(InputBox (InputBox( 請輸入 [ 數學 ] 成績 )) B = Val(InputBox (InputBox( 請輸入 [ 英文 ] 成績 )) C = Val(InputBox (InputBox( 請輸入 [ 國文 ] 成績 )) MsgBox((A + B + C) / 3,, 平均分數 ) End Sub 以 數學 成績為例, 檢查使用者所輸入的資料是否位於 0~100 區間, 如果不是, 則跳回 A = Val(InputBox (InputBox( 請輸入 [ 數學 ] 成績 )) 敘述的程式如下 : L10: A = Val(InputBox (InputBox("(" 請輸入 [ 數學 ] 成績 ")) If A < 0 Or A > 100 Then Goto L10
25 實例研究 : 限制輸入範圍 3. 輸入完整的程式 Private Sub Button1_Click(...) Handles Button1.Clic Dim A, B, C L10: A = Val(InputBox(" 請輸入 [ 數學 ] 成績 ")) If A < 0 Or A > 100 Then Goto L10 L20: B = Val(InputBox(" 請輸入 [ 英文 ] 成績 ")) If B < 0 Or B > 100 Then Goto L20 L30: C = Val(InputBox(" 請輸入 [ 國文 ] 成績 ")) If C < 0 Or C > 100 Then Goto L30 MsgBox((A + B + C) / 3,, " 平均分數 ") End Sub
26 6-3 有條件執行的 If 敘述
27 If-Then 格式 格式 : If 條件式 Then 敘述 意義 : 如果 ' 條件式 ' 成立, 就執行 Then 之後的 ' 敘述 ',, 否則繼續向下執行
28 求 X 的絕對值 If-Then 實例練習一 Dim X X = InputBox(" 輸入數值 ") If X < 0 Then X = -X MsgBox( 絕對值 = & X ) 流程圖 : Dim X X = InputBox(" 輸入數值 ") X < 0 True False X = -X MsgBox( " 絕對值 = " & X )
29 If-Then 實例練習二 功能 : 購物促銷專案, 凡購物滿 500 元, 超出 500 元的部分打 9 折 程式 : Dim 金額金額 = InputBox( 輸入 [ 原價 ] ) If 金額 > 500 Then 金額 = ( 金額 - 500) * 0.9 MsgBox( 金額 = & 金額 ) Dim 金額 流程圖 : 金額 = InputBox(" 輸入 [ 原價 ]") 金額 > 500 True False 金額 = ( 金額 -500) * 0.9 MsgBox( " 金額 = " & 金額 )
30 結構化的 If-Then 格式 當 Then 後面的敘述很多時, 整個 If- Then 敘述將會拖得很長, 對閱讀來說十分不方便, 所以 VB.NET 又提供了另一種結構化的 If-Then 格式 格式 : If 條件式 Then 敘述 1 敘述 2 敘述區塊 : End If
31 上機 : 資料互換 功能 : 寫一個含有兩個輸入欄位 (TextBox) 的表單, 輸入資料後比較大小, 然後將較大的資料放在第一個欄位, 較小的資料放在第二個欄位 1. 建立一 Windows 應用程式專案, 專案名稱定為 ch 在表單上佈置兩個 TextBox 及一個 Button, 如圖 -7
32 上機 : 資料互換 3. 在 Button1_Click 之中輸入程式. 4. 執行程式, 然後分別在 TextBox1 及 TextBox2 之中輸入 10, 99,, 接著按下 重排 鈕, 結果所輸入之資料會重新排成 99, 10, 如圖 -8 Private Sub Button1_Click(...) Handles Button1.Clic Dim Temp If Val(TextBox2.Text) > Val(TextBox1.Text) Then Temp = TextBox1.Text TextBox1.Text = TextBox2.Text TextBox2.Text = Temp End If End Sub
33 If-Then Then-Else 格式 If 條件式 Then 敘述 1 Else 敘述 2 條件式成立 If 條件式 Then 敘述區塊 1 Else 敘述區塊 2 End If 否則條件式成立否則 If-Then-Else 敘述 緊接著 Else 之後的敘述 False 條件式 True 敘述區塊二 敘述區塊一 End If 之後的敘述 緊接著 Then 之後的敘述
34 上機 : 顯示成績是否及格 1. 建立一主控台應用程式專案, 專案名稱定為 ch 輸入程式 : Sub Main() Dim 成績 L10:Console.Write(" 輸入成績 : ") 成績 = Console.ReadLine.ReadLine() If 成績 = "" Then Exit Sub If 成績 >= 60 Then Console.WriteLine.WriteLine(" 及格 ") Else Console.WriteLine.WriteLine(" 不及格 ") End If GoTo L10 End Sub 3. 執行程式, 依序輸入 90, 50,, 結果會顯示 及格 及 不及格, 如圖 -11,, 最後按下 Enter 結束程式
35 上機 : 根據時間顯示顏色 功能 : 寫一程式判斷系統時間, 如果時間介於 6 時及 18 時之間, 則將表單的背景顏色設定藍色 前景顏色設定白色 並顯示 日安, 您好! ; 否則將表單的背景顏色設定黑色 前景顏色設定黃色 並顯示 晚安, 您好! 1. 建立一 Windows 應用程式專案, 專案名稱定為 ch 在表單上佈置一 Label 控制元件, 並且將此一 Label 的字型設定成 18pt, 粗體, 如圖 - 13
36 上機 : 根據時間顯示顏色 3. 在表單上 Label1 之外的位置雙按滑鼠, 結果會顯示以下之程式結構 : Private Sub Form1_Load(...) Handles MyBase.Load End Sub 請在其中輸入以下程式 : Private Sub Form1_Load(...) Handles MyBase.Load If Hour(Now()) >= 6 And Hour(Now()) < 18 Then Me.BackColor = Color.Blue Me.ForeColor = Color.White Me.Text = " 日安, 您好!" Label1.Text = " 日安, 您好!" Else Me.BackColor = Color.Black Me.ForeColor = Color.Yellow Me.Text = " 晚安, 您好!" Label1.Text = " 晚安, 您好!" End If End Sub
37 巢狀 If 敘述 If 條件式 1 Then If 條件式 2 Then 敘述區塊 1-1 Else 敘述區塊 1-2 End If 其他敘述 : Else 敘述區塊 2 End If If 裡面又有 If, 形成了巢狀 If 敘述 敘述區塊 1
38 上機 : 成績是否達錄取標準 功能 : 某校電子科招生, 錄取標準為數學成績 85 分 ( 含 ) 以上 所有科目平均 75 分 ( 含 ) 以上 寫一程式輸入 數學 英文 國文 三科成績, 然後計算是否達到錄取標準 1. 建立一 Windows 應用程式專案, 專案名稱定為 ch 在表單上佈置三個 Label 三個 TextBox 及一個 Button, 如圖 -14
39 上機 : 成績是否達錄取標準 3. 在 Button1_Click 之中輸入以下程式 : Private Sub Button1_Click(...) Handles Button1.Clic Dim 數學, 英文, 國文 As Double 數學 = Val(TextBox1.Text) 英文 = Val(TextBox2.Text) 國文 = Val(TextBox3.Text) If 數學 >= 85 Then If 數學 + 英文 + 國文 >= 75 * 3 Then MsgBox(" 達錄取標準!") Else MsgBox(" 平均分數未達錄取標準!") End If Else MsgBox(" 數學成績未達錄取標準!") End If End Sub
40 上機 : 成績是否達錄取標準 4. 執行程式, 然後輸入以下三組資料測試程式, 結果第 1 組資料會顯示 達錄取標準! 第 2 組資料顯示 平均分數未達錄取標準! 第 3 組資料顯示 數學成績未達錄取標準! 組別數學英文國文
41 逐一過濾條件的 ElseIf If 條件式 1 Then 敘述區塊 1 ElseIf 條件式 2 Then 敘述區塊 2 : ElseIf 條件式 N Then 敘述區塊 N Else 敘述區塊 N+1 End If 條件 1 成立, 執行敘述區塊 1 條件 1 不成立, 但條件 2 成立, 執行敘述區塊 2 條件 1~N-1 都不成立, 但條件 N 成立, 執行敘述區塊 N 以上條件都不成立, 執行敘述區塊 N+1
42 上機 : 判斷數字是幾位數 1. 建立一 Windows 應用程式專案, 專案名稱定為 ch 在表單上佈置一個 TextBox 兩個 Label 及一個 Button, 如圖 -15 其中設定了以下屬性 : 控制元件 屬性 屬性值 Label1 Text 輸入正整數 : Label2 ForeColor 紅色 TextBox1 Text ( 清成空白 ) Button1 Text 判斷
43 上機 : 判斷數字是幾位數 3. 在 Button1_Click 之中輸入以下程式 : Private Sub Button1_Click(...) Handles Button1.Clic Dim 數值 = Val(TextBox1.Text) If Not IsNumeric(TextBox1.Text) Then Label2.Text = " 不是數值!" ElseIf 數值 Mod 1 <> 0 Then Label2.Text = " 不是整數!" ElseIf 數值 < 0 Then Label2.Text = " 不是正整數!" ElseIf 數值 < 10 Then Label2.Text = " 一位數!" ElseIf 數值 < 100 Then Label2.Text = " 二位數!" ElseIf 數值 < 1000 Then Label2.Text = " 三位數!" Else Label2.Text = " 四位數 ( 含 ) 以上!" End If End Sub
44 上機 : 判斷數字是幾位數 4. 執行程式, 輸入以下資料進行測試 : 輸入之資料結果 ABC 不是數值! 10.2 不是整數! -123 不是正整數! 1 一位數! 12 二位數! 123 三位數! 1234 四位數 ( 含 ) 以上!
45 上機 : 購物打折程式 功能 : 購物促銷方案, 凡購物滿 1000 元, 打折方式如下 : 金額 折扣 超出 3000 元部分 7 折 超出 2000 元但未超出 3000 元部分 8 折 超出 1000 元但未超出 2000 元部分 9 折 未超出 1000 元部分 不打折 1. 建立一 Windows 應用程式專案, 專案名稱定為 ch 在表單上佈置三個 Label 一個 TextBox 及一個 Button, 如圖 -16
46 上機 : 購物打折程式 3. 在 Button1_Click 之中輸入以下程式 : Private Sub Button1_Click(...) Handles Button1.Clic Dim 原價 = Val(TextBox1.Text) If 原價 > 3000 Then Label3.Text = ( 原價 ) * ElseIf 原價 > 2000 Then Label3.Text = ( 原價 ) * ElseIf 原價 > 1000 Then Label3.Text = ( 原價 ) * Else Label3.Text = 原價 End If End Sub
47 上機 : 購物打折程式 4. 執行程式, 然後輸入以下幾組資料進行測試 : 資料 符合之條件式 結果計算過程 3900 原價 > ( )* = 原價 > ( )* = 原價 > ( )* = Else
48 6-4 多執行路徑的 Select Case 敘述
49 格式 : Select Case 敘述的格式 Select Case 資料或運算式 Case 條件值 1 敘述區塊 1 Case 條件值 2 敘述區塊 2 : Case 條件值 N 敘述區塊 N Case Else 敘述區塊 N+1 End Select 資料 ( 或運算式 ) 的值符合條件值 1 時, 執行敘述區塊 1,, 符合條件值 2 時, 執行敘述區塊 2,, 符合條件值 N 時, 執行敘述區塊 N, 如果任何條件值都不符合, 則執行敘述區塊 N+1
50 Select Case 敘述的流程圖 Select Case 資料或運算式 條件值 1 條件值 2 條件值 N Else 路徑 1 路徑 2 路徑 N 路徑 N+1 敘述區塊 1 敘述區塊 2 敘述區塊 N 敘述區塊 N+1 End Select
51 上機 : 顯示四季名稱 功能 : 輸入 1, 2, 3 或 4,, 然後顯示對應的 春, 夏, 秋, 冬 季節名稱 1. 建立一 Windows 應用程式專案, 專案名稱定為 ch 在表單上佈置三個 Label 一個 TextBox 及一個 Button, 如圖 -19
52 上機 : 顯示四季名稱 3. 在 Button1_Click 之中輸入以下程式 : Private Sub Button1_Click(...) Handles Button1.Click Dim 季節順序 = Val(TextBox1.Text) Select Case 季節順序 Case 1 Label3.Text = " 春 " Case 2 Label3.Text = " 夏 " Case 3 Label3.Text = " 秋 " Case 4 Label3.Text = " 冬 " Case Else Label3.Text = " 輸入錯誤 " End Select End Sub
53 上機 : 顯示四季名稱 4. 執行程式, 然後輸入以下幾組資料進行測試 : 資料 (TextBox1) 結果 (Label3) 1 春 2 夏 3 秋 4 冬 5 輸入錯誤 1.2 輸入錯誤
54 上機 : 顯示英文季節名稱 功能 : 輸入中文季節名稱 春, 夏, 秋, 冬 然後顯示對應的英文季節名稱 spring, summer, autumn, winter 1. 建立一 Windows 應用程式專案, 專案名稱定為 ch 在表單上佈置三個 Label 一個 TextBox 及一個 Button, 如圖 -20
55 上機 : 顯示英文季節名稱 3. 在 Button1_Click 之中輸入以下程式 : Private Sub Button1_Click(...) Handles Button1.Click Dim 中文季節 = TextBox1.Text Select Case 中文季節 Case " 春 " Label3.Text = "spring" Case " 夏 " Label3.Text = "summer" Case " 秋 " Label3.Text = "autumn" Case " 冬 " Label3.Text = "winter" Case Else Label3.Text = " 輸入錯誤 " End Select End Sub
56 上機 : 顯示英文季節名稱 4. 執行程式, 然後輸入以下幾組資料進行測試 : 資料 (TextBox1) 結果 (Label3) 春 spring 夏 summer 秋 autumn 冬 winter 碰輸入錯誤
57 上機 : 電影分級 功能 : 輸入年齡, 然後顯示該年齡可以觀賞之電影等級 1. 建立一 Windows 應用程式專案, 專案名稱定為 ch 在表單上佈置三個 Label 一個 TextBox 及一個 Button, 如圖 -21
58 上機 : 電影分級 3. 在 Button1_Click 之中輸入以下程式 : Private Sub Button1_Click(...) Handles Button1.Click Dim 年齡 = Val(TextBox1.Text) If 年齡 Mod 1 <> 0 Then Label3.Text = " 請輸入整數 " Exit Sub End If Select Case 年齡 Case 0 To 5 ' age 等於 0 到 5, 都符合這個條件 Label3.Text = " 普通級 " Case 6, 7, 8, 9, 10, 11 ' 逐一列出條件值 Label3.Text = " 保護級 " Case 12 To 17 Label3.Text = " 輔導級 " Case Is >= 18 ' age 18, 都符合這個條件 Label3.Text = " 限制級 " End Select End Sub
59 上機 : 電影分級 4. 執行程式, 然後輸入以下幾組資料進行測試 : 資料 (TextBox1) 結果 (Label3) 1 普通級 6 保護級 12 輔導級 18 限制級 3.5 請輸入整數
60 6-5 Iif Choose Switch 函數
61 Iif: 兩選一的函數 參數一參數三 X = IIf( 條件式, 資料一, 資料二 ) 參數二 說明 : 當 條件式 ( 參數一 ) 成立時,Iif, 將選擇 資料一 ( 參數二 ) 指定給 X 否則選擇 資料二 ( 參數三 ) 指定給 X
62 Iif 函數實例 Dim 回答, 反應回答 = MsgBox( ( " 星期六一起看場電影好嗎?",? _ MsgBoxStyle.YesNo + MsgBoxStyle.Question) 反應 = Iif( 回答 = MsgBoxResult.Yes, " 太好了!",! " 啊!..."! ) MsgBox( 反應 )
63 上機 : 改用 Iif 完成 p.217 程式 1. 開啟 p.217 所建立的專案 ch 開啟程式模組視窗, 檢視以下程式 : Sub Main() Dim 成績 L10:Console.Write(" 輸入成績 : ") 成績 = Console.ReadLine.ReadLine() If 成績 = "" Then Exit Sub If 成績 >= 60 Then Console.WriteLine.WriteLine(" 及格 ") Else Console.WriteLine.WriteLine(" 不及格 ") End If GoTo L10 End Sub
64 上機 : 改用 Iif 完成 p.217 程式 3. 將以上所列出之加底線程式刪除, 然後改成如以下的粗體字部分 : Sub Main() Dim 成績 L10:Console.Write( 輸入成績 : ) 成績 = Console.ReadLine.ReadLine() If 成績 = Then Exit Sub Dim 結果 = IIf( 成績 >= 60, 及格, 不及格 ) Console.WriteLine.WriteLine( 結果 ) GoTo L10 End Sub
65 Choose: 對號選取的函數 Choose 是對號選取資料的函數, 使用時第 1 個參數要傳入編號 第 2, 3, 4 4 以後的參數則傳入被選取的資料, 格式如下 : X = Choose( 編號, 資料一, 資料二,...) 當 編號 等於 1 時,Choose, 將選擇 資料一 指定給 X; 等於 2 時, 則選擇 資料二 指定給 X, 依此類推
66 Choose: 對號選取的函數 實例 : Dim 編號 = InputBox( 請選擇遊戲等級 :1.: 入門 2. 進階 3. 專家 ) Dim 結果 = Choose( 編號, 入門, 進階, 專家 ) 上程式經執行後會顯示一輸入窗讓使用者輸入 編號, 而所得到的 結果 一覽表如下 : 編號 結果 1 入門 去除小數點後等於 1 的數值入門 2 進階 去除小數點後等於 2 的數值進階 3 專家 去除小數點後等於 3 的數值 專家 其他資料 ( 空字串 )
67 上機 : 改用 Choose 完成 p.231 程式 1. 開啟 p.231 所建立的專案 ch 開啟程式模組視窗, 檢視以下程式 : Private Sub Button1_Click(...) Handles Button1.Clic Dim 季節順序 = Val(TextBox1.Text) Select Case 季節順序 Case 1 Label3.Text = " 春 " Case 2 Label3.Text = " 夏 " Case 3 Label3.Text = " 秋 " Case 4 Label3.Text = " 冬 " Case Else Label3.Text = " 輸入錯誤 " End Select End Sub
68 上機 : 改用 Choose 完成 p.231 程式 3. 將以上所列出之加底線程式刪除, 然後改成如以下的粗體字部分 : Private Sub Button1_Click(...) Handles Button1.Click Dim 季節順序 = Val(TextBox1.Text) Label3.Text = Choose( 季節順序, 春, 夏, 秋, 冬 ) End Sub
69 Switch: 多選一的函數 Switch 是多選一的函數, 使用時每傳入一個條件式, 就要相對地傳入一個選項, 例如 : Dim 英文季節 = Microsoft.VisualBasic.VisualBasic.Switch(.Switch( _ 中文季節 = " 春 ", "spring"," _ 中文季節 = " 夏 ", "summer"," _ 中文季節 = " 秋 ", "autumn"," _ 中文季節 = " 冬 ", "winter")" 其中含有 4 個條件式及 4 個選項 : 條件式中文季節 = " 春 " 中文季節 = " 夏 " 中文季節 = " 秋 " 中文季節 = " 冬 " 對應的選項 spring summer autumn winter
70 上機 : 改用 Switch 完成 p.233 程式 1. 開啟 p.233 所建立的專案 ch 開啟程式模組視窗, 檢視以下程式 : Private Sub Button1_Click(...) Handles Button1.Cli Dim 年齡 = Val(TextBox1.Text) If 年齡 Mod 1 <> 0 Then Label3.Text = " 請輸入整數 " Exit Sub End If Select Case 年齡 Case 0 To 5 ' age 等於 0 到 5, 都符合這個條件 Label3.Text = " 普通級 " Case 6, 7, 8, 9, 10, 11 ' 逐一列出條件值 Label3.Text = " 保護級 " Case 12 To 17 Label3.Text = " 輔導級 " Case Is >= 18 ' age 18, 都符合這個條件 Label3.Text = " 限制級 " End Select End Sub
71 上機 : 改用 Switch 完成 p.233 程式 3. 將以上所列出之加底線程式刪除, 然後改成如以下的粗體字部分 : Private Sub Button1_Click(...) Handles Button1.Click Dim 年齡 = Val(TextBox1.Text) Label3.Text = Microsoft.VisualBasic.Switch( _ 年齡 >= 0 And 年齡 < 6, " 普通級 ", _ 年齡 >= 6 And 年齡 < 12, " 保護級 ", 年齡 >= 12 And 年齡 < 18, " 輔導級 ", 年齡 >= 18, " 限制級 ") End Sub
72 6-6 選擇類控制元件
73 RadioButton( 選擇鈕 ) 有小黑點表示這個選項被選取了 三個 RadioButton RadioButton 的功用好像考試時的單選題, 例如有一考題 : 可以用來佈置控制元件的視窗是 :(1): 表單視窗 (2) 程式視窗 (3) 專案視窗, 若使用 RadioButton 來設計其畫面, 則如上圖, 我們分別以三個 RadioButton 來代表三種選擇, 而其中含有黑點的小圓圈表示被選擇的
74 上機 : 體驗 RadioButton 的特性 1. 建立一 Windows 應用程式專案, 專案名稱定為 ch 在表單上佈置一個 Label 及三個 RadioButton, 如圖 -24 其中設定的屬性如下 : 控制元件 屬性 屬性值 Label1 Text 可以用來佈置控制元件的視窗是 : RadioButton1 Text 表單視窗 RadioButton2 Text 程式模組視窗 RadioButton3 Text 屬性視窗
75 上機 : 體驗 RadioButton 的特性 3. 執行程式, 然後以滑鼠選取 表單視窗, 結果 表單視窗 這個 RadioButton 就含有小黑點, 表示此一 RadioButton 被選取了 4. 再以滑鼠選取 屬性視窗, 結果 表單視窗 這個 RadioButton 的小黑點消失, 變成 屬性視窗 這個 RadioButton 含有小黑點, 表示被選取的選項變成了 屬性視窗, 如圖 -25
76 讀取 RadioButton 的選項 當某一個 RadioButton 被選取時, 該 RadioButton 的 Checked 屬性等於等於 True, 而其他 RadioButton 的 Checked 屬性則為 False, 因此我們可以利用以下程式碼來判斷哪一個 RadioButton 被選取了 : If RadioButton1.Checked Then 第一個 RadioButton 被選取了 ElseIf RadioButton2.Checked Then 第二個 RadioButton 被選取了 ElseIf RadioButton3.Checked Then 第三個 RadioButton 被選取了 End If
77 上機 : 讀取 RadioButton 的選項 功能 : 修改剛才的 ch0613 專案, 當使用者選取 表單視窗 時, 顯示 正確 ; 選取 程式模組視窗 時, 顯示 程式模組視窗用於撰寫程式 ; 選取 屬性視窗 時, 顯示 屬性視窗用於設定物件的屬性 1. 開啟 ch0613 專案 2. 在表單上增加一個 Button, 如圖 -26
78 上機 : 讀取 RadioButton 的選項 3. 在 Button1_Click 之中輸入以下程式 : Private Sub Button1_Click(...) Handles Button1.Click If RadioButton1.Checked Then MsgBox(" 正確 ", MsgBoxStyle.Information) ElseIf RadioButton2.Checked Then MsgBox(" 程式模組視窗用於撰寫程式 ", MsgBoxStyle.Critical) ElseIf RadioButton3.Checked Then MsgBox(" 屬性視窗用於設定物件的屬性 ", MsgBoxStyle.Critical) End If End Sub 4. 執行程式, 選擇任何一個 RadioButton, 然後按下 答題 鈕以測試程式
79 GroupBox 控制元件 與 RadioButton 的分組 剛才我們看到的表單只有 1 個題目, 而這個題目含有 3 個選項, 如果說我們想把表單改成含有 3 個題目, 而每個題目各有 3 個選項 ( 合計 9 個 RadioButton), 那麼必須利用 ( 群組方塊 ) 控制元件把這 9 個 RadioButton 分成 3 組, 使用者方才得以從中選取 3 個選項 GroupBox 的功用是把數個控制元件框起來, 構成控制元件群組, 如圖 -27
80 上機 : 如何正確地將控制元件 佈置於 GroupBox 之中 1. 建立一 Windows 應用程式專案, 專案名稱定為 ch 先佈置一 GroupBox, 並將 GroupBox 拉曳至適當的大小 3. 選取工具箱的 RadioButton, 然後將滑鼠移到 GroupBox 裡面, 以拉曳的方式佈置 RadioButton, 如圖 仿照步驟 3,, 佈置 RadioButton2~ RadioButton4
81 上機 : 字型設定程式 功能 : 設計一個可以改變字型大小及樣式的程式
82 上機 : 字型設定程式 1. 建立一 Windows 應用程式專案, 專案名稱定為 ch 在表單上佈置一個 Label 兩個 GroupBox 六個 RadioButton 及一個 Button, 如圖 -30 其中所設定之屬性如右表 : 控制元件 屬性 屬性值 Label1 Text 字型範例 TextAlign MiddleCenter Font 大小 =12 GroupBox1 Text 字型大小 GroupBox2 Text 字型樣式 RadioButton1 Text 12 Checked TRUE RadioButton2 Text 16 RadioButton3 Text 20 RadioButton4 Text 正常 Checked TRUE RadioButton5 Text 粗體 RadioButton6 Text 斜體 Button1 Text 設定 Form1( 表單 ) Text 字型設定程式
83 上機 : 字型設定程式 3. 在 Button1_Click 之中輸入程式 4. 執行程式, 選取 字型大小 12, 16, 20 及選取 字型樣式 之中的正常, 粗體, 斜體, 然後按下 設定 鈕測試程式 Private Sub Button1_Click(...) Handles Button1.Click Dim 字型名稱 As String = Label1.Font.Name Dim 字型大小 As Integer = Label1.Font.Size Dim 字型樣式 As FontStyle = Label1.Font.Style If RadioButton1.Checked Then 字型大小 = 12 If RadioButton2.Checked Then 字型大小 = 16 If RadioButton3.Checked Then 字型大小 = 20 If RadioButton4.Checked Then 字型樣式 = FontStyle.Regul If RadioButton5.Checked Then 字型樣式 = FontStyle.Bold If RadioButton6.Checked Then 字型樣式 = FontStyle.Itali Label1.Font = New Font( 字型名稱, 字型大小, 字型樣式 ) End Sub
84 CheckBox( 核取方塊 ) CheckBox( 核取方塊 ) 也是用來選取資料的控制元件, 它的用法與 RadioButton 幾乎完全一樣, 不同的是 CheckBox 並不受單選的限制, 也就是說, 我們可以選擇 0 到多個 CheckBox 所代表的資料, 如圖 -31 在這個表單中, 佈置了六個 CheckBox, 並且選取了其中三個 程式中判斷使用者選取了哪幾個 CheckBox, 也是根據 Checked 屬性, 當 CheckBox 的 Checked 屬性值為 True 時, 表示該 CheckBox 被選取了, 而由於可能複選的關係, 所以每一個 CheckBox 都要獨立判斷
85 上機 : 計算點餐金額
86 上機 : 計算點餐金額 1. 建立一 Windows 應用程式專案, 專案名稱定為 ch 在表單上佈置 4 個 CheckBox 4 個 TextBox 4 個 Label 及一個 Button, 如圖 -33 其中所設定之屬性如下 : 控制元件 屬性 屬性值 控制元件 屬性 屬性值 CheckBox1 Text 滷肉飯 (30 元 ) CheckBox2 Text 雞腿飯 (70 元 ) CheckBox3 Text 排骨飯 (65 元 ) CheckBox4 Text 美餓美特餐 (99 元 ) TextBox1 Text ( 清成空白 ) TextBox2 Text ( 清成空白 ) TextBox3 Text ( 清成空白 ) TextBox4 Text ( 清成空白 ) Label1 Text 份 Label2 Text 份 Label3 Text 份 Label4 Text 份 表單 Text 美餓美餐廳 Button1 Text 計算金額
87 上機 : 計算點餐金額 3. 輸入程式 4. 執行程式, 假設選取所有 CheckBox, 並且在 4 個 TextBox 之中分別輸入 1, 2, 3, 1, 則結果顯示的總金額應等於 464 Private Sub Button1_Click(...) Handles Button1.Clic Dim 總金額 As Long If CheckBox1.Checked Then ' 滷肉飯總金額 = 總金額 + 30 * Val(TextBox1.Text) End If If CheckBox2.Checked Then ' 雞腿飯總金額 = 總金額 + 70 * Val(TextBox2.Text) End If If CheckBox3.Checked Then ' 排骨飯總金額 = 總金額 + 65 * Val(TextBox3.Text) End If If CheckBox4.Checked Then ' 美餓美特餐總金額 = 總金額 + 99 * Val(TextBox4.Text) End If MsgBox(" 總金額 =" & 總金額 ) End Sub
第 4 章 表單與程式設計
新觀念的 Visual Basic.NET 教本 第 4 章表單的程式設計 4-1 表單與程式模組 上機 : 用按鈕啟動程式 前言 : 在日常生活中, 當我們按下電器用品的開關按鈕, 電器用品裡面設計好的電路就會開始運作, 完成預定的工作 ; 在表單的程式設計中, 我們也經常把設計好的程式放在按鈕裡面, 而藉著按下按鈕來達到執行程式的目的 1. 建立一 Windows 應用程式專案, 專案名稱定為
Microsoft PowerPoint - VB14.ppt
VB 列表盒 LISTBOX 應用 資科系 林偉川 執行畫面 1 2 1 重要屬性 LISTBOX 物件 (VB6) 新增至 LISTBOX 物件中 ADDITEM 自 LISTBOX 物件中刪除選取物件 REMOVEITEM 自 LISTBOX 物件中取出選取物件 ListIndex 顯示 LISTBOX 物件中紀錄個數 Listcount 3 LISTBOX 物件 (VB.NET) 重要屬性 新增至
投影片 1
計算機程式及實習 期末報告 題目 : 六宿炒翻天 班級 : 奈米一乙姓名 : 陳洋翼學號 :4A514050 老師 : 謝慶存 程式說明 設計結帳系統, 選擇數量後, 在按下計算, 將會顯示總金額 若是老人或小孩, 將可享 8 折或 9 折的優惠 程式畫面 填選數量 在火腿蛋炒飯的數量選擇 1, 並按下計算, 可得總金額 50 元 程式畫面 打折 填選完後, 若客人是小孩或老人, 選擇欲打折項目,
星星排列 _for loop Protected Sub Page_Load(ByVal sender As Object, ByVal e As Dim h As Integer = 7 'h 為變數 ' Dim i, j As Integer For i = 1 To h
資訊系統與實習 製作 : 林郁君 一 2009.09.28 9X9 'button 被按下後 ' Dim i, j As Integer For i = 1 To 9 'i 從 1 到 9' For j = 1 To 9 'j 從 1 到 9' If j * i < 10 Then ' 如果 j 乘上 i 是為個位數 ' Response.Write(i & "*" & j & " =" & i *
Visual C# 2005程式設計
Visual Basic 2005 程式設 計 第 5 章流程控制 5-1 認識流程控制 判斷結構 (decision structures) If...Then Else Select Case Try Catch Finally 迴圈結構 (loop structures) For...Next For Each...Next Do...Loop While End While 5-2 If Then
Microsoft PowerPoint - 09_事件驅動.ppt
事件驅動程式設計 事件驅動是 Windows 程式設計的精髓 事件驅動與真實世界的運作模式非常類似 1 事件驅動的基本概念 2 事件驅動程式的要素 A. 物件 消防隊 物件 事件程序 B. 事件 C. 事件程序 事件 失火 救火程序 : 警鈴大作隊員穿著消防裝備出動消防車... 3 實例 : 把 消防隊 視為一種物件 把 失火 視為這種物件需要處理的事件 把 救火程序 視為這種物件的一種事件程序,
投稿類別：電子工程類
投 稿 類 別 : 工 程 技 術 類 篇 名 : 井 字 生 死 戰 攻 略 作 者 : 陳 威 宇 國 立 臺 南 高 級 海 事 水 產 職 業 學 校 電 子 科 二 年 甲 班 邱 富 群 國 立 臺 南 高 級 海 事 水 產 職 業 學 校 電 子 科 二 年 甲 班 指 導 老 師 : 林 育 助 老 師 王 彥 盛 老 師 壹 前 言 家 喻 戶 曉 的 井 字 遊 戲 (Tic-Tac-Toe)
Visual Basic D 3D
Visual Basic 2008 2D 3D 6-1 6-1 - 6-2 - 06 6-2 STEP 1 5-2 (1) STEP 2 5-3 (2) - 6-3 - Visual Basic 2008 2D 3D STEP 3 User1 6-4 (3) STEP 4 User1 6-5 (4) - 6-4 - 06 STEP 5 6-6 (5) 6-3 6-3-1 (LoginForm) PictureBox1
untitled
VB 來 立 李 龍老 年 參 車 令 度 綠 車 不 不 靈 了 來 令來 了老 利 來 練 念 邏 念 數 度 念 狀 不 度 令 數 更 參 VB VB VB 理 VB 類 數 (x,y) (0,0) x y x,y 數 (0,0) (x, 0) (0, y) (x, y) VB 裡 來 VB 來 1 Graphics VB Graphics Private Sub Button1_Click(
IsPostBack 2
5 IsPostBack 2 TextBox 3 TextBox TextBox 4 TextBox TextBox 1 2 5 TextBox Columns MaxLength ReadOnly Rows Text TextMode TextMode MultiLine TextMode MultiLine True False TextMode MultiLine Password MulitLine
untitled
Visual Basic 2005 (VB.net 2.0) hana@arbor.ee.ntu.edu.tw 立 六 數 串 數數 數 數 串 數 串 數 Len( 串 ) 串 度 Len( 123 )=3 LCase( 串 ) 串 LCase( AnB123 ) anb123 UCase( 串 ) 串 UCase( AnB123 ) ANB123 串 數 InStr([ ], 串 1, 串 2[,
ActiveX Control
ActiveX Control For Visual Basic 2005.NET [ 版本 : 1.0] 1 安裝 Windows 驅動程式 請依照下列步驟 : 1. 執行 Windows 驅動程式安裝程式 ( 此範例為 PIO-DIO) 驅動程式位置 : CD:\NAPDOS\PCI\PIO-DIO\dll_ocx\Driver http://ftp.icpdas.com/pub/cd/iocard/pci/napdos/pci/pio-dio/dll_ocx/driver/
untitled
說 參 例 邏 邏 1. 說 2. 數 數 3. 8 4. 理念 李 龍老 立 1. 理 料 2. 理 料 3. 數 料 4. 流 邏 念 5. 良 6. 讀 行 行 7. 行 例 來 邏 1. 說 說 識 量 2. 說 理 類 3. 數 數 念 4. 令 5. 良 6. 流 邏 念 7. 說 邏 理 力 1. 2. 3. 4. 5. 列 念 1 參 1. ( Visual Basic 例 ) (1)
投影片 1
第五章 選擇控制項 5-1 選擇控制項介紹 一. 關於 RadioButton 選項按鈕控制項 當表單中有多個同性質的選項且只能單選時就需用到選項按鈕控制項 選項按鈕控制項彼此間是互斥 當有一個選項按鈕被點選時 - 該按鈕的 Checked =True, - 其它按鈕的 Checked = False 選項按鈕常用屬性和事件 程式設計技巧 1. 選項按鈕必須先將 Enabled 屬性設為 True
Microsoft PowerPoint - vb_net5
選 擇 控 制 項 與 條 件 敘 述 資 訊 科 技 系 林 偉 川 結 構 化 程 式 設 計 結 構 化 程 式 設 計 是 一 種 軟 體 開 發 方 法, 它 是 一 種 組 織 和 撰 寫 程 式 碼 的 技 術, 使 用 由 上 而 下 的 設 計 方 法 來 分 析 問 題, 將 程 式 分 解 成 階 層 架 構 的 模 組, 每 個 模 組 是 一 段 擁 有 獨 立 功 能 的
計算機程式及實習 期末報告ppt製作 題目:南台黑心早餐店結帳系統
計算機程式及實習期末報告 ppt 製作 題目 : 南台黑心早餐店結帳系統 南台科技大學機械工程系車輛一乙學號 :4A015038 老師 : 謝慶存 學習重點 早餐店結帳 ListBox RadioButton 的使用方法 題目說明 : 早餐店結帳 試設計快餐店結帳系統, 填寫數量再按下計算鈕之後, 即會顯示結帳總金額 按 清除 按鈕, 再輸入數量, 並點選 老客戶 *0.8, 再按下 計算 鈕, 得到打
Microsoft Word - GUI design.doc
GUI 程式設計 壹 圖形元件 一 認識圖形元件 hndlgraf 指令 Handle graph 的縮寫 說明 二 認識圖形元件的 handle 指令 get(h, 'pr') get(h) set(h, 'pr1', 'val1', 'pr2', 'val2') set(h) 說明取得 handle h 的某屬性 (properity) 之數值取得 handle h 的所有屬性之數值設定 handle
Microsoft Word - 小心翼翼的二十一點N.doc
投 稿 類 別 : 資 訊 類 篇 名 : 小 心 翼 翼 的 二 十 一 點 作 者 : 陳 鈺 文 國 立 瑞 芳 高 級 工 業 職 業 學 校 資 訊 二 李 伯 謙 國 立 瑞 芳 高 級 工 業 職 業 學 校 資 訊 二 胡 家 媛 國 立 瑞 芳 高 級 工 業 職 業 學 校 資 訊 二 指 導 老 師 : 周 曉 玲 老 師 陳 思 亮 主 任 壹 前 言 一 研 究 動 機 平
VB程序设计教程
高 等 学 校 教 材 Visual Basic 程 序 设 计 教 程 魏 东 平 郑 立 垠 梁 玉 环 石 油 大 学 出 版 社 内 容 提 要 本 书 是 按 高 等 学 校 计 算 机 程 序 设 计 课 程 教 学 大 纲 编 写 的 大 学 教 材, 主 要 包 括 VB 基 础 知 识 常 用 程 序 结 构 和 算 法 Windows 用 户 界 面 设 计 基 础 文 件 处
untitled
1 .NET 利 [] [] 來 說 切 切 理 [] [ ] 來 說 拉 類 類 [] [ ] 列 連 Web 行流 來 了 不 不 不 流 立 行 Page 類 Load 理 Response 類 Write 料 Redirect URL Response.Write("!! ives!!"); Response.Redirect("WebForm2.aspx"); (1) (2) Web Form
untitled
1 Outline 數 料 數 數 列 亂數 練 數 數 數 來 數 數 來 數 料 利 料 來 數 A-Z a-z _ () 不 數 0-9 數 不 數 SCHOOL School school 數 讀 school_name schoolname 易 不 C# my name 7_eleven B&Q new C# (1) public protected private params override
輕鬆學 Dreamweaver CS5 網頁設計..\Example\Ch0\ \.html..\example\ch0\ \mouse.txt..\example\ch0\ \ _Ok.html 學習重點 JavaScript 複製程式碼 mouse.txt Ctrl+C Ctrl+C 0-4
JAVA Extension 0..\Example\Ch0\ \ T.html..\Example\Ch0\ \ T.txt T.txt..\Example\Ch0\ \ T_Ok.html 提示 :. Marquee Marquee Font Color #FFFFFF BG Color #867bf Width 90 Height 50. T.txt Ctrl+C your scrolling
2 WF 1 T I P WF WF WF WF WF WF WF WF 2.1 WF WF WF WF WF WF
Chapter 2 WF 2.1 WF 2.2 2. XAML 2. 2 WF 1 T I P WF WF WF WF WF WF WF WF 2.1 WF WF WF WF WF WF WF WF WF WF EDI API WF Visual Studio Designer 1 2.1 WF Windows Workflow Foundation 2 WF 1 WF Domain-Specific
untitled
1 Outline 料 類 說 Tang, Shih-Hsuan 2006/07/26 ~ 2006/09/02 六 PM 7:00 ~ 9:30 聯 ives.net@gmail.com www.csie.ntu.edu.tw/~r93057/aspnet134 度 C# 力 度 C# Web SQL 料 DataGrid DataList 參 ASP.NET 1.0 C# 例 ASP.NET 立
MVB-1001.DOC
20 1.5 10 15 20 25 80 100 CSF 1. 2. 0105 3. 4. 5. 30% 1.5 0.75 1. Visual Basic Visual Basic (A) Visual Basic Enterprise Edition (B) Visual Basic Script Edition (C) Visual Basic Learning Edition (D) Visual
Excel VBA Excel Visual Basic for Application
Excel VBA Jun5,00 Sub 分頁 () Dim i As Integer Dim Cname As String Dim Code As Variant Set score=thisworkbook.sheets("sheet") Code=Array(" 專北一 "," 專北二 "," 專北三 "," 專桃園 "," 專桃竹 "," 專中苗 ", " 專台中 "," 專台南 ","
Microsoft PowerPoint - 第14章.ppt
Windows 繪圖的認識 在視窗 Form 表單上, 繪製圖案, 必須要有幾個動作 : Step 1: 定義及取得 Graphics 物件,Graphics 代表 Windows 中的繪圖區域, 範圍為 Form 表單視窗 Step 2: 利用 Graphics 物件來進行各種繪圖 Step 3: 必須釋放 Graphics 物件, 使用 Dispose( ) 釋放 [ 範例 ] 設計一個程式,
投影片 1
資料庫管理程式 ( 補充教材 -Part2) 使用 ADO.NET 連結資料庫 ( 自行撰寫程式碼 以實現新增 刪除 修改等功能 ) Private Sub InsertButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles InsertButton.Click ' 宣告相關的 Connection
任務二 : 產生 20 個有炸彈的磚塊, 放在隨機的位置編輯 Block 類別的程式碼 import greenfoot.; // (World, Actor, GreenfootImage, Greenfoot and MouseInfo) Write a description of class
踩地雷遊戲 高慧君南港高中 開啟專案 MineSweep 任務一 : 產生 30X20 個磚塊編輯 Table 類別的程式碼 import greenfoot.; // (World, Actor, GreenfootImage, Greenfoot and MouseInfo) import java.util.arraylist; Write a description of class MyWorld
Microsoft Word - 序.DOC
了 解 副 程 式 意 義 及 使 用 時 機, 變 數 的 存 取 範 圍 及 多 表 單 的 程 式 設 計 7-1 函 式 7-2 副 程 式 7-3 變 數 的 範 圍 7-4 傳 值 呼 叫 及 傳 址 呼 叫 7-5 多 表 單 程 式 設 計 (MDI) 7-6 習 題 在 程 式 設 計 過 程 中, 程 式 會 因 為 不 斷 成 長, 程 式 碼 會 愈 來 愈 長, 有 一 部
2
1 2 1-1 Visual Basic 3 1-2 3/8-3/21 3/22-4/4 4/5-4/18 4/19-5/2 5/3-5/16 5/17-5/30 5/31-6/13 6/14-6/27 6/28-7/11 7/12-7/25 7/26-8/8 8/9-8/22 8/25-9/5 9/6-9/19 9/20-10/3 10/4-10/17 10/18-10/31 11/15-11/28
Microsoft PowerPoint - Chapter5
CH5 表 單 與 控 制 項 課 程 目 標 : 暸 解 VBA 語 言 中 的 控 制 項 及 常 用 屬 性 表 單 在 視 窗 環 境 中, 使 用 者 所 使 用 的 對 話 窗, 精 靈 等 都 是 以 表 單 為 基 本 單 位, 再 加 上 其 它 控 制 項 所 構 成 的 操 作 環 境 利 用 插 入 表 單 為 指 定 的 專 案 插 入 一 個 自 訂 表 單 表 單 常
ThreeDtunnel.doc
(12) 1 1. Visual Basic Private Sub LoadDatabase() Dim strip As String Dim straccount As String Dim strpassword As String Dim strdatabase As String Dim strtable As String Dim strsql As String Dim strtemp1
untitled
1 Outline 流 ( ) 流 ( ) 流 ( ) 流 ( ) 流 ( ) 狀 流 ( ) 利 來 行流 if () 立 行 ; else 不 立 行 ; 例 sample2-a1 (1) 列 // 料 Console.Write(""); string name = Console.ReadLine(); Console.WriteLine(" " + name + "!!"); 例 sample2-a1
PowerPoint Presentation
Visual Basic 2005 學 習 範 本 第 7 章 陣 列 的 活 用 7-1 陣 列 當 我 們 需 要 處 理 資 料 時, 都 使 用 變 數 來 存 放 資 料 因 為 一 個 變 數 只 能 代 表 一 個 資 料, 若 需 要 處 理 100 位 同 學 的 成 績 時, 便 要 使 用 100 個 不 同 的 變 數 名 稱, 這 不 但 會 增 加 變 數 名 稱 命 名
四川省普通高等学校
四 川 省 普 通 高 等 学 校 计 算 机 应 用 知 识 和 能 力 等 级 考 试 考 试 大 纲 (2013 年 试 行 版 ) 四 川 省 教 育 厅 计 算 机 等 级 考 试 中 心 2013 年 1 月 目 录 一 级 考 试 大 纲 1 二 级 考 试 大 纲 6 程 序 设 计 公 共 基 础 知 识 6 BASIC 语 言 程 序 设 计 (Visual Basic) 9
<4D F736F F D B0D3B77EC3FEA7DEC3C0C476C1C9A5BFA6A1B8D5C3442DB57BA6A1B35DAD702DBEC7ACEC2E646F6378>
全國國高級中中等學校 105 學年度商商業類學學生技藝藝競賽 程式式設計 職職種 學學科 試試卷 崗位位編號 : 姓名 : 注意事項 : 請將答案案劃記於答案案卡, 未依依規定劃記者者不予計分分 試題說明 :( 選擇題每每題 4 分, 共 100 分 ) ( )1. 執行以下 Visual Basic 程式片段, 其結果為何?(A) 15 Dim i As Byte i = &HFC Console.WriteLine(Not
<4D F736F F D D342DA57CA7DEA447B14D2DA475B57BBB50BADEB27AC3FEB14DA447B8D5C344>
1. 請 問 誰 提 出 積 體 電 路 (IC) 上 可 容 納 的 電 晶 體 數 目, 約 每 隔 24 個 月 (1975 年 更 改 為 18 個 月 ) 便 會 增 加 一 倍, 效 能 也 將 提 升 一 倍, 也 揭 示 了 資 訊 科 技 進 步 的 速 度? (A) 英 特 爾 (Intel) 公 司 創 始 人 戈 登. 摩 爾 (Gordon Moore) (B) 微 軟 (Microsoft)
05 CHAPTER Information.IsNumeric ( ) Information.IsDate ( ) True False Date Date True False Y Y Information.IsArray ( ) True False Y Information.IsErr
05 CHAPTER Information.IsNumeric () Information.IsDate () True False Date DateTrue False Y Y Information.IsArray () True False Y Information.IsError () Information.IsNothing () True False True False Y
2010年3月计算机等级考试四级网络工程师笔试
计 算 机 二 级 VB 经 典 预 测 题 下 列 各 题 A) B) C) D) 四 个 选 项 中, 只 有 一 个 选 项 是 正 确 的 请 将 正 确 选 项 填 涂 在 答 题 卡 相 应 位 置 上, 答 在 试 卷 上 不 得 分 (1) 下 列 叙 述 中 正 确 的 是 ( ) A) 循 环 队 列 是 队 列 的 一 种 链 式 存 储 结 构 B) 循 环 队 列 是 队
本 土 天 蝗 傳 奇 - 台 灣 大 蝗 生 活 史 及 生 態 習 性 的 研 究 摘 要 台 灣 大 蝗 在 交 配 時 警 覺 性 降 低, 蝗 會 背 著 蝗 跳 到 遠 處, 但 不 會 飛, 肚 子 餓 時 會 進 食, 但 蝗 不 會 交 配 後 蝗 會 選 擇 土 質 堅 實 植
中 華 民 國 第 四 十 八 屆 中 小 學 科 學 展 覽 會 作 品 說 明 書 國 中 組 生 物 及 地 球 科 學 科 第 三 名 031708 本 土 天 蝗 傳 奇 ~ 台 灣 大 蝗 蟲 生 活 史 及 生 態 習 性 的 研 究 學 校 名 稱 : 臺 北 市 立 麗 山 國 民 中 學 作 者 : 指 導 老 師 : 國 一 陳 夢 晴 竇 俊 明 國 一 林 宜 潔 國 一
Microsoft PowerPoint - ch04_AEL0080.ppt
4 選擇 在正常的情況下, 電腦程式的執行是以敘述的排列次序逐步處理的 使用控制架構 (control structures) 可以改變這種既定的先後次序, 讓程式得以進行更複雜的運算, 或以更簡潔的指令來實現演算法 1/42 選擇 4.1 演算法的描述方式 4.2 變數的運用範圍 (Scope of variables) 4.3 if- 敘述 4.4 巢狀 if- 敘述 (Nested if statements)
穨文件1
2-1 Access 2000 Visual Basic Access 2000 97 Office Visual Basic Visual Basic Visual Basic VBA Visual Basic Visual Basic 2-1-1 Visual Basic Access Visual Basic ( ) 2-1 2-1 Visual Basic 2-1 Microsoft Access
個 人 的 手, 拉 著 瞎 子 的 手 把 他 帶 往 村 外 的 時 候, 對 於 瞎 子 來 講, 那 個 人 的 手 和 耶 穌 的 手 有 沒 有 區 別? 沒 有! 為 什 麼 沒 有 區 別? 因 為 對 於 一 個 瞎 子 來 說, 手 和 耳 朵 就 是 他 接 觸 世 界, 瞭
課 目 : 講 道 法 學 生 : 楊 建 偉 老 師 : 汪 院 長 時 間 :2009 年 8 月 1 日 靈 命 三 階 ( 可 8:22-26) 在 四 部 福 音 書 中, 這 是 一 段 很 特 別 的 記 載 特 別 在 什 麼 地 方 呢? 是 不 是 特 別 在 耶 穌 基 督 對 一 個 病 人 的 醫 治? 不, 在 耶 穌 三 年 半 的 服 侍 當 中, 曾 經 醫 治 數
Microsoft PowerPoint - 資料庫程式設計教材.pptx
第三章 SQL 查詢指令 一 SELECT 指令設定查詢範圍 二 WHERE 子句的比較運算子 三 WHERE 子句的邏輯運算子 四 ORDER BY 排序子句 五 SQL 聚合函數 一 SELECT 指令設定查詢範圍 (1)SQL 查詢指令只有一個 SELECT 指令, 其基本語法如下所示 : SELECT 欄位 1, 欄位 2, 欄位 N FROM 資料表或檢視表 WHERE 查詢條件 上述 SELECT
主程式 : public class Main3Activity extends AppCompatActivity { ListView listview; // 先整理資料來源,listitem.xml 需要傳入三種資料 : 圖片 狗狗名字 狗狗生日 // 狗狗圖片 int[] pic =new
![主程式 : public class Main3Activity extends AppCompatActivity { ListView listview; // 先整理資料來源,listitem.xml 需要傳入三種資料 : 圖片 狗狗名字 狗狗生日 // 狗狗圖片 int[] pic =new](/thumbs/88/114972910.jpg "主程式 : public class Main3Activity extends AppCompatActivity { ListView listview; // 先整理資料來源,listitem.xml 需要傳入三種資料 : 圖片 狗狗名字 狗狗生日 // 狗狗圖片 int[] pic =new")
ListView 自訂排版 主程式 : public class Main3Activity extends AppCompatActivity { ListView listview; // 先整理資料來源,listitem.xml 需要傳入三種資料 : 圖片 狗狗名字 狗狗生日 // 狗狗圖片 int[] pic =new int[]{r.drawable.dog1, R.drawable.dog2,
YS1.mps
影 视 与 戏 剧 特 征 化 妆 影 视 与 戏 剧 特 征 化 妆 是 化 妆 艺 术 范 畴 内 具 有 代 表 性 的 内 容, 是 掌 握 了 基 础 化 妆 的 前 提 下, 进 入 较 深 入 的 造 型 化 妆 阶 段 影 视 戏 剧 特 征 化 妆 其 妆 型 显 著, 效 果 突 出, 既 是 专 业 影 视 戏 剧 化 妆 的 基 本 内 容 之 一, 又 可 以 在 影 视
<4D6963726F736F667420576F7264202D20AFB4A7C7A555B2D5C2B4A657B3E62E646F63>
中 華 民 國 大 專 校 院 100 學 年 度 排 球 運 動 聯 賽 排 球 隊 職 員 名 單 一 般 男 生 組 不 分 級 共 56 所 學 校, 總 計 1083 位 隊 職 員 校 名 : 國 立 嘉 義 大 學 (0018) 校 址 :[600] 嘉 義 市 鹿 寮 里 學 府 路 300 號 聯 絡 人 / 電 話 : 鍾 宇 政 / 05-271#7271 校 長 : 李 明
Microsoft Word - ACL chapter00a-1ed .doc
序三 A* Wi-Fi RLE RSA - v - 前言 NPC Horner s rule DOS PCX RLE RSA - - vii - 演算法的樂趣 0-1 60 23 1 32 O(n) O(n 2 ) O(n) O(n) MP3 - viii - 前言 http://books.gotop.com.tw/download/acl045600 http://blog.csdn.net/orbit/
編輯大意 一 本書是一本專為普通高中 技術高中學生編寫的程式語言入門書籍, 全書以 Visual Basic 2015 Express 版的程式開發環境, 來介紹程式基礎實作, 適合首次學習程式語言及程式設計的學生使用 二 本書共分 Ⅰ Ⅱ 兩冊,Ⅰ 冊著重介紹程式設計概念與流程控制,Ⅱ 冊則著重介
程式語言與設計 ( 全 ) Fu nc For tion Button End Next Dim Public ByVal Form Private Sub led Enab Else 編輯大意 一 本書是一本專為普通高中 技術高中學生編寫的程式語言入門書籍, 全書以 Visual Basic 2015 Express 版的程式開發環境, 來介紹程式基礎實作, 適合首次學習程式語言及程式設計的學生使用
Visual C# 2005程式設計
Visual C# 2005 程式設計 第 3 章開始撰寫 Visual C# 2005 程式 程式設計之流程 需求 Requirements 設計 Design 分析 Analysis 撰寫程式 Coding 驗證 Verification 結束 程式設計之流程 需求 (Requirements) 需要的輸入 輸出 ( 包函資料庫大小輸出格式 等 )? 設計 (Design) 找出解決問題的方法
單步除錯 (1/10) 打開 Android Studio, 點選 Start a new Android Studio project 建立專案 Application name 輸入 BMI 點下 Next 2 P a g e
Android Studio Debugging 本篇教學除了最基本的中斷點教學之外, 還有條件式中斷的教學 條件式中斷是進階的除錯技巧, 在某些特定情況中, 我們有一個函數可能會被呼叫數次, 但是我們只希望在某種條件成立時才進行中斷, 進而觀察變數的狀態 而條件式中斷這項技巧正是符合這項需求 本教學分兩部分 單步除錯 (Page2~11, 共 10) 條件式中斷點 (Page12~17, 共 6)
計算機程式及實習 期末報告
計算機程式及實習期末報告 題目 : 壽司之神點餐系統 班級 : 車輛四乙 姓名 : 謝定宏 學號 :4A215116 老師 : 謝慶存 使用 Visual Basic 來寫出一個壽司店的結帳系統 我們把所有食物名稱和打上去然後進行設計界面, 按下計算, 便可以計算出所有食物的金額 還有優待折價方案壽星打 85 折 Vip 會員 75 折設計出一個簡單的點餐系統 程式界面說明 程式界面說明 (1) 更改鮭魚生魚片數量然後再按結帳
PowerPoint Presentation
Visual Basic 2005 學習 範本 第 5 章選擇結構 5.1 關係運算式與邏輯運算式 關係運算式 和 邏輯運算式 兩者都是在程式設計時, 構成條件的基本要件 關係運算式 和 邏輯運算式 經過運算後會產生真 (True) 或假 (False) 等結果, 來供我們決定程式執行的流向 5-2 一 關係運算式 關係運算式 的功能是用來比較字串 數值 等資料的大小關係 關係運算式 經過運算後,
臺北捷運公司 105 年 11 月 27 日新進助理工程員 ( 資訊類 ) 甄試試題 - 程式設計 注意 : 請務必填寫姓名 : 1. 以下題目應全部作答 應考編號 : 2. 科目總分為 100 分 3. 作答時不須抄題目, 但請標明題號, 並請用藍 ( 黑 ) 色原子筆橫向書寫 題目 : 一 軟體
注意 : 請務必填寫姓名 : 1. 以下題目應全部作答 應考編號 : 2. 科目總分為 100 分 3. 作答時不須抄題目, 但請標明題號, 並請用藍 ( 黑 ) 色原子筆橫向書寫 題目 : 一 軟體發展方法已逐漸從傳統的瀑布模型 (waterfall model) 或結構化發展轉向物件導向 (object oriented) 分析設計以及敏捷式開發方法, 請簡要回答以下有關技術與特性 ( 每題 5
Microsoft PowerPoint - OPVB1基本VB.ppt
大 綱 0.VB 能 做 什 麼? CH1 VB 基 本 認 識 1.VB 歷 史 與 版 本 2.VB 環 境 簡 介 3. 即 時 運 算 視 窗 1 0.VB 能 做 什 麼? Visual Basic =>VB=> 程 式 設 計 語 言 => 設 計 程 式 設 計 你 想 要 的 功 能 的 程 式 自 動 化 資 料 庫 計 算 模 擬 遊 戲 網 路 監 控 實 驗 輔 助 自 動
27 :OPC 45 [4] (Automation Interface Standard), (Costom Interface Standard), OPC 2,,, VB Delphi OPC, OPC C++, OPC OPC OPC, [1] 1 OPC 1.1 OPC OPC(OLE f
![27 :OPC 45 [4] (Automation Interface Standard), (Costom Interface Standard), OPC 2,,, VB Delphi OPC, OPC C++, OPC OPC OPC, [1] 1 OPC 1.1 OPC OPC(OLE f](/thumbs/82/86248603.jpg "27 :OPC 45 [4] (Automation Interface Standard), (Costom Interface Standard), OPC 2,,, VB Delphi OPC, OPC C++, OPC OPC OPC, [1] 1 OPC 1.1 OPC OPC(OLE f")
27 1 Vol.27 No.1 CEMENTED CARBIDE 2010 2 Feb.2010!"!!!!"!!!!"!" doi:10.3969/j.issn.1003-7292.2010.01.011 OPC 1 1 2 1 (1., 412008; 2., 518052), OPC, WinCC VB,,, OPC ; ;VB ;WinCC Application of OPC Technology
untitled
1 .NET sln csproj dll cs aspx 說 料 料 利 來 料 ( 來 ) 利 [] [] 來 說 切 切 理 [] [ ] 來 說 拉 類 類 [] [ ] 列 連 Web 行流 來 了 不 不 不 流 立 行 Page 類 Load 理 Click 滑 料 Response 列 料 Response HttpResponse 類 Write 料 Redirect URL Response.Write("!!
TwinCAT 1. TwinCAT TwinCAT PLC PLC IEC TwinCAT TwinCAT Masc
TwinCAT 2001.12.11 TwinCAT 1. TwinCAT... 3 2.... 4... 4...11 3. TwinCAT PLC... 13... 13 PLC IEC 61131-3... 14 4. TwinCAT... 17... 17 5. TwinCAT... 18... 18 6.... 19 Maschine.pro... 19... 27 7.... 31...
多層次傳銷與獎金系統
醒 吾 技 術 學 院 資 訊 管 理 系 ( 五 專 部 ) 九 十 六 學 年 度 畢 業 專 題 多 層 次 傳 銷 與 獎 金 系 統 組 員 : 921506122 游 濬 瑋 921506126 陳 彥 宇 921506139 林 龍 華 921506144 陳 昶 志 921506149 楊 璧 如 指 導 老 師 : 汪 淵 老 師 中 華 民 國 九 十 七 年 一 月 十 一 醒
Microsoft Word - 專題製作研究報告書.doc
大 富 翁 之 我 要 畢 業 指 導 老 師 : 王 啟 修 參 賽 學 生 : 吳 皇 逸 林 晉 逸 黃 亭 瑋 賴 建 豫 嘉 義 高 商 資 料 處 理 科 摘 要 本 專 題 以 大 富 翁 遊 戲 為 基 本 題 材, 並 參 考 任 天 堂 遊 戲 公 司 製 作 的 Mario Party 電 視 遊 戲 和 各 代 的 大 富 翁, 將 不 同 風 格 的 小 遊 戲 與 傳 統
馬孝先
計算機程式及實習期末報告 ppt 製作 題目 : 迷客夏點餐系統 南台科技大學機械工程系車輛一乙學號 : 4A515011 馬孝先老師 : 謝慶存 飲料店結帳 n 學習重點 n ListBox RadioButton 的使用方法 題目說明 : 飲料店結帳 試設計快餐店結帳系統, 填寫數量再按下計算鈕之後, 即會顯示結帳總金額 按 清除 按鈕, 再輸入數量, 並點選 200 以上 8 折, 再按下 計算
¦ÛµM¬ì²Ä3¦¸²Õ¨÷-¾Ç´ú¤ºŁ¶«ÊŁ±.prn, page Normalize ( <4D F736F F D20A6DBB54DACECB2C433A6B8B2D5A8F72DBEC7B4FAA4BAADB6ABCAADB12E646F63> )
100 40 28 2B c 3 10 8 m s h 6.63 10 34 J s e 1.6 10 19 C hc 1240 E hf ev λ λ nm 1 ev 1.6 10-19 J 1 mol 6.02 10 23 ph 8 10 N 14 O 16 Fe 56 Ag 108 NO.99341003 103-E3 第壹部分 ( 占 80 分 ) 56 1 說明 : 第 1 題至第 k
VB控件教程大全
Datagrid DataGrid1.Columns.Remove(0) ' 0 DataGrid1.Columns.Add(0).Caption= ' DataGrod1.Columns(0).DataField= Name ' Adodc1.Refresh DataGrid BackColor Font DataGrid CellPadding HTML CellSpacing HTML Width
Microsoft PowerPoint - VB5
Visual Basic 6.0 (V) & VB.NET 丙檢試題第二站第一題身分證號碼 資科系林偉川 第二站試題 BASIC 應用程式設計 編號試題名稱 119-890306 身分證號碼檢查 119-890307 高速公路車輛統計 119-890308 分數加 減 乘 除運算 三選一 (80 分鐘 ) 2 1 VB6 第二站第一題身分證號碼 由循序檔讀入多筆記錄 Frame 物件 母件 單一物件
untitled
1 LinkButton LinkButton 連 Button Text Visible Click HyperLink HyperLink 來 立 連 Text ImageUrl ( ) NavigateUrl 連 Target 連 _blank _parent frameset _search _self 連 _top 例 sample2-a1 易 連 private void Page_Load(object
Chapter 16 集合
Chapter 16 集合 20 ArrayList StringCollection 16 本章學習目標 : ArrayList ArrayList Array StringCollection 16-1 21 10-3-8 System.Array Clear Clear 16-1 Clear System.Array Microsoft System.Collection IList 542
1 Framework.NET Framework Microsoft Windows.NET Framework.NET Framework NOTE.NET NET Framework.NET Framework 2.0 ( 3 ).NET Framework 2.0.NET F
1 Framework.NET Framework Microsoft Windows.NET Framework.NET Framework NOTE.NET 2.0 2.0.NET Framework.NET Framework 2.0 ( 3).NET Framework 2.0.NET Framework ( System ) o o o o o o Boxing UnBoxing() o
品 春 秋 ...6...6...6...10...13...17...20...23...24...26...27...28...30...32...33...35...38...38...38...41...45 ...48...53...55...59...62...65...65...67...71...73...76...80...82...82...86...90...97...101...104...
目 录
本 科 教 学 工 作 简 报 Undergraduate Teaching Bulletin ( 总 第 59 期 ) 2014 01 东 北 大 学 教 务 处 目 录 教 学 成 果 我 校 精 品 资 源 共 享 课 建 设 工 作 取 得 进 展... 黄 晶 1 我 校 24 个 本 科 专 业 参 加 辽 宁 省 教 育 厅 2013 年 普 通 高 等 学 校 本 科 专 业 综 合
untitled
Double Angel 1.,,,, [] (1),,,,,,,,,,,,,,,,() (),,( ), (2),,,,,1978 ( 53 )2 (M6.2) 6 (M7.4) 1997 ( 9 )3 1 (M6.2)5(M6.3),,,, (3),,1990,,, (4),,,,,,,,,,,,, 2.,,,,,, [] (1) 2 ,,,,, (2),,,,, (),,,,,,,,,, 10,,,,,,,,,,,,,,,,,,,,
Spyder Anaconda Spyder Python Spyder Python Spyder Spyder Spyder 開始 \ 所有程式 \ Anaconda3 (64-bit) \ Spyder Spyder IPython Python IPython Sp
01 1.6 Spyder Anaconda Spyder Python Spyder Python Spyder Spyder 1.6.1 Spyder 開始 \ 所有程式 \ Anaconda3 (64-bit) \ Spyder Spyder IPython Python IPython Spyder Python File
0 0 = 1 0 = 0 1 = = 1 1 = 0 0 = 1
0 0 = 1 0 = 0 1 = 0 1 1 = 1 1 = 0 0 = 1 : = {0, 1} : 3 (,, ) = + (,, ) = + + (, ) = + (,,, ) = ( + )( + ) + ( + )( + ) + = + = = + + = + = ( + ) + = + ( + ) () = () ( + ) = + + = ( + )( + ) + = = + 0
Microsoft PowerPoint - vb.net2.ppt
建立 VB.NET 應用程式 資科系 林偉川 1 使用 VB.NET 開發應用程式 VB.NET 應用程式開發是使用 Visual Studio.NET 整合開發環境, 其基本的步驟如下所示 : Step 1: 新增專案 Step 2: 建立表單介面 Step 3: 設定控制項屬性 Step 4: 撰寫程式碼 Step 5: 編譯與執行 2 1 第一個 VB.NET 主控台應用程式 主控台應用程式是早期
Ch6 Visual Basic表單,功能表與模組
Ch6 Visual Basic 輸入與輸出本章將會介紹. 標籤 (Label). 文字方塊 (Text Box). 訊息對話方塊 (Message Box). 輸入對話方塊 (Input Box) Visual Basic 在推出後, 隨即引起一陣熱列的回響和使用, 除了它繼承了 Basic 原有的易學易用的特性之外, 更重要的是它提供了許多控制項, 供程式設計師快速地完成程式設計的工作 在本章的內容,
46 2011 11 467 數位遊戲式學習系統 7 2011 11 467 47 3 DBGameSys 48 2011 11 467 正規化資料模組 如何配置並儲存電子化資料 以 便減少資料被重覆儲存的程序 DBGameSys的主要功能模組包 學習者 審核評分模組 含 正規化資料模組 審核評分 模組 高分列表模組3大區塊 系統資料庫 在正規化資料模組的執行 高分列表模組 過程中 先要求學習者瀏覽遊戲
3 Driver do Microsoft Access (*.mdb) hisdata IFIX 1.4
IFix3.5 ACCESS ACCESS hisdata D:\Dynamics\SampleSystem\HistoricalData ODBC DSN hisdata 1 ODBC 1.1 2 1.2 3 Driver do Microsoft Access (*.mdb) 1.3 4 hisdata IFIX 1.4 1.4 5 Access 1.5 6 ODBC ifix3.5 1.6 1.6
<4D F736F F D203938BEC7ACECBCD2C0C0B8D5A8F7AEE6A6A1C0C92DB57BA6A1B35DAD705FA6B3B8D1B5AA5F2E646F63>
全國高級中等學校 98 學年度商業類科學生技藝競賽 程式設計 職種學科模擬試卷 選手證號碼 : 姓名 : 注意事項 : 請將答案劃記於答案卡, 未依規定劃記者不予計分 試題說明 : ( 選擇題每題 4 分, 共 100 分 ) ( A ) 1. 在 ASCII Code 的表示法中, 下列大小之關係何者為錯誤? (A) A>B>C (B) c>b>a (C) 3>2>1 (D) p>g>e ( D
第一篇文概說第七章公文的用語及標點符號公本篇內容 第一章 緒論 第二章 公文的意義 第三章 公文與高 普 特各類考試 第四章 公文程式之意義及演變 第五章 公文之分類及其行文系統 第六章 公文之結構與行款 第一篇 第一章緒論 003 第一章緒論 等 等 004 最新應用公文 第一篇 第二章公文的意義 005 第二章公文的意義 第一節 一 須為公務員製作之文書 二 須為公務員 職務上 製作之文書 006
Microsoft Word - AEL CH07
7 選擇結構 [速食店點餐系統] 7-1 是否選條件控制 7-2 選擇控制項 7-3 二選一條件控制 7-4 多選一條件控制 7-1 是否選條件控制 在日常生活中, 是否選的情況十分常見, 我們常常需要判斷氣溫是否有些涼, 需要加件衣服 ; 如果下雨需要拿把傘 If Then 條件控制是一種是否執行的條件判斷, 可以決定是否執行程式區塊內的程式碼, 當 If 條件為 True, 就執行 Then/End
國立台北商業技術學院附設空中商業專科進修學校
國立台北商業技術學院附設空中商業專科進修學校 九十五學年度第一學期第一次期中考試 考試科目 :VB 程式設計 壹 選擇題 ( 每題兩分共八十分 ) (D)1. 在物件導向程式設計時, 物件 (Object) 之組成不包括下列那一項目? (A) 事件程序 (Event)(B) 控制物件的方法 (Method)(C) 物件的屬性 (Property) (D) 表單 (Form) (C)2.VB.NET
untitled
例 立 劉 1 1991 來 Schollmeyer,1996; Volet & Lund, 1994 邏 力 林 2004 歷年 路 類 列 若 邏 力 來 路 力 益 例 數 列 類 論 數 識 數 數 沈 練 念 不 1991 狀 狀 理歷 Mayer, 1992 不 力 不 力 立 1994 了 更 參 力 力 力 靈 力 力 來 識 立 練 識 力 2000 來 1995 切 識 異 勵
Microsoft Word - 應用程式設計.doc
報告題名 : 應用程式設計 ( 班級通訊錄管理系統 ) 作者 : 陳詩婷系級 : 工業工程與系統管理學系學號 :D9326611 開課老師 : 陳亭志課程名稱 : 應用程式設計開課系所 : 工業工程與系統管理學系開課學年 : 九十四學年度第一學期 目錄一 班級通訊錄管理系統的執行畫面 2 二 瀏覽資料的執行畫面 3 三 查詢 / 刪除資料的執行畫面 4 A. 查詢資料 5 B. 查無資料 6 C.
Microsoft PowerPoint - P766Ch09.ppt
PHP5&MySQL 程式設計 第 9 章在網頁之間傳遞資訊 9-1 蒐集網頁上的資訊 9-1-1 建立表單一 決定要蒐集的資訊二 建立表單三 撰寫表單處理程式 單行文字方塊 多行文字方塊 選擇鈕 核取方塊 下拉式功能表 按鈕 密碼欄位 ... 標籤 ACCEPT-CHARSET="... CHARSET="... ACCEPT="... ACTION="URL URL"
untitled
PowerBuilder Tips 利 PB11 Web Service 年度 2 PB Tips PB9 EAServer 5 web service PB9 EAServer 5 了 便 web service 來說 PB9 web service 力 9 PB11 release PB11 web service 力更 令.NET web service PB NVO 論 不 PB 來說 說
Microsoft Word - 透析8051之迴圈控制方法.doc
透析 8051 之分支跳躍與迴圈控制 - 利用 VB 的程式觀念解說 迴圈的控制方法不失為寫程式最重要的技巧之所在之一, 它搭配邏輯運算的判斷作為迴圈繼續執行的判斷依據, 程式設計師必須考量分析所有可能的情況, 然後給予不同的條件, 當條件成立時執行某段程式, 不符合時執行另一段程式, 然後重複某項任務, 直到使用者中斷程式的執行, 或是條件喪失時才跳出迴圈 也可能一個程式重複著無止盡的迴圈, 直到關閉電源為止,
TC35短信发送程序设计
http://www.dragonsoft.net.cn/down/project/tc35_sms.rar TC35 AT /down/book/tc35_at.pdf TC35/TC35i GSM Modem TC35 GSM POS COM SIM DOWN COM E, vbcr AT VB6.0 1)C# http://www.yesky.com/softchannel/72342380468109312/20040523/1800310.shtml,
Microsoft PowerPoint - VB3
Visual Basic 6.0 & VB.NET 丙檢設計第一站 資科系林偉川 VB 之 for 指令 for 變數 = 初值 to 終值 step 增值多個指令 Next 中途離開用 if 指令判斷條件成立後 exit for Ex: Q=2, w=100, e=2, s=0 For i = q To w Step e s = s + i Next i 2 1 VB6 提供之內建函數 End 執行結束
3. 反 映 : 4. 五 花 八 门 : 5. 慷 慨 : 6. 参 与 : 7. 慰 劳 : 8. 延 续 : 9. 珍 爱 : 10. 浪 漫 : 三. 找 出 下 列 每 组 词 中 的 近 义 词 或 同 义 词 : 节 日 节 气 节 令 时 节 习 俗 民 俗 仪 式 风 俗 文 献
练 习 一. 根 据 课 文 的 内 容 回 答 下 列 问 题 : 1. 为 什 么 说 节 日 是 一 个 民 族 文 化 的 最 集 中 的 体 现? 2. 中 国 最 早 的 节 日 是 怎 么 来 的? 节 日 在 远 古 的 主 要 功 能 有 那 些? 3. 中 国 人 的 节 日 主 要 有 哪 几 大 类? 请 举 例 说 明 4. 节 日 的 形 成 发 展 跟 社 会 的 变
The golden pins of the PCI card can be oxidized after months or years
Q. 如何在 LabWindows/CVI 編譯 DAQ Card 程式? A: 請參考至下列步驟 : 步驟 1: 安裝驅動程式 1. 安裝 UniDAQ 驅動程式 UniDAQ 驅動程式下載位置 : CD:\NAPDOS\PCI\UniDAQ\DLL\Driver\ ftp://ftp.icpdas.com/pub/cd/iocard/pci/napdos/pci/unidaq/dll/driver/
1 1 Excel VBA 說明 ( ) (_) STEP4 Excel 2 STEP5 A1 1 B2 2 C3 3 STEP6 A1 STEP7 > > 1-11
1-3 1-3-1 Excel VBA VBA OK CD DVD Excel VBA Excel VBA Excel Visual Basic A1 1 B2 2 C3 3 STEP1 Excel Ch01_VBA.xlsm 1 > > STEP2 Excel 1 2 STEP3 1-10 1 1 Excel VBA 說明 ( ) (_) STEP4 Excel 2 STEP5 A1 1 B2 2
05224AA11.indd
計算機概論 CHAPTER 11 Visual Basic 入門 XBOX 360 Kinect 體感電玩 電腦遊戲 ( 如憤怒鳥 ) 圖書管理系統等都是使用程式語言開發而成 學會 Visual Basic, 你也可以自己動手開發專屬個人的遊戲或實用的軟體喔! 學好本章, 打好程式設計的基礎 執行 開始 / 所有程式 /Microsoft Visual Studio 2010 Express/Microsoft