vb6计算机,[计算机软件及应用]VB6.ppt
[計算機軟件及應用]VB6
6.1.1 VB的文件類型 1. 工程文件(.vbp) 6.1.2 工程的組成 1. 窗體模塊(.frm) 6.1.3 管理工程 1. 保存工程 6.1.3 管理工程 3. 添加工程 6.2.1 Sub過程 語法: Private Sub Form_事件名([參數列表]) [局部變量和常數聲明] 語句塊 End Sub 說明: 不管窗體是什么名字,但在事件過程中都使用“Form _事件名”。 窗體過程前面的聲明都是Private,表示這個窗體過程只能在窗體模塊中使用。 在Sub和End Sub之間的語句塊,稱為程序體或過程體。 6.2.1 Sub過程 語法: Private Sub 控件名_事件名([參數列表]) [局部變量和常數聲明] 語句塊 End Sub 6.2.1 Sub過程 語法: [Private | Public] [Static] Sub 過程名([參數列表]) [局部變量和常數聲明] 語句塊 [Exit Sub] 語句塊 End Sub 6.2.1 Sub過程 (2)建立通用過程 6.2.2 Function過程 語法: [Private | Public] [Static] Function 函數名([參數列表]) [As 數據類型][局部變量和常數聲明] [函數名 = 表達式] [Exit Function] 語句塊 [函數名 = 表達式] End Function 6.2.2 Function過程 2. 建立函數過程 6.3.2 調用Function過程 調用函數Function過程的方法和調用 VB 內部函數方法一樣,在語句中直接使用函數名,Function 過程可返回一個值到調用的過程。 6.4.1 形參和實參 1. 形參和實參 6.4.1 形參和實參 2.形參的數據類型 6.4.1 形參和實參 3. 使用可選的參數 6.4.1 形參和實參 Private Function divisor(ParamArray n()) '通用函數求最大公約 Dim r As Integer If UBound(n) = 1 Then x = n(0): y = n(1) ElseIf UBound(n) = 0 Then x = n(0): y = 1 End If r = x Mod y Do While r <> 0 x = y y = r r = x Mod y Loop divisor = y End Function 6.4.2 參數按值傳遞和按地址傳遞 1. 按值傳遞參數 6.4.2 參數按值傳遞和按地址傳遞 2. 按地址傳遞參數 6.4.2 參數按值傳遞和按地址傳遞 按地址傳遞參數有幾點說明: 6.4.3 數組參數 程序代碼如下: Option Base 1 Private Sub Command1_Click() '單擊計算按鈕 Dim Score1(8) As Single, Score2(8) As Single Dim i As Integer, j As Integer '輸入分數 Score1(1) = 98: Score2(1) = 84 Score1(2) = 82: Score2(2) = 86 Score1(3) = 76: Score2(3) = 79 Score1(4) = 66: Score2(4) = 72 Score1(5) = 88: Score2(5) = 84 Score1(6) = 82: Score2(6) = 76 Score1(7) = 75: Score2(7) = 79 Score1(8) = 60: Score2(8) = 70 Text1.Text = Int(Average(Score1) * 100) / 100 Text2.Text = Int(Average(Score2) * 100) / 100 End Sub 6.4.3 數組參數 6.4.4 對象參數 在VB中對象也可以作為形參,即對象可以作為參數向過程傳遞,對 傳遞只能是按地址傳遞。 6.5 遞歸過程 計算階乘n!可以表示為: 6.6.1 過程級、模塊級和全局變量 1.過程級變量 6.6.1 過程級、模塊級
總結
以上是生活随笔為你收集整理的vb6计算机,[计算机软件及应用]VB6.ppt的全部內容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: js下载文件 java_[Java教程]
- 下一篇: 路考计算机系统评判,科目三智能考试有效解