[工學(xué)]access2007循序漸進(jìn)教程第7章(編輯修改稿)
2025-02-15 10:50 本頁(yè)面
【文章內(nèi)容簡(jiǎn)介】 件框的兩個(gè)方法。 With Me![cboAuthorSearchList] .Visible=True ‘ 設(shè)置為可見 .Dropdown ‘ 點(diǎn)擊下拉菜單 End With ? 過程與函數(shù) 簡(jiǎn)單地講，過程和函數(shù)就是指能夠執(zhí)行特定功能的語(yǔ)句塊，都是為編寫程序而服務(wù)的。但是它們之間是有區(qū)別的。 1．過程 過程是 VBA代碼的一個(gè)單元，它包括一系列用于執(zhí)行某個(gè)任務(wù)或是進(jìn)行某種計(jì)算的語(yǔ)句。 過程只執(zhí)行一個(gè)或多個(gè)操作，沒有返回值。比如下面就是一個(gè)過程的例子。 Sub cmdSmallFont_Click() With .Name=Arial .Size=16 End With End Sub 上面列出的代碼就是一個(gè)簡(jiǎn)單的過程。實(shí)際上在 With下的所有操作，默認(rèn)訪問的都是 cmdSmallFont對(duì)象 通常用 Sub聲明一個(gè)新的過程，其語(yǔ)法格式如下： [Private|Public|Friend][Static]Sub name（ arglist） statements End Sub 各項(xiàng)的意義請(qǐng)參考書中表格 71。 2．函數(shù) 函數(shù)其實(shí)也是過程，不過它是一種特殊的、能夠返回具體值的過程，返回的值通常是計(jì)算的結(jié)果或測(cè)試的結(jié)果，能夠在表達(dá)式中使用。 用 Function語(yǔ)句可以聲明一個(gè)新函數(shù)。其語(yǔ)法形式如下： [Public | Private | Friend][Static] Function name [(arglist)] [As type] [statements] [name=expression] [Exit Function] End Function 各項(xiàng)的意義請(qǐng)參考書中表格 72 ? 注釋語(yǔ)句 注釋語(yǔ)句就是穿插在程序代碼中并對(duì)代碼的意義和功能進(jìn)行說明的語(yǔ)句，它不參與程序的運(yùn)行。 在 VBA程序中，添加注釋可以通過兩種方式來實(shí)現(xiàn)：一是使用 Rem語(yǔ)句，二是使用 “’” 符號(hào)。 Dim Mystr1,Mystr2 Mystr1=”Wele” :Rem為 Mystr1賦值。 Mystr2=”Goodbye” ’為 Mystr2賦值。這也是一條注釋，無(wú)需使用冒號(hào)。 “ Rem注釋 ” 在語(yǔ)句之后要用冒號(hào)隔開。 ? 語(yǔ)句的連寫和換行 Dim MyNO As String MyNo=“2022091229” 可以寫成下面的一行： Dim MyNo As String:MyNo=“2022091229” 一般而言，程序語(yǔ)句都是一句一行，但是有些時(shí)候可能需要在一行中連寫幾句代碼。這時(shí)需要用冒號(hào) “ :”來分開這些不同用途的語(yǔ)句。例如： 另外，還有一種情況在編程中經(jīng)常遇到，那就是程序代碼過長(zhǎng)，雖然一行能夠?qū)懲辍５菚鴮懫饋聿环奖?，看上去也不美觀，希望將這句代碼分開寫成幾行。 這時(shí)要用到空格加下劃線 “ _” ，比如下面的例子。 Public Const Date=1/1/2022,Author=Nancy, _ Tel=62774059 空格加下劃線（ “ _” ）被稱為續(xù)行號(hào)，它可以把語(yǔ)句分成兩行或多行，用于解決程序代碼中語(yǔ)句過長(zhǎng)的問題。 “ 增加內(nèi)涵 ” —— 功能 模塊的創(chuàng)建 ? 模塊簡(jiǎn)介 模塊作為 Access數(shù)據(jù)庫(kù)中的一個(gè)重要對(duì)象，它是將 VBA聲明、表達(dá)式和程序作為一個(gè)單元進(jìn)行保存的集合。 模塊由一個(gè)通用聲明部分以及一個(gè)或多個(gè)子程序或函數(shù)組成的。模塊的通用聲明部分用來對(duì)要在模塊中或模塊之間使用的變量、常量、自定義數(shù)據(jù)類型以及模塊級(jí)的 Option語(yǔ)句進(jìn)行聲明。其它部分為子程序或函數(shù)部分，具體如下圖所示。 這是多功能模塊（寫在窗體的模塊就是窗
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號(hào)-1