Microsoft Word - 序.DOC
|
|
|
- 鼻 咸
- 5 years ago
- Views:
Transcription
1 了解副程式意義及使用時機, 變數的存取範圍及多表單的程式設計 7-1 函式 7-2 副程式 7-3 變數的範圍 7-4 傳值呼叫及傳址呼叫 7-5 多表單程式設計 (MDI) 7-6 習題
2 在程式設計過程中, 程式會因為不斷成長, 程式碼會愈來愈長, 有一部份會重複使用, 這個重複部份可以將它寫成一個程式片段, 方使程式設計人員共同使用, 這個程式片段我們稱為副程式或函式 7-1 學習函式的宣告和使用 當一個專案程式程式碼數量, 還在一千行內時, 並不會感到副程式或函式所帶來的好處, 但是在程式超過一定數量時, 即會感到這副程式或函式有存在的必要性 因為副程式或函式只要更改一次即可完成修改程式碼工作 如果這個程式片段在專案中重複 5 次, 在不同表單中或物件內重複, 程式設計人員即要修改 5 次, 如果少改一個, 即有可能產生無法預期錯誤 副程式及函式在程式設計有以下優點 把重覆的程式模組化, 簡化程式設計時間 提高維護程式的方便性 增加程式的可讀性 節省程式碼長度 一般較常用副程式或函式,Visual Basic 都已經寫好放在系統之中, 例如常用數學函數都在 Math 物件中, 只要使 Math 物件即可簡單使用數學函數, 例如三角函數 Math.Sin(X) Math.Cos(X) 及 Math.Tan(X) 等, 而這些函數我們可以直接呼叫使用, 不需自己撰寫的, 這種內建在系統中我們稱為內建函式, 而由自己來撰寫稱為副程式或函式, 一般稱為自建函式 7-2
3 07 副程式只用來完成特定的任務, 並不一定會傳回值 而函式不僅用來完成一特定的功能, 並在執行後會傳回一個值, 這個章節將介紹函式 [Public] [Private] Function 函數名稱 ( 參數資料串列 ) [As 資料型態 ] 程式敘述 函數名稱 = 回傳值或 Return 回傳值 End Function 1. 函式名稱命名方式如同變數命名方式, 而且不可和目前變數名稱相同 2. 參數資料串列, 可以傳遞資料到函式計算, 也可以不傳遞 一般而言函式是要傳回主程式一個值, 也有可能不傳遞, 但是如果不傳回的話, 使用副程式會比較好 3. 函式要在 模組 中進行宣告, 或表單開始或結束地方宣告 4. 在宣告函式時如果是以 Private 為開頭時, 只允許同一個模組下來呼叫使用, 如果是使用, 以 Public 為開頭時, 容許目前應用程式的所有程序或模組呼叫使用, 若函式無特別指定 Private 或 Public, 預設為 Public 主程式 { 回傳函數值 = 自定函數 1( 變數 ) } Function 自定函數 1( 傳入變數 ) as 資料型態 { 計算過程自定函數 1= 計算結果 } End Function 7-3
4 7-1-1 應用實例 ( 一 ): 三角形的面積 三角形面積公式 ( 海龍公式 ) 如下 : 邊長分別為 a,b,c, 三角形的面積 S 可由以下公式求得 : S = p( p a)( p b)( p c ) 其中 + + p = a b c 2 資料輸出 Textbox 資料輸入 Textbox 7-4
5 07 1 Function C_triangle(ByVal A As Integer, ByVal B As Integer, ByVal C As Integer) As Single 2 Dim P, S As Single 3 P = (A + B + C) / 2 4 S = Math.Sqrt(P * (P - A) * (P - B) * (P - C)) 5 C_triangle = S 6 End Function 7 8 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 9 Dim temp_1, temp_2, temp_3 As Integer 10 Dim angle_v As Single 11 temp_1 = Val(TextBox1.Text) 12 temp_2 = Val(TextBox2.Text) 13 temp_3 = Val(TextBox3.Text) 14 If temp_1 > 0 And temp_2 > 0 And temp_3 > 0 Then 15 angle_v = c_triangle(temp_1, temp_2, temp_3) 16 If angle_v > 0 Then 17 TextBox4.Text = angle_v 18 Else 19 TextBox4.Text = " 錯誤的三邊長 " 20 End If 21 Else 22 MsgBox(" 三邊長的值一定要輸入不可為 0", MsgBoxStyle.OkOnly) 23 End If 24 End Sub 第 1 行到第 6 行為宣告一個 Function C_triangle() 用來計算已知三個邊長的三角形面積 第 9 行宣告三個變數, 用來儲存由 TextBox 輸入三個邊長 7-5
6 第 11 行到第 13 行將 TextBox 輸入三個邊長值, 利用數值轉換函數 Val() 轉換文字變為數值 第 14 行判斷是否有輸入三個邊長值, 如果不成位, 以 MsgBox 顯示出錯誤訊息 第 15 行將三個邊長值傳入 Function C_triangle(), 並由 Function 回傳一個值 第 16 行到第 20 行將計算結果作出檢查, 如果是大於 0 表示是可以形成一個三角形的三個邊長, 如果不知即是無法形成一個三角形的三個邊長, 例如三邊長為 99,1,1 即無法形成一個三角形 應用實例 ( 二 ): 球的表面積 球表面積公式如下 : 2 球表面積 = 4π r 物件 屬性 設定 說明 Label2 AutoSize False 這三個值設為相同時, 則其物 MaximumSize 220,20 件的寬度固定為 280 pt Size 220, 40 TEXT 清除不要任何文字 Label1 BackColor BurlyWood TEXT 請輸入球的半徑 7-6
7 07 Label 控制項 1 Function Compute(ByVal R As Single) As Double 2 Dim tempv As Double 3 tempv = 4 * Math.PI * R ^ 2 4 Compute = tempv 5 End Function 6 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 7 If IsNumeric(TextBox1.Text) Then 8 Label2.Text = " 球表面積 : " & Compute(Val(TextBox1.Text)).ToString 9 Else 10 Label2.Text = " 請輸入半徑值 " 11 TextBox1.Text = "" 12 End If 13 End Sub 7-7
8 第 1 行到第 5 行為宣告一個 Function Compute() 用來計算球表面積, 其中的 Math.PI 表示數學上的圓週率 π 傳入半徑值, 計算完成回傳到主程式 第 7 行用 IsNumeric() 判別是否為數字性資料, 如果是則傳入副程式計算, 否則出現錯誤訊息到 Label2 物件 第 8 行計算完成直接轉為字串, 顯示到 Label2 物件 應用實例 ( 三 ): 身份證號碼檢驗 身份證號碼是每一個人都具備的, 而在這個號碼中其存在著一個特定運算法則, 以便能用來檢查資料是否正確 在各種升學及就業考試報名時, 都要填寫身分證字號, 如報名程式中無檢查功能, 將來在後續的錄取及分發作業上, 可能會產生不必要困擾, 因此這個檢查程序是必要的 第一位為英文字母, 第二個數字是男女生之分, 男生為 1, 女生為 2, 身份證字號第三碼到第九碼為資料碼, 第十碼位為檢查碼, 必須經過之前一個字母與 8 個數字的組合計算後即可了解是否正確 身分證驗證原則如下 : 英文代號以下表轉換成數字 (1) 英文轉成的數字, 個位數乘 9 再加上十位數 (2) 第一個數字到第八個數字, 從左到右依次乘上 (3) 最後一個數字 A=10 L=20 X=30 B=11 M=21 Y=31 C=12 N=22 W=32 D=13 P=23 Z=33 E=14 Q=24 I=34 F=15 R=25 O=35 G=16 S=26 H=17 T=27 J=18 U=28 K=19 V=29 7-8
9 07 (1)(2)(3) 的和, 除以 10 求出餘數, 如果是 0, 表示是正確身份證字號, 如果不是即是錯誤的 例如 : 身分證號碼是 A A *9=1 1*8=8 2*7=14 3*6=18 4*5=20 5*4=20 6*3=18 7*2=14 8*1= = /10= 餘數為 0 身份證字號為 A 是正確的 物件屬性設定說明 Label2 MaximumSize.width 300 MinimumSize.width 300 Size.width 300 TEXT Label1 BackColor BurlyWood 這三個值設為相同時, 則其物件的寬度固定為 300 pt 清除不要任何文字 7-9
10 Label 控制項 1 Function Checkid(ByVal PerID As String) As Boolean 2 REM 檢查身份證號碼是否正確 3 Dim EngArray As String ' 定義身份證使用到的英文字串 4 Dim PerIdTemp As Integer 5 Dim PerIdChk1, PerIdChk2, PerIdChk3, PerIdChkSum As Integer 6 Dim Loops As Integer 7 8 REM 算出英文字母值 9 EngArray = "ABCDEFGHJKLMNPQRSTUVXYWZIO" 10 PerIdTemp = InStr(1, EngArray, Microsoft.VisualBasic.Left(PerID, 1)) PerIdChk1 = (PerIdTemp \ 10) + (PerIdTemp Mod 10) * 9 12 REM 取出數字, 並計算數值部份加權值 13 For Loops = 2 To 9 14 PerIdChk2 = PerIdChk2 + Val(Mid(PerID, loops, 1)) * (10 - loops) 15 Next 16 PerIdChkSum = Val(Microsoft.VisualBasic.Right(PerID, 1)) 17 REM 全部值除以看是否整除 18 If (PerIdChk1 + PerIdChk2 + PerIdChkSum) Mod 10 = 0 Then 19 Checkid = True 20 Else 21 Checkid = False 7-10
11 07 22 End If 23 End Function Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 26 If Len(TextBox1.Text) = 10 Then 27 If Checkid(UCase(TextBox1.Text)) Then 28 Label2.Text = " 正確身份證號碼 " 29 Else 30 Label2.Text = " 錯誤身份證號碼 " 31 End If 32 Else 33 Label2.Text = " 身份證號碼要 10 碼 " 34 TextBox1.Text = "" 35 End If 36 End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click 39 End 40 End Sub Function Checkid 定義為傳回布林值, 如為正確則傳回 True, 否則即傳回 False 將身份證號碼用到的英文字母, 依照對應轉換出來的數值, 順序排列為一個字串 "ABCDEFGHJKLMNPQRSTUVXYWZIO" 利用 Instr() 找出要檢驗身分證號碼相同字母的位置值再加上 9, 轉換出對應值轉換值, 例如 Z 的位置在該項字串位置是 24, 加上 9 即為 33, 由身分證驗證原則中列表可得知, 並將英文轉成的數字, 個位數乘 9 再加上十位數, 儲存到 PerIdChk1 用一個迴路將前 8 個數字依序取出, 並乘上加權值 ( 即是迴路值 ), 儲存到 PerIdChk2 7-11
12 取出最後一個數字儲存到 PerIdChk3 將 PerIdChk1 PerIdChk2 和 PerIdChk3 三個數加起來, 並除以 10 是否餘數為 0, 如果為 0 即是正確的身分證號碼, 如果不為 0, 這個身分證號碼即是錯誤的 Instr( 起始位置, 目標字串, 目的字串, 比對型態 ) 1. 以 起始位置 為起點, 在 目標字串 中找尋 目的字串, 並傳回在目標字串的位置值 2. 比對型態 如果設定為 0 為執行二進位比對寫, 設定為 1 執行文字比對 UCase( 字串 ): 將字串中小寫的字母, 轉換成大寫字母 LCase( 字串 ): 將字串中大寫的字母, 轉換成小寫字母 1. 請輸入立方體三個長度值求其表面積及體積 2. 請將球表面積改為計算球體積, 公式如下 球體積 =1/3( 球表面積 * 半徑 ) 7-2 學習函式的副程式宣告和繪圖指令使用 7-12
13 副程式定義 副程式和函式最大不同在於函式會傳回一個值, 但是在副程式並不會回傳一個值, 如果要傳回值可利用本章全域變數或是傳址呼叫, 來進行變數內容的改變 [Private] [Public] SUB 副程式名稱 ( 參數資料串列 ) 程式敘述完成特定工作 End Sub 1. 副程式名稱命名方式如同變數命名方式, 而且不可和目前變數名稱相同 2. 參數資料串列, 可以傳遞資料到副程式計算, 也可以不傳遞 副程式並不會傳回值, 參數前加上 ByVal 為傳值呼叫, 如加上 ByRef 為傳址方式傳遞 3. 副程式要在 模組 中進行宣告, 或表單開始或結束地方宣告 4. 副程式不可使用在運算式中 5. 在宣告副程式時如果是以 Private 為開頭時, 只充許同一個模組下來呼叫使用, 如果是使用, 以 Public 為開頭時, 容許目前應用程式的所有程序或模組呼叫使用, 若副程式無特別指定 Private 或 Public, 預設為 Public 7-13
14 主程式 { Call 副程式 1( 變數 ) 下一個敘述 } SUB 副程式 1( 變數 ) { 副程式要完成工作 } End Sub 繪圖的功能 在 VB 2008 上如果要在表單上繪製一些圖形 ( 例如 : 線條及圓 ), 要利用 GDI+ 繪圖介面方式來繪製, 這個是相當大的改變 GDI+ 自 Windows XP 開始即為作業系統的一部分, 他提供二維的向量圖形繪製功能, 其中提供了線條 矩形 橢圓形 弧形 多邊形 基本曲線及貝茲曲線 GDI+ 繪圖功能要經由 Graphic 物件來進行設定及繪製, 繪製圖形的主要座標系統在以表單或是物件的左上角為原點, 向右及向下延伸座標系統如圖所示, 下面例子將會說明繪製圖形的重要概念 1 Dim MyPen As New System.Drawing.Pen(Color.Blue, 10) 2 Dim TextG As System.Drawing.Graphics 3 TextG.DrawLine(myPen, 0, 0, 160, 80) 4 MyPen.Dispose() 5 TextG.Dispose() 7-14
15 07 第 1 行設定畫筆的樣式, 其中樣式包括為顏色和畫筆寬度, 其中的顏色可以指定為 Color 結構屬性所表示之色彩值, 畫筆寬度值為單精確度, 如果值設為 0 結果和 1 是相同的 第 2 行以 Graphics 來建立物件 第 3 行使用 Graphics 物件來繪製線條和形狀, 其中依指定畫筆樣式在起始座標為 (0,0) 到結束座標 (160,80), 繪出一條直線 在繪製完成以後要將這些系統資源, 歸還作業系統, 因為繪製圖形是比較浪費系統資源的, 所以第 4 行和第 5 行我們使用 Dispose() 來釋放記憶體資源 時間延遲 [ 不傳參數 ] 應用實例 ( 四 ): 繪製直線 由左到到右繪製 由右到到左繪製 7-15
16 1 Sub sleep() 2 Dim start, finish As Double 3 start = Microsoft.VisualBasic.DateAndTime.Timer 4 finish = start Do While Microsoft.VisualBasic.DateAndTime.Timer < finish 6 ' 空迴路 7 Loop 8 End Sub 9 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 10 Dim MyPen As New System.Drawing.Pen(Color.Blue, 20) 11 Dim TextGraphics As System.Drawing.Graphics 12 TextGraphics = Me.TextBox1.CreateGraphics() 13 Dim x1, y1 As Integer 14 X1 = Me.TextBox1.Width 15 Y1 = Me.TextBox1.Height 16 TextGraphics.Clear(Color.White) 17 For i As Integer = 0 To Me.Width Step TextGraphics.DrawLine(myPen, i, 0, x1 - i, y1) 19 Call sleep() 20 Next 21 MyPen.Dispose() 22 TextGraphics.Dispose() 23 End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click 26 End 27 End Sub 7-16
17 07 第 1 行到第 8 行為副程式 Sub sleep() 主要功用是做一個時間延遲, 其中的 start 為最取得進入副程式時的系統時間,finish 為 start 加上要延遲時間秒數, 即是要完成時間的系統時間, 並且利用空迴路來完成時間延遲工作 其中 Microsoft.VisualBasic.DateAndTime.Timer, 主要是取得電腦系統本身的系統時間, 這個空迴路時間固定在 0.1 秒結束 第 10 行為宣告畫筆的樣式 第 11 行為設定 Graphics 物件, 第 12 行將 Graphics 物件套用在 TextBox1 控制項物件上 第 13 行宣告座標最大值為 X1 及 Y1, 並在第 14 行及第 15 行取得 TextBox1 控制項物件的寬度和高度值 第 16 行 TextGraphics.Clear(Color.White) 主要目的是 TextBox1 的背景顏色設為白色, 如果在配置表單有變更為其他顏色時, 即要 Clear 為該項色彩 第 17 行到第 19 行為一個迴路, 繪出直線值, 為了要讓使用看到其繪製過程特別呼叫時間延遲, 第 18 行 TextGraphics.DrawLine 繪製直線, 而座標值 i, 0 表示起點座標值, 因為 y 軸為 0, 將只會固定在 TextBox1 上方, 由 左到到右 繪製 x1 i, y1 表示結束座標值, 因為 y 軸為變數 y1, 而根據第 13 行設定後, 將只會固定在 TextBox1 下方, 由 到右到左 繪製 第 20 行到第 21 行將繪圖資源歸還作業系統 7-17
![7-2-4 時間延遲 [ 傳遞參數 ] 應用實例 ( 五 ): 繪製橢圓形 由內到到外繪製 1 Sub sleep2(byval sleeptime As Double) 2 Dim start, Finish As Double 3 start = Microsoft.VisualBasic.DateAndTime.](/docs-images/95/124399862/images/18-1.jpg "Timer 4 Finish = start + sleeptime 5 Do While Microsoft.VisualBasic.DateAndTime.")
18 7-2-4 時間延遲 [ 傳遞參數 ] 應用實例 ( 五 ): 繪製橢圓形 由內到到外繪製 1 Sub sleep2(byval sleeptime As Double) 2 Dim start, Finish As Double 3 start = Microsoft.VisualBasic.DateAndTime.Timer 4 Finish = start + sleeptime 5 Do While Microsoft.VisualBasic.DateAndTime.Timer < Finish 6 ' 空迴路 7 Loop 8 End Sub 9 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 10 Dim MyPen As New System.Drawing.Pen(Color.Blue, 2) 11 Dim TextGraphics As System.Drawing.Graphics 12 TextGraphics = Me.TextBox1.CreateGraphics() 13 Dim x1, y1, Temp As Single 14 x1 = Me.TextBox1.Width / 2 15 y1 = Me.TextBox1.Height / 2 16 TextGraphics.Clear(Color.White) 7-18
19 07 17 For i As Integer = 0 To Me.Width Step Temp = i / 2 19 TextGraphics.DrawEllipse(MyPen, x1 - i, y1 - Temp, i * 2, i) 20 Call sleep2(0.1) 21 Next 22 MyPen.Dispose() ' 將各項資源釋放給作業系統 23 TextGraphics.Dispose() 24 End Sub 25 Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click 26 End 27 End Sub 第 1 行到第 5 行為副程式 Sub sleep2() 主要功用, 如同前一個程式一樣為時間延遲副程式, 由主程式來傳入要延遲時間, 其中各項變數如同前一個程式, 這個空迴路延遲時間, 由主程式來決定時間長短 第 19 行 TextGraphics.DrawEllipse 繪製橢圓形, 橢圓形和圓形其實都是用這個指令來繪製, 在繪製過程是以矩形為主要的依據 ( 如下面圖例說明 ) 座標值 x1 - i, y1 - Temp 表示矩形為有上角座標( 如下面圖例說明 1), 而橢圓的長軸和短軸, 是由 (i * 2, i) 來設定, 在本例的長軸為 i*2 為水平方向長軸 ( 如下面圖例說明 2), 如果變更為 (i, i * 2) 長軸變為垂直方向 ( 如下面圖例說明 3) (1) (2) (3) 7-19
20 在上圖中我們可以理解,VB 2008 是一個矩形內接圓方式來繪製圓和橢圓形, 而傳統的 VB6 是直接設定圓心 半徑及長短軸長來繪製圖形 1. 請將繪製直線修改為左右對稱, 並由上而下繪製, 線條顏色設定為紅色 2. 請將繪製橢圓形修改為圓形, 並由外向內繪製, 線條顏色設定為綠色 7-3 學習變數存在範圍 變數在程式中是有一定存取的範圍, 變數通常是在主程式 副程式或函式來定義宣告和使用, 因此變數範圍可分為全域性變數和區域性變數 全域性變數 ( Public): 在整個程式中都能使用的變數即是全域性變數 例如在模組的一般宣告區宣告的變數, 在整個專案中無論是那一個表單 函式及副程式都能讀取和設定 全域性變數可再細分二類, 其中一類為專案性全域性變數, 另一類為表單性全域性變數 專案性全域性變數可在不同的表單間的各個程序 副程式和函式間使用 表單性全域性變數, 則限定同一個表單中各個程序 副程式和函式間使用 區域性變數 (Private): 只在表單 函式及副程式中被使用的變數即是區域性變數, 如果變數以 Dim 宣告即是 例如控制項或副程式宣告的變數, 只能在這個控制項或是副程式中進行運算工作, 並無法在其他 7-20
21 07 控制項或副程式中來使用 所以不同控制項或副程式都可定義相同名稱的變數, 彼此間並不會互相影響 但是區域性變數名稱不可和全域性變數相同, 否則會只讀取區域性變數, 並不會讀取全域性變數值 靜態變數 (Static): 只能用於副程式內, 用 Static 所宣告的變數的變數值, 會保留至下次副程式被呼叫來使用, 並不會每次呼叫都將變數重新歸零, 一般副程式內所宣告的變數會隨著副程式結束, 記憶體位置即歸還作業系統 應用實例 ( 六 ): 變數的範圍 和表單相同變數不會改變 全域變數會改變 7-21
22 GroupBox 控制項 Label 控制項 TextBox 控制項 1 Module publicvar 2 Public varmodule As Integer = 1 ' 定義模組變數 3 End Module 4 5 Dim varform As Integer = 1 ' 定義表單變數 6 7 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 8 Dim varloc As Integer = 1 9 varform = varform varloc = varloc varmodule = varmodule TextBox1.Text = varform.tostring 13 TextBox2.Text = varloc.tostring 14 TextBox3.Text = varmodule.tostring 15 End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click 18 Static varloc As Integer = 1 ' 定義一個靜態變數 19 varform = varform varloc = varloc
23 07 21 varmodule = varmodule 1 22 TextBox1.Text = varform.tostring 23 TextBox2.Text = varloc.tostring 24 TextBox3.Text = varmodule.tostring 25 End Sub 26 Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click 27 Dim varform As Integer = 1 ' 定義一個和表單變數相同變數 28 varform = varform varmodule = varmodule TextBox1.Text = varform.tostring 31 TextBox3.Text = varmodule.tostring 32 TextBox2.Clear() ' 將用不到 TextBox 清除 33 End Sub Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click 36 End 37 End Sub 在這個程式我們使用到 GroupBox 控制項, 放置同一群組控制項 第 1 行到第 3 行模組程式碼要置放在方案總管內, 主要功用是定義一個專案性全域變數, 這個變數是可在不同表單中共同使用, 但本例只有一個表單 第 5 行為定一個表單性全域變數, 這個要定義在表單宣告區內, 這個變數只可在單一表單內使用, 只要在這個表單中的各個物件都可使用 第 7 行到第 15 行將會對所有的變數做累加動作, 但是其只會改變全域性變數, 區域性變數 varloc 每按一次即會重新宣告一次並無法累加, 因此只會出現固定值 7-23
24 第 17 行到第 25 行將會對所有的變數做累減動作, 但是會改變所有變數值, 其中區域性變數 varloc 宣告為 Static, 它會記錄值, 並不會不斷重新宣告而無法記錄值 第 26 行到第 33 行定義一個和表單變數相同變數 varform, 如果在區域內定義使用這個變數, 將不會改變到表單變數 varform, 而只會改變區域變數 varform, 因此在變數定義時, 在使用上特別留意其存在範圍, 如果區域變數和全域變數相同時, 將無法取得全域性變數值 7-4 學習變數傳遞方式 (Call By Value) 傳值呼叫主要是將變數內容, 傳遞到副程式, 主程式和副程式各自使用自己的記憶體位置, 所以在副程式任何變化, 都不會影響到主程式中相對變數內容 在傳值呼叫中, 主程式要傳遞參數可以是變數 常數或是運算式, 如果副程式參數是以傳址 (ByRef) 宣告, 呼叫程式碼可以在呼叫中將變數名稱以 () 括起來, 以強制該機制為傳值 (ByVal) 呼叫, 在實例應用 繪製橢圓形 中即是使用傳值呼叫 (Call By Address) 傳址呼叫主要是將變數記憶體位置, 傳遞到副程式, 使主程式和副程式使用共同記憶體位置, 所以變數如果在副程式產生變化, 都會直接改變到主程式中相對變數內容 在傳址呼叫不可使用常數為傳遞參數 (Call By Address), 在 VB6.0 版中, 副程式參數列中的參數若未特別宣 7-24
25 07 告, 則其預設為傳址呼叫, 而在 VB 2008 中, 則預設為傳值呼叫 (Call By Value) 應用實例 ( 七 ): 傳值呼叫 7-25
26 1 Sub AddVal(ByVal InVarX As Integer, ByVal InVarY As Integer) 2 InVarX = InVarX InVarY = InVarY + InVarX TextBox1.Text = TextBox1.Text & " 副程式變數值 " + vbnewline 6 TextBox1.Text = TextBox1.Text & "InVarX=" & InVarX.ToString & vbnewline 7 TextBox1.Text = TextBox1.Text & "InVarY=" & InVarY.ToString & vbnewline 8 End Sub 9 10 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 11 Dim VarX, VarY As Integer 12 VarX = VarY = TextBox1.Clear() 15 TextBox1.Text = TextBox1.Text & " 主程式呼叫前變數值 " + vbnewline 16 TextBox1.Text = TextBox1.Text & "VarX=" & VarX.ToString & vbnewline 17 TextBox1.Text = TextBox1.Text & "VarY=" & VarY.ToString & vbnewline 18 TextBox1.Text = TextBox1.Text & vbnewline Call AddVal(VarX, VarY) TextBox1.Text = TextBox1.Text & vbnewline 23 TextBox1.Text = TextBox1.Text & " 主程式呼叫後變數值 " & vbnewline 24 TextBox1.Text = TextBox1.Text & "VarX=" & VarX.ToString & vbnewline 25 TextBox1.Text = TextBox1.Text & "VarY=" & VarY.ToString & vbnewline 7-26
27 07 26 End Sub 27 Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click 28 End 29 End Sub 第 1 行到第 8 行為副程式, 接收主程式傳遞過來的值, 並進行加總並輸出到 TextBox 第 14 行到第 18 行主要是在呼叫副程式前, 將變數內容顯示出來 第 20 行呼叫副程式並傳遞值過去 第 22 行到第 25 行主要是在呼叫副程式後, 將變數內容顯示出來, 前後二者相互比較並無改變 應用實例 ( 八 ): 傳址呼叫 7-27
28 1 Sub Swap(ByRef InVarX As VariantType, ByRef InVarY As VariantType) 2 ' 將二個值交換過來 3 InVarX = InVarX Xor InVarY 4 InVarY = InVarX Xor InVarY 5 InVarX = InVarX Xor InVarY 6 End Sub 7 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 8 Dim X, y As Integer 9 X = y = TextBox1.Text = " 呼叫前 " & vbnewline 12 TextBox1.Text = TextBox1.Text & "X :" & X.ToString & vbnewline & "Y :" & y.tostring & vbnewline 13 Call Swap(X, y) 14 TextBox1.Text = TextBox1.Text & " 呼叫後 " & vbnewline 15 TextBox1.Text = TextBox1.Text & "X :" & X.ToString & vbnewline & "Y :" & y.tostring & vbnewline
29 07 17 End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click 20 End 21 End Sub 第 1 行到第 6 行為副程式, 接收主程式傳遞變的位址值, 並進行 Xor 運算, 其值會改變並回傳到主程式, 這個副程式主要目的是將這二個值交換, 為了能進行較大值交換, 變數在特別宣告為 Double, 以 Xor 運算只適用在數值性資料, 如果要是字串交換, 即要設一個暫時性區域變數, 作為中介變數進行交換 第 11 行到第 12 行主要是在呼叫副程式前, 將變數內容顯示出來 第 13 行呼叫副程式並傳遞位址過去, 並在副程式中進行交換後傳回主程式 第 14 行到第 15 行主要是在呼叫副程式後, 將變數內容顯示出來, 前後二者相互比較會發現其值相互交換 1. 請將副程式交換數字改為交換文字 7-5 (MDI) 學習多表單啟動和應用 7-29
30 7-5-1 文章練習 7-30
31 07 物件 屬性 設定 說明 TextBox1 MultiLine True 設定為可以多行表示, 內定值為 False, 只能單行顯示 TextBox1 Enable False TextBox1 BackColor Black TextBox1 ForeColor White 1 Public demotext As String 2 3 Sub cutchar(byval InChar) 4 Dim Loc As Integer 5 Loc = InStr(demotext, InChar) 6 If Loc > 0 Then 7 demotext = Microsoft.VisualBasic.Left(demotext, Loc - 1) & Microsoft.VisualBasic.Right(demotext, Len(demotext) - Loc) 8 Me.TextBox1.Text = demotext 9 Label1.Text = "" 10 Else 11 Label1.Text = " 錯誤輸入, 未發現所輸入字 " 12 End If 13 End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 16 Dim S_File As String 17 Dim linedata() As String 18 Dim fielddata() As String 19 ' 讀入一個文字檔案 20 Dim filepath As String = My.Computer.FileSystem.CurrentDirectory & "\pageword.txt"
32 22 S_File = My.Computer.FileSystem.ReadAllText(filePath) 23 linedata = Split(S_File, vbnewline) 24 For Each linetext As String In linedata 25 demotext = demotext & linetext 26 Next linetext 27 Me.TextBox1.Text = demotext 28 End Sub Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged 31 If Len(TextBox2.Text) = 1 Then 32 Call cutchar(textbox2.text) 33 End If 34 TextBox2.Clear() 35 End Sub 36 End Sub 第 1 行宣告一個表單性全域變數 demotext, 以利增加和減少等待輸入的文字 第 3 行到第 13 行主要是將使用者於 TextBox2 輸入文字, 如果在 demotext 中找到, 即將其中相同文字去掉, 如果沒有找到即在 Label1 顯示錯誤訊息 第 15 行到第 28 行是表單在 Load 進入時, 即開啟一個文字檔案, 並將檔案內容串接在 demotext, 並顯示在 TextBox1 第 30 行到第 37 行是接受使用者輸入文字後, 先檢查是否為一個字, 如果是則進入副程式檢查是否是螢幕上文字, 如果是則清除文字 第 34 行則將 TextBox2 中文字清除 7-32
33 字根歸類 物件 屬性 設定 說明 TextBox1 MultiLine True 設定為可以多行表示, 內定值為 False, 只能單行顯示 TextBox1 Enable False TextBox1 BackColor Black TextBox1 ForeColor White TextBox1 Width 530 為了配合陣列內字元值一定要設為這個 TextBox1 Height 300 數值 7-33
34 1 Public demotext As String 2 Public PageText(4) As String 3 Public PageNo As Integer 4 5 Sub cutchar(byval InChar As String) 6 Dim Loc As Integer 7 Static Ok_char As Integer = 1 8 Loc = InStr(demotext, InChar) 9 If Loc > 0 And InChar <> " " Then 10 demotext = Microsoft.VisualBasic.Left(demotext, Loc - 1) & " " & Microsoft.VisualBasic.Right(demotext, Len(demotext) - Loc) 11 Me.TextBox1.Text = demotext 12 Label1.Text = "" 13 Ok_char += Ok_char 14 If Ok_char = 405 Then 15 PageNo += PageNo 7-34
35 07 16 demotext = PageText(PageNo) 17 TextBox1.Text = demotext 18 End If 19 Else 20 Label1.Text = " 錯誤輸入, 未發現所輸入字 " 21 End If 22 End Sub 23 Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 24 Dim S_File As String 25 Dim linedata() As String 26 Dim fielddata() As String Dim loopj As Integer ' 讀入一個文字檔案 31 ' 一個 textbox 405 字 32 Dim filepath As String = My.Computer.FileSystem.CurrentDirectory &"\TypeROOT2.txt" 33 S_File = My.Computer.FileSystem.ReadAllText(filePath) 34 linedata = Split(S_File, vbnewline) 35 For Each linetext As String In linedata 36 demotext = demotext & linetext 37 Next linetext loopj = 0 40 PageNo = 0 41 For i As Integer = 1 To Len(demotext) Step PageText(loopj) = Mid(demotext, i, 405) 43 loopj = loopj Next 45 demotext = PageText(PageNo) 46 TextBox1.Text = demotext
36 48 End Sub Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged 51 If Len(TextBox2.Text) = 1 Then 52 Call cutchar(textbox2.text) 53 End If 54 TextBox2.Clear() 55 End Sub 第 1 行宣告一個表單性全域變數 demotext, 以利增加和減少等待輸入的文字, 第 2 行宣告一個陣列 PageText(4) 主要用來存放檔案的資料, 因為全部文字超過一頁, 因此將這個檔案以每頁一個單位存到陣列中,PageNo 主要是用來記錄目前已經 TextBox1 目前輸入到那一個文字陣列 第 5 行到第 22 行主要是將使用者在 TextBox2 輸入文字, 如果在 demotext 中找到, 即將其中相同文字去掉, 並且以 代替顯示, 如果沒有找到即在 Label1 顯示錯誤訊息, 並且記錄輸入正確字數到 Ok_char, 如果 405 字則顯示下一個陣列元素內文字到 TextBox1 第 23 行到第 48 行是表單在 Load 進入時, 即開啟一個文字檔案, 並將檔案文字內容分割並存放在陣列中, 並顯示在 TextBox1 第 50 行到第 55 行是接受使用者輸入文字後, 先檢查是否為一個字, 如果是則進入副程式檢查是否是螢幕上文字, 如果是則清除文字並代換為 第 54 行則將 TextBox2 中文字清除 7-36
![07 7-5-3 主表單 插入一個空白表單由功能表中 [ 加入 Windows Form] 選取 [Windows Form]](/docs-images/95/124399862/images/37-1.jpg "新增表單 Form3 不用使 MDI 父表單 原因, 為其內定太多項目, 初學者可能無法弄清楚那一項目是做那一個用途 7-37")
37 主表單 插入一個空白表單由功能表中 [ 加入 Windows Form] 選取 [Windows Form] 新增表單 Form3 不用使 MDI 父表單 原因, 為其內定太多項目, 初學者可能無法弄清楚那一項目是做那一個用途 7-37
38 7-38 設定啟動表單
39 07 設定功能表選單 拉到表單中會自動出現功能表物件 配置功能表項目 輸入文字 檔案 &F 會自動變為 檔案 (F) 物件屬性設定說明 Form3 WindowState Maximized 開啟時表單最大化 7-39
40 1 Private Sub 結束 ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 結束 ToolStripMenuItem.Click 2 End ' 結束程式 3 End Sub 4 5 Private Sub 文章模式 ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 文章模式 ToolStripMenuItem.Click 6 Form2.Close() ' 關閉另一個表單 7 Form1.Show() ' 開啟文章模式表單 8 End Sub 9 10 Private Sub 字根歸類 ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 字根歸類 ToolStripMenuItem.Click 11 Form1.Close() ' 關閉另一個表單 12 Form2.Show() ' 開啟字根歸類表單 13 End Sub 第 1 行到第 3 行結束本程式執行 第 5 行到第 8 行開啟 Form1 表單 ( 文章模式 ) 第 10 行到第 13 行開啟 Form2 表單 ( 字根歸類 ) 7-40
41 ( ) 執行下列程式片段後,K 值為何? (A) 1 (B) 5 (C) 15 (D) 120 Private Sub Form_Activate( ) REM MAIN PROGRAM K=GAME(5) Console.WriteLine (K) End Sub FUNCTION GAME(X) If(X>1) THEN GAME=X *GAME(X-1) ELSE GAME=1 END If END FUNCTION 2. ( ) Private Sub FORM_ACTIVATE() Dim X as Integer = 5 Dim A as Double = FS(X) A=FS(X) Console.WriteLine (A+X) End Sub Function FS(X) FS = X For J = X To 3 Step 1 FS = FS * J Next J End Function (A) 65 (B) 105 (C) 125 (D)
42 3. ( ) 以下是對有 n 個元素的陣列 a ( 註標範圍 :1 ~ n), 執行氣泡式排序的 Visual Basic 程式片段 第二行空格處應填入何式才正確? (A) n pass (B)n pass + 1 (C) n pass 1 (D)n pass 2 For pass = 1 To n 1 For j = 1 To If a ( j ) > a ( j + 1) Then temp = a ( j ) : a ( j ) = a ( j + 1) : a ( j + 1) = temp End If Next j Next pass 4. ( ) 下列 Visual Basic 程式執行後, 所輸出的資料為何? (A) 2 (B) 1 (C) 0 (D) 1 Private Sub Heart ( m As Integer ) m = m ^ ( m + 2 ) End Sub Private Sub Form_Activate ( ) Dim C As Integer C = 1 Call Heart (C ) Console.WriteLine (C) End Sub 1. 使用副程式來設計程式有那四項優點 2. 將字串中小寫的字母, 轉換成大寫字母函數 3. 判別是否為數字性資料函數 7-42
43 07 4. 圓週率的數學函數 5. 三角函數正弦函數 餘弦函數 1. 寫一函式計算銀行借款的複利之本利和, 分別傳入本金 年利率及期數 複利之本利和公式 = 本金 *(1 + 年利率 )^ 期數 7-43
Microsoft Word - 序.DOC
了 解 副 程 式 意 義 及 使 用 時 機, 變 數 的 存 取 範 圍 及 多 表 單 的 程 式 設 計 7-1 函 式 7-2 副 程 式 7-3 變 數 的 範 圍 7-4 傳 值 呼 叫 及 傳 址 呼 叫 7-5 多 表 單 程 式 設 計 (MDI) 7-6 習 題 在 程 式 設 計 過 程 中, 程 式 會 因 為 不 斷 成 長, 程 式 碼 會 愈 來 愈 長, 有 一 部
Microsoft PowerPoint - VB14.ppt
VB 列表盒 LISTBOX 應用 資科系 林偉川 執行畫面 1 2 1 重要屬性 LISTBOX 物件 (VB6) 新增至 LISTBOX 物件中 ADDITEM 自 LISTBOX 物件中刪除選取物件 REMOVEITEM 自 LISTBOX 物件中取出選取物件 ListIndex 顯示 LISTBOX 物件中紀錄個數 Listcount 3 LISTBOX 物件 (VB.NET) 重要屬性 新增至
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
CHAPTER VC#
1. 2. 3. 4. CHAPTER 2-1 2-2 2-3 2-4 VC# 2-5 2-6 2-7 2-8 Visual C# 2008 2-1 Visual C# 0~100 (-32768~+32767) 2 4 VC# (Overflow) 2-1 2-2 2-1 2-1.1 2-1 1 10 10!(1 10) 2-3 Visual C# 2008 10! 32767 short( )
<4D F736F F D DA5BFA6A1C476C1C92DBEC7ACECB8D5A8F728B57BB35D292E646F63>
全國高級中等學校 106 學年度商業類科學生技藝競賽 程式設計 職種 學科 試卷 選手證號碼 ( 崗位編號 ): 姓名 : 注意事項 : 請將答案劃記於答案卡, 未依規定劃記者不予計分 試題說明 :( 選擇題共 25 題每題 4 分, 答錯不倒扣, 共 100 分 ) ( )1. 執行以下 Visual Basic 程式片段, 其結果為何?(A) 15 (B) 12 (C) 7 (D) 3 Dim
投影片 1
資料庫管理程式 ( 補充教材 -Part2) 使用 ADO.NET 連結資料庫 ( 自行撰寫程式碼 以實現新增 刪除 修改等功能 ) Private Sub InsertButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles InsertButton.Click ' 宣告相關的 Connection
投影片 1
計算機程式及實習 期末報告 題目 : 六宿炒翻天 班級 : 奈米一乙姓名 : 陳洋翼學號 :4A514050 老師 : 謝慶存 程式說明 設計結帳系統, 選擇數量後, 在按下計算, 將會顯示總金額 若是老人或小孩, 將可享 8 折或 9 折的優惠 程式畫面 填選數量 在火腿蛋炒飯的數量選擇 1, 並按下計算, 可得總金額 50 元 程式畫面 打折 填選完後, 若客人是小孩或老人, 選擇欲打折項目,
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(
(Microsoft Word - wes _\246p\246\363\250\317\245\316LED\277O\305\343\245\334\252\254\272A.doc)
作者 Amber 版本 1.0.0 日期 2012/04/25 頁數 1/7 如何使用 LED 燈顯示狀態? 適用於 : 平台 作業系統版本 XPAC utility 版本 XP-8000 系列 N/A N/A XP-8000-Atom 系列 WES2009 所有版本 N/A: Not applicable to this platform and OS. 注意! 欲變更系統的任何設定之前, 請先關閉
國立北斗家商 107 學年度第 2 學期第二次期中考科目 : 計算機應用 計算機概論 IV 班級 : 商二 1 2 貿二 資二 綜二 1 作答方式 : 答案卡 選擇題共 33 題, 除第 1 題 4 分, 其餘每題 3 分, 注意作答時間 1. ( ) 使用 Visual Basic 程式語言 (
國立北斗家商 107 學年度第 2 學期第二次期中考科目 : 計算機應用 計算機概論 IV 班級 : 商二 1 2 貿二 資二 綜二 1 作答方式 : 答案卡 選擇題共 33 題, 除第 1 題 4 分, 其餘每題 3 分, 注意作答時間 1. ( ) 使用 Visual Basic 程式語言 ( 以下皆是 ) 執行下列程式碼後,T 值為何? (A)495 (B)550 (C)594 (D)5050
Microsoft PowerPoint - VB5
Visual Basic 6.0 (V) & VB.NET 丙檢試題第二站第一題身分證號碼 資科系林偉川 第二站試題 BASIC 應用程式設計 編號試題名稱 119-890306 身分證號碼檢查 119-890307 高速公路車輛統計 119-890308 分數加 減 乘 除運算 三選一 (80 分鐘 ) 2 1 VB6 第二站第一題身分證號碼 由循序檔讀入多筆記錄 Frame 物件 母件 單一物件
Microsoft PowerPoint - 第10章.ppt
副程式 通常我們會將重複功能的程式碼, 獨立形成一個固定的程式片段, 讓主程式重複呼吸使用稱為副程式 主程式 開 始 副程式 1 副程式 2 敘述 1 敘述 2 Sub 功能 1( ) : : End Sub Sub 功能 2( ) : : End Sub 輸 出 結 束 主程式與副程式 10-1 副程式 副程式和函式最大的不同處在於 : (1) 副程式並不傳回值 (2) 函式會傳回一個值 假設要讓副程式回傳值,
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(" 專北一 "," 專北二 "," 專北三 "," 專桃園 "," 專桃竹 "," 專中苗 ", " 專台中 "," 專台南 ","
p-2
B 卷 選擇題 共 50 題 ( 共 100 分 ) 1. 執行下列 Visual Basic 程式片段後, 共輸出幾筆資 料? x = 0: y = 1 Print y x = x + y Print x y = y + 1 If x >= 10 Then Exit Loop While y
<4D F736F F D B0D3B77EC3FEA7DEC3C0C476C1C9A5BFA6A1B8D5C3442DB57BA6A1B35DAD702DBEC7ACEC2E646F6378>
全國國高級中中等學校 105 學年度商商業類學學生技藝藝競賽 程式式設計 職職種 學學科 試試卷 崗位位編號 : 姓名 : 注意事項 : 請將答案案劃記於答案案卡, 未依依規定劃記者者不予計分分 試題說明 :( 選擇題每每題 4 分, 共 100 分 ) ( )1. 執行以下 Visual Basic 程式片段, 其結果為何?(A) 15 Dim i As Byte i = &HFC Console.WriteLine(Not
星星排列 _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 *
Microsoft Word - 小心翼翼的二十一點N.doc
投 稿 類 別 : 資 訊 類 篇 名 : 小 心 翼 翼 的 二 十 一 點 作 者 : 陳 鈺 文 國 立 瑞 芳 高 級 工 業 職 業 學 校 資 訊 二 李 伯 謙 國 立 瑞 芳 高 級 工 業 職 業 學 校 資 訊 二 胡 家 媛 國 立 瑞 芳 高 級 工 業 職 業 學 校 資 訊 二 指 導 老 師 : 周 曉 玲 老 師 陳 思 亮 主 任 壹 前 言 一 研 究 動 機 平
840 提示 Excel - Excel -- Excel (=) Excel ch0.xlsx H5 =D5+E5+F5+G5 (=) = - Excel 00
Excel - - Excel - -4-5 840 提示 Excel - Excel -- Excel (=) Excel ch0.xlsx H5 =D5+E5+F5+G5 (=) = - Excel 00 ( 0 ) 智慧標籤 相關說明提示 -5 -- Excel 4 5 6 7 8 + - * / % ^ = < >= & 9 0 (:) (,) ( ) Chapter - :,
Microsoft PowerPoint - C_Structure.ppt
結構與其他資料型態 Janet Huang 5-1 結構的宣告 struct 結構名稱 struct 結構名稱變數 1, 變數 2,, 變數 m; struct 結構名稱 變數 1, 變數 2,, 變數 m; student; student; 5-2 1 結構變數初值的設定 struct 結構名稱 struct 結構名稱變數 = 初值 1, 初值 2,, 初值 n student="janet","1350901",100,95
Microsoft PowerPoint - 第14章.ppt
Windows 繪圖的認識 在視窗 Form 表單上, 繪製圖案, 必須要有幾個動作 : Step 1: 定義及取得 Graphics 物件,Graphics 代表 Windows 中的繪圖區域, 範圍為 Form 表單視窗 Step 2: 利用 Graphics 物件來進行各種繪圖 Step 3: 必須釋放 Graphics 物件, 使用 Dispose( ) 釋放 [ 範例 ] 設計一個程式,
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)
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
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
X6-04_How_do_I_write_a_com_port_communicate_program_of_XPAC_tc
Author WeiKai Version 1.0.0 Date 2013/4/14 Page 1/11 我如何在 XPAC 上建立一個 COM port 通訊程式 Applies to: Platform OS version XPAC utility version XPAC series All versions (WinCE6) All versions XPAC SDK 提供 XPAC 結合
穨文件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
資料結構之C語言重點複習
鏈結串列自編教材 ( 一 ) 本教材 ( 一 ) 目標問題 : 每次以亂數產生一 [0,1000] 之整數值, 若該值 >100, 則以同方式繼續產生下一亂數值, 若該值
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/
4
練習 9A ( 9. 特殊角的三角比 T ( 在本練習中, 不得使用計算機 如有需要, 答案以根式或分數表示. 試完成下表 三角比 θ 0 4 60 sin θ cos θ tan θ 求下列各數式的值 (. cos 60. sin 4 4. tan 4. cos0 4 tan 0 7. sin 4 cos 4 8. cos 60 tan 4 9. tan 60sin 0 0. sin 60 cos
VB程序设计教程
高 等 学 校 教 材 Visual Basic 程 序 设 计 教 程 魏 东 平 郑 立 垠 梁 玉 环 石 油 大 学 出 版 社 内 容 提 要 本 书 是 按 高 等 学 校 计 算 机 程 序 设 计 课 程 教 学 大 纲 编 写 的 大 学 教 材, 主 要 包 括 VB 基 础 知 识 常 用 程 序 结 构 和 算 法 Windows 用 户 界 面 设 计 基 础 文 件 处
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
<4D F736F F D D342DA57CA7DEA447B14D2DA475B57BBB50BADEB27AC3FEB14DA447B8D5C344>
1. 請 問 誰 提 出 積 體 電 路 (IC) 上 可 容 納 的 電 晶 體 數 目, 約 每 隔 24 個 月 (1975 年 更 改 為 18 個 月 ) 便 會 增 加 一 倍, 效 能 也 將 提 升 一 倍, 也 揭 示 了 資 訊 科 技 進 步 的 速 度? (A) 英 特 爾 (Intel) 公 司 創 始 人 戈 登. 摩 爾 (Gordon Moore) (B) 微 軟 (Microsoft)
46 2011 11 467 數位遊戲式學習系統 7 2011 11 467 47 3 DBGameSys 48 2011 11 467 正規化資料模組 如何配置並儲存電子化資料 以 便減少資料被重覆儲存的程序 DBGameSys的主要功能模組包 學習者 審核評分模組 含 正規化資料模組 審核評分 模組 高分列表模組3大區塊 系統資料庫 在正規化資料模組的執行 高分列表模組 過程中 先要求學習者瀏覽遊戲
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,
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
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
untitled
1 行 行 行 行.NET 行 行 類 來 行 行 Thread 類 行 System.Threading 來 類 Thread 類 (1) public Thread(ThreadStart start ); Name 行 IsAlive 行 行狀 Start 行 行 Suspend 行 Resume 行 行 Thread 類 (2) Sleep 行 CurrentThread 行 ThreadStart
Microsoft Word - AEL117-CH09.doc
9-1 模組化程式設計 9-2 建立程序與函數 9-3 傳值或傳址呼叫 9-4 程序與函數的變數範圍 9-5 常用的內建函數 9-1 模組化程式設計 目前應用程式或系統軟體的功能愈來愈強大, 從前一個人寫出的試算表程式, 幾個人開發的作業系統將成為神話, 模組化程式設計在應用程式開發上也就愈顯其重要性 9-1-1 模組的基礎 應用程式或系統軟體因為需要大量人員參與分析 設計與開發, 因此將一個大型應用程式的功能分割成一個個獨立的子功能,
PowerPoint Presentation
Visual Basic 2005 學 習 範 本 第 7 章 陣 列 的 活 用 7-1 陣 列 當 我 們 需 要 處 理 資 料 時, 都 使 用 變 數 來 存 放 資 料 因 為 一 個 變 數 只 能 代 表 一 個 資 料, 若 需 要 處 理 100 位 同 學 的 成 績 時, 便 要 使 用 100 個 不 同 的 變 數 名 稱, 這 不 但 會 增 加 變 數 名 稱 命 名
主程式 : 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,
<4D F736F F D20C0B3A5CEB57BA6A1B35DAD70B4C1A5BDB3F8A7692E646F63>
報告題名 : 作者 : 林芳如系級 : 工業工程與系統管理學系四年甲班學號 :D9439951 開課老師 : 陳亭志課程名稱 : 應用程式設計開課系所 : 工業工程與系統管理學系開課學年 :95 學年度第一學期 目錄 一 方案總管...... 1 二 主選單執行畫面及程式碼...2 三 瀏覽產品資料執行畫面及程式碼...5 四 多筆瀏覽執行畫面及程式碼...6 五 新增產品資料執行畫面及程式碼..8
單步除錯 (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)
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
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[,
報告題名 : 應用程式設計期末報告 產品管理系統 作者 : 張紹剛系級 : 工業二甲學號 :D 開課老師 : 陳亭志課程名稱 : 應用程式設計開課系所 : 工業工程與系統管理開課學年 :97 學年度第 1 學期
報告題名 : 應用程式設計期末報告 產品管理系統 作者 : 張紹剛系級 : 工業二甲學號 :D9568608 開課老師 : 陳亭志課程名稱 : 應用程式設計開課系所 : 工業工程與系統管理開課學年 :97 學年度第 1 學期 目錄 方案總管 : 2 Form1: 首頁 3 Form2: 基本資料維護 6 Form3: 瀏覽產品資料 8 Form4: 全部瀏覽 10 Form5: 瀏覽 / 修改 /
(Microsoft Word - wes _\246p\246\363\250\317\245\316watchdog\250\276\244\356\265{\246\241\267\355\276\367.doc)
作者 Amber 版本 1.0.0 日期 2012/04/24 頁數 1/9 如何使用 watchdog 防止程式當機? 適用於 : 平台 作業系統版本 XPAC utility 版本 XP-8000 系列 WES2009 所有版本 XP-8000-Atom 系列 WES2009 所有版本 注意! 欲變更系統的任何設定之前, 請先關閉 EWF 的保護, 方能使變更值生效 ; 設定完成之後, 請再開啟
105A 資管一程式設計實驗 06 函式定義謝明哲老師 2 程式設計實驗 6.3: 自行定義一個可以接受兩個整數並傳回其最大公因數的函式, 接著利用該函式自 行定義一個可以接受兩個整數並傳回其最小公倍數函式 // gcd_fcn.cpp int gcd(int m,
105A 資管一程式設計實驗 06 函式定義謝明哲老師 hmz@nttu.edu.tw 1 程式設計實驗 06 函式定義 模擬問題 03 在模擬問題 02, 小組已完成擬定一個與學習或日常生活有關的問題, 並依據在 Ch5 所 學到的流程控制與檔案存取技術發展小組的第二版個別化資訊服務程式 現在請小組對第二版程式的 結構進行分析, 檢查是否有哪些功能可以使用在 Ch6 所學到的函式定義來加以模組化,
C/C++ Programming
265 第九講 結構 講師 : 李根逸 (Ken-Yi Lee), E-mail: feis.tw@gmail.com 266 課程 大綱 結構 (struct) 結構宣告 [P.267] 結構定義 [P.268] 結構變數宣告 [P.269] 結構變數的初始化 [P.272] 存取結構成員 [P.244] 傳送 大型資料型態參數 [P.277] 267 結構宣告 結構是 一種衍 生的 自訂資料型態,
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 主控台應用程式 主控台應用程式是早期
計算機程式及實習 期末報告ppt製作 題目:南台黑心早餐店結帳系統
計算機程式及實習期末報告 ppt 製作 題目 : 南台黑心早餐店結帳系統 南台科技大學機械工程系車輛一乙學號 :4A015038 老師 : 謝慶存 學習重點 早餐店結帳 ListBox RadioButton 的使用方法 題目說明 : 早餐店結帳 試設計快餐店結帳系統, 填寫數量再按下計算鈕之後, 即會顯示結帳總金額 按 清除 按鈕, 再輸入數量, 並點選 老客戶 *0.8, 再按下 計算 鈕, 得到打
05856BT09.indd
17 第 9 章模組化程式設計 Ⅱ - 參數傳遞與變數活動範圍 參考答案 9-1 參數的傳遞 9-1 練習配合課本第 61 頁 基礎 一 選擇題 ( B )1. 若某一 Visual Basic 的自定函數如下, 則呼叫 Test(5) 的傳回值為何? (A)1 (B)5 (C)20 (D)625 Function Test(ByVal n As Short) As Integer If n < 2
Microsoft PowerPoint - 13_指標、資料傳遞2.pptx
1 2 指標 Lecture 13 指標函式呼叫的資料傳遞 (III) 傳址指標與陣列 Pointer 3 4 指標 / 指位器 (Pointer) 變數 int a; 整數型別, 名稱為 a 變數是為了使用記憶體資源來儲存資料與進行運算 所有的變數都佔有記憶體空間 記憶體 可視為一個很大的一維陣列, 單位是 byte 問題 一個 4KB 的電腦, 其記憶體位置 ( 編號 ) 從 0 至? 4 x
投稿類別 : 資訊類 篇名 : 堆疊應用 : 電腦如何求出運算式的值 作者 : 李信穎 高雄市立高雄高工 資訊科三年級 朱培一 高雄市立高雄高工 資訊科三年級 指導老師 : 莊利吉老師
投稿類別 : 資訊類 篇名 : 作者 : 李信穎 高雄市立高雄高工 資訊科三年級 朱培一 高雄市立高雄高工 資訊科三年級 指導老師 : 莊利吉老師 壹 前言 一 研究動機 在 Excel 中, 使用者可以自行在儲存格輸入公式, 電腦就會根據輸入的資料計算出結果 同樣的程式設計師也可根據邏輯需要在程式中撰寫適當運算式, 程式執行時也會計算出正確答案 不論是哪一種電腦都無法事先預知使用者會輸入的運算式內容,
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
附 錄
附 錄 屬性 / 方法 / 事件說明適用控制項屬性218 程式語言與設計 -Visual Basic Ⅰ 附錄 A A-1 Visual Basic 控制項常用的屬性 方法及事件 每一個控制項都有一些預定的屬性 方法及事件, 表 A - 1 彙整了常用的屬 性 方法及事件的說明 表 A-1 Visual Basic 控制項常用的屬性 方法及事件 AutoSize 控制項大小可隨控制項內文字的字 數
四川省普通高等学校
四 川 省 普 通 高 等 学 校 计 算 机 应 用 知 识 和 能 力 等 级 考 试 考 试 大 纲 (2013 年 试 行 版 ) 四 川 省 教 育 厅 计 算 机 等 级 考 试 中 心 2013 年 1 月 目 录 一 级 考 试 大 纲 1 二 级 考 试 大 纲 6 程 序 设 计 公 共 基 础 知 识 6 BASIC 语 言 程 序 设 计 (Visual Basic) 9
CHAPTER 1
CHAPTER 1 1-1 System Development Life Cycle; SDLC SDLC Waterfall Model Shelly 1995 1. Preliminary Investigation 2. System Analysis 3. System Design 4. System Development 5. System Implementation and Evaluation
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
Photoshop CS3 影像創造力 基礎講堂 8 學習流程 學習重要性 學習難度 必學指令工具 實作應用範例 創造舞台燈光的漸層繪圖 延伸學習 雜訊與半透明漸層 8-1 Photoshop Photoshop 8 136
漸層填色與圖樣填色 08 8-1 漸層填色 8-2 漸層填色編輯 8-3 油漆桶填色 8-4 編輯圖樣 Photoshop CS3 影像創造力 基礎講堂 8 學習流程 學習重要性 學習難度 必學指令工具 8-1 8-2 8-3 8-4 實作應用範例 創造舞台燈光的漸層繪圖 延伸學習 雜訊與半透明漸層 8-1 Photoshop 8-1-1 Photoshop 8 136 漸層填色與圖樣填色 漸層填色
2010年3月计算机等级考试四级网络工程师笔试
计 算 机 二 级 VB 经 典 预 测 题 下 列 各 题 A) B) C) D) 四 个 选 项 中, 只 有 一 个 选 项 是 正 确 的 请 将 正 确 选 项 填 涂 在 答 题 卡 相 应 位 置 上, 答 在 试 卷 上 不 得 分 (1) 下 列 叙 述 中 正 确 的 是 ( ) A) 循 环 队 列 是 队 列 的 一 种 链 式 存 储 结 构 B) 循 环 队 列 是 队
untitled
1 .NET 利 [] [] 來 說 切 切 理 [] [ ] 來 說 拉 類 類 [] [ ] 列 連 Web 行流 來 了 不 不 不 流 立 行 Page 類 Load 理 Response 類 Write 料 Redirect URL Response.Write("!! ives!!"); Response.Redirect("WebForm2.aspx"); (1) (2) Web Form
建立Android新專案
經濟部工業局 Android 智慧型手機程式設計實務應用班 Android WebService 建國科技大學資管系 饒瑞佶 2012/4 WebService 需要 ksoap2-android-assembly-2.5.2-jar-withdependencies.jar 或 ksoap2-android-assembly-2.5.2-jar-withdependencies_timeout1.jar
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 執行結束
Microsoft PowerPoint - 04-array_pointer.ppt
Array 與 Pointer Array Dynamical Memory Allocation Array( 陣列 ) 陣列是用來存放同樣型態的資料陣列的大小必須在程式中預先設定在程式執行中, 陣列的大小無法改變陣列中的資料是透過索引 (index) 來存取 一維陣列的宣告 type array_name[array_size]; int iarray[100]; /* an integer array
untitled
1 .NET sln csproj dll cs aspx 說 料 料 利 來 料 ( 來 ) 利 [] [] 來 說 切 切 理 [] [ ] 來 說 拉 類 類 [] [ ] 列 連 Web 行流 來 了 不 不 不 流 立 行 Page 類 Load 理 Click 滑 料 Response 列 料 Response HttpResponse 類 Write 料 Redirect URL Response.Write("!!
Microsoft Word - ACL chapter02-5ed.docx
第 2 章神奇的質數 2.1.1 什麼是質數 1 1 1 打下好基礎 - 程式設計必修的數學思維與邏輯訓練 1 1 0 10 2 3 5 7 4 6 8 9 10 4 10000 1229 1000 168 2 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59 61 67 71 73 79 83 89 97 101 103 107 109 113 127 131
Object-Oriented Programming, Mid-term Test, 11/21/2000
通識計算機程式設計期中考試題參考解答, 4/17/2009 1. 撰寫一或數個 C# 敘述達成下列要求 : ( 假設 using System; 敘述已經包含於程式中 ) (a) 宣告 int 變數 x, bool 變數 b, double 常數 F = 7.0. (3%) int x; bool b; const double F = 7.0; (b) 在螢幕顯示一行字, 要求使用者輸入一個整數.
The Embedded computing platform
嵌入式系統及實驗 Embedded System and Experiment 詹曉龍 長庚大學電機系 Java 的類別與物件 : 宣告類別 建構子 public class Customer { private String name; private String address; // Customer 類別宣告 // 成員資料 public int age; // 建構子 : 使用參數設定成員資料初始值
Ⅰ 冊索引 A Activated 事件 102 algorithm 演算法 126 Array.IndexOf() 方法 306 Array.Reverse() 方法 300 Array.Sort() 方法 300 array 陣列 268 assembler 組譯器 4 assembly lan
Ⅰ 冊索引 A Activated 事件 102 algorithm 演算法 126 Array.IndexOf() 方法 306 Array.Reverse() 方法 300 Array.Sort() 方法 300 array 陣列 268 assembler 組譯器 4 assembly language 組合語言 3, 4 AutoSize 屬性 105 B BackColor 屬性 100,
Microsoft PowerPoint - OPVB1基本VB.ppt
大 綱 0.VB 能 做 什 麼? CH1 VB 基 本 認 識 1.VB 歷 史 與 版 本 2.VB 環 境 簡 介 3. 即 時 運 算 視 窗 1 0.VB 能 做 什 麼? Visual Basic =>VB=> 程 式 設 計 語 言 => 設 計 程 式 設 計 你 想 要 的 功 能 的 程 式 自 動 化 資 料 庫 計 算 模 擬 遊 戲 網 路 監 控 實 驗 輔 助 自 動
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 - 應用程式設計.doc
報告題名 : 應用程式設計 ( 班級通訊錄管理系統 ) 作者 : 陳詩婷系級 : 工業工程與系統管理學系學號 :D9326611 開課老師 : 陳亭志課程名稱 : 應用程式設計開課系所 : 工業工程與系統管理學系開課學年 : 九十四學年度第一學期 目錄一 班級通訊錄管理系統的執行畫面 2 二 瀏覽資料的執行畫面 3 三 查詢 / 刪除資料的執行畫面 4 A. 查詢資料 5 B. 查無資料 6 C.
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...
Microsoft Word - æ−Łç¨¿é¡žå‹¥2
投稿類別 : 資訊類 篇名 : 作者 : 陳宣銘 高雄市立高雄高工 資訊科三乙康漢威 高雄市立高雄高工 資訊科三乙周連承 高雄市立高雄高工 資訊科三乙 指導老師 : 陳彥良老師 壹 前言 一 研究動機 在學到電以學的十一章波形時, 並沒有深入的去了解到波形的變化 本次要探討的就是, 關於波形在輸入不同的電阻值以及電容值時, 波形將會產生甚麼樣的變化, 並可以讓使用者選擇正弦波 方波以及三角波以便比較其他波形的結果
多媒體應用 13 新增專案並完成版面配置 <ExMusic01> <activity_main.xml> ImageView ID imgplay ImageView ID imgstop ImageView ID imgfront TextView ID txtsong TextView ID t
設定存取 SD 卡的權限 SD SD 13.1.4
Microsoft Word - ACI chapter00-1ed.docx
前言 Excel Excel - v - 財務管理與投資分析 -Excel 建模活用範例集 5 相關 平衡 敏感 - vi - 前言 模擬 If-Then 規劃 ERP BI - vii - 財務管理與投資分析 -Excel 建模活用範例集 ERP + BI + ERP BI Excel 88 Excel 1. Excel Excel 2. Excel 3. Excel - viii - 前言 1.
二次曲線 人們對於曲線的使用及欣賞 比曲線被視為一種數學題材來探討要早 得多 各種曲線中 在日常生活常接觸的 當然比較容易引起人們的興趣 比如 投擲籃球的路徑是拋物線 盤子的形狀有圓形或橢圓形 雙曲線 是較不常見的 然而根據科學家的研究 彗星的運行軌道是雙曲線的一部 分 我們將拋物線 圓與橢圓 雙曲
-1 圓方程式 第 章 二次曲線 38 二次曲線 人們對於曲線的使用及欣賞 比曲線被視為一種數學題材來探討要早 得多 各種曲線中 在日常生活常接觸的 當然比較容易引起人們的興趣 比如 投擲籃球的路徑是拋物線 盤子的形狀有圓形或橢圓形 雙曲線 是較不常見的 然而根據科學家的研究 彗星的運行軌道是雙曲線的一部 分 我們將拋物線 圓與橢圓 雙曲線合稱為圓錐曲線 因為在平面坐標 系中 其對應的方程式均為二元二次式
Microsoft Word - d 邱書毅.doc
報告題名 : 作者 : 邱書毅系級 : 工業工程與系統管理學系二年級學號 :D9771612 開課老師 : 陳亭志課程名稱 : 應用程式設計開課系所 : 工業工程與系統管理學系開課學年 : 98 學年度第一學期 中文摘要 傳統上, 我們在進行資料統計分析時, 必定是一筆一筆的對產品做詳細的記錄, 此種方法雖然可以隨時的知道產品資訊, 但是光是紀錄產品資料的時間可能需要耗上很長的一段時間, 於現在資訊蓬勃發展的時代,
!249 第 八講 進階指標 講師 : 李根逸 (Ken-Yi Lee),
249 第 八講 進階指標 講師 : 李根逸 (Ken-Yi Lee), E-mail: feis.tw@gmail.com 250 課程 大綱 陣列的複製 [P.252] 字串的特殊性 [P.255] const 修飾字 [P.256] 指標陣列 [P.257] 字串陣列 [P.258] 指標與 二維陣列 [P.260] 動態記憶體配置與釋放 C 語 言中動態記憶體的配置 [P.266] C 語
Microsoft Word - 0.5bh.doc
198 FG7. 199 HG8 E 圖中,DE 為一正方形, = 及 為一邊長 1 cm 的等邊三角形, 而 為此 = 90 若 DE 的面積為 10 cm, 三角形內的任意一點 ( 如圖所示 ) 若 至三邊 求 的面積 及 的垂直距離的總和為 x cm, 求 x 的值 In the figure shown, DE is a square and is an equilateral triangle
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
Microsoft PowerPoint - VB7
Visual Basic 6.0 (VII) 丙檢試題第二站第二題車輛管理統計 資科系林偉川 第二站試題 BASIC 應用程式設計 編號試題名稱 119-890306 身分證號碼檢查 119-890307 高速公路車輛統計 119-890308 分數加 減 乘 除運算 三選一 (80 分鐘 ) 2 1 第二站第二題高速公路車輛統計 由循序檔讀入多筆記錄 Frame 物件 母件 單一物件 V.S. 物件陣列
< D5044B57BA6A1B35DAD70C3FE C C0CBA977C344AE77B8D1C344AFB5D3442DB9EAA5CEBD672DA8E5C2C32E706466>
第 2 章 Visual Basic 2008 檢定題庫 TQC-PD 程式設計類 Visual Basic 2008 之術科檢定題庫分為 :1) 基本程式流程控制 2) 物件程式設計 3) 資料庫應用程式開發 及 4) 專案製作等 4 大類測驗, 每類計有 9 題, 共計 36 題 ( 本書實用級, 故僅為第 1 類與第 2 類, 共計 18 題 ) 為遵重智慧財產權, 本解題秘笈僅就程式設計解題之內容說明,
ok313 正餘弦定理
1 主題一 三角形面積公式 若 a b 和 c 分別表 BC 三內角 表示 BC 的面積則 1 1 1 bcsin ca sin B absin C B 和 C 的對邊長 例題 1 在 BC 中已知 B 10 C 8 10 求 BC 的面積 ns: 0 3 1 1 BC 面積 B C sin 108sin10 0 3 Show xes Show 底 10 Show 底 8 C 8 10 10 B 類題
<4D F736F F D20C0B3A5CEB57BA6A1B35DAD70C075BDE8B3F8A7692D B169B7D3BD6E2E646F63>
報告題名 : 應用程式設計報告 - 員工資料管理系統 作者 : 張照緯系級 : 工業二甲學號 :D9771230 開課老師 : 陳亭志課程名稱 : 應用程式設計開課系所 : 工業工程與系統管理學系開課學年 :98 學年度第一學期 中文摘要 使用 Microsoft 的 Visual Basic 來寫出員工資料管理系統程式, 並加 以使用 Access 資料庫使 Visual Basic 進行員工資料的瀏覽
任務二 : 產生 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
C/C++基礎程式設計班
C/C++ 基礎程式設計 我們必須讓小事也令人難忘 We ve got to make the small things unforgettable. -Steve Jobs 函式 (Function) 講師 : 張傑帆 CSIE NTU 課程大綱 函式概論 變數類型 - 全 / 區域變數 函式中以指標當參數 傳遞陣列參數 把程式拆成多個檔案 函式 (Function) 包函許多程式碼的一行程式 (
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 已知 2 求證 3 證明 2 思路分析與證明 : 3 輔助線 : 四邊形四邊中點連線性質 : 例 ABCD E F G H AC 6 BD 8 EFGH AC BD 14 E A H B F C G D
40 3-1 推理證明 本節性質與公式摘要 1 推理與證明 : 1 已知 2 求證 3 證明 2 思路分析與證明 : 3 輔助線 : 1 2 4 四邊形四邊中點連線性質 : 例 H 68 H 14 H 41 41 基礎題 1 ab a366b12 2 a 36 證明 10 分 10 分 P131 2 a366b12 2 1 a6b12 2 36 6b1266b126 6b186b6 36b3b1 b3b1
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
投稿類別：資訊類
投稿類別 : 資訊類 篇名 : 從 VB.Net 學 C# 作者 : 陳諭瑩 高雄市立高雄高級工業職業學校 資訊科高三乙班王子喬 高雄市立高雄高級工業職業學校 資訊科高三乙班李宗恩 高雄市立高雄高級工業職業學校 資訊科高三乙班 指導老師 : 莊利吉老師 壹 前言 一 研究動機 在高職裡 VB.Net 是課程標準, 但由於現在職場上大部分都是使用 C#, 所以我們用 VB.Net 的基礎學 C#, 再利用高職所學到的
浮點數 Type Size 最小值最大值 float 32 bits 1.4E E38 double 64 bits 4.94E E308 法為 同樣使用 TextField 輸入浮點數, 設定 TextField 物件變數為 inputtextfield, 其值為 no
本章內容有 1. 輸入與輸出 ---------------------------------------------------------------------------------- p01 2. 數學函數 Math ---------------------------------------------------------------------------------- p07
封面-12
第十二章 701Client TECHNOLOGY CO.,LTD. 701Client 701Server 701Client "701Client", 12-1 :supervisor :supervisor : 1. : 00~99 100 2. : 00~63 ( 63 / / ) 3. : 18 9 4. : 18 9 5. 12-2 TECHNOLOGY CO.,LTD. 701Client
05224AA15.indd
CHAPTER 計算機概論 15 函數與副程式 Visual Basic 提供了許多內建函數, 可讓使用者直接使用其預設的功能 ( 如傳回絕對值 平方根等 ) 另外, 我們也可依照個人需求設計自定函數或副程式來使用 本章將分別介紹內建函數 自定函數與副程式的語法, 以及參數傳遞的方式 大程式的好幫手 15-1 內建函數 內建函數 ( built-in function) 是 Visual Basic
碩命題橫式
一 解釋名詞 :(50%) 1. Two s complement of an integer in binary 2. Arithmetic right shift of a signed integer 3. Pipelining in instruction execution 4. Highest and lowest layers in the TCP/IP protocol suite
Microsoft PowerPoint - ch03
第三章基礎繪圖 (Basic Graphics) 3 1 簡介 3 2 Graphics Class 3 3 3 直線繪製 3 4 長方形繪製 3 5 橢圓形繪製 3 6 弧線繪製 3 7 多邊形繪製 3 8 圖形剪裁 3 9 圖形複製 3 10 習題 (Exercises) 3 1 簡介 在基礎圖文繪製上, 除了前章所探討的文字繪製之外, 本章將介紹基礎圖形之繪製 類別 Graphics 提供了各類圖形之繪製方法程序,
Chapter 6 基本的使用者定義函式
基本的使用者定義函式 范洪源 范洪源 函式介紹 的變數傳遞方式 按值傳遞選擇性引數使用共用記憶體分享資料函式呼叫間的資料保存 內建函式 排序與亂數涵式 范洪源 函式介紹 范洪源 檔案的類型 儲存 程式碼的檔案稱為 檔案 副檔名是, 包含 程序檔案或稱底稿檔案 ( ) 它是由一系列宣告式所組成的檔案 執行結果如同把所有的指令直接鍵入指令視窗一樣 任何由程序檔所產生的變數, 都會繼續存留在工作區內而互相影響
Microsoft PowerPoint - STU_C_Lang_CH13.ppt
第 13 章 動態配置記憶體 程式設計與生活 - 使用 C 語言 Shi-Huang Chen Spring 2013 第 13 章 動態配置記憶體 13-1 記憶體配置函式 malloc( ) 13-2 動態配置結構陣列 配置記憶體 預估需求數量的範圍是一項不容易的學問 例 : 大到預估今年國家預算, 小到預估櫥窗裡展示的毛線衣, 需要多少磅毛線才能織成 撰寫程式時, 一樣無法預估程式執行所需的記憶體空間
Microsoft Word - 投影片ch11
Java2 JDK5.0 教學手冊第三版洪維恩編著博碩文化出版書號 pg20210 第十一章抽象類別與介面 本章學習目標認識抽象類別學習介面的使用認識多重繼承與介面的延伸 抽象類別與介面 11-2 11.1 抽象類別 抽象類別的目的是要依據它的格式來修改並建立新的類別 11.1.1 定義抽象類別 定義抽象類別的語法如下 : abstract class 類別名稱 { 宣告資料成員 ; // 定義抽象類別
基本數學核心能力測驗_行為觀察記錄紙_G2版本
基本數學數學核心能力測驗 G2 行為觀察記錄記錄紙 學校 : 班級 : 姓名 : 日期 : 記錄者 : ~ 學生作答時, 請他 ( 她 ) 將雙手皆置於桌面 ~ 認識數字 ( 三 ): 數列 ( 共 1 頁 ) 注意事項 逐題觀察並作底下記錄, 等分測驗做完後, 每一個策略任選一題問 這一題你是怎麼算的? ( 如果只運用一種策略, 則再任選 2-3 題訪問 ) 利用學生的回答來作為 自己觀察記錄的證據