[計算機(jī)軟件及應(yīng)用]b第六章(編輯修改稿)
2024-11-12 23:09 本頁面
【文章內(nèi)容簡介】 ? End Sub ? Option Explicit ? Option Base 1 ? Private Sub Commandl_Click() ? Dim A(2， 2) As Integer， B(2， 2) As Integer， C(2， 2)As Integer ? Dim n As Integer， m As Integer， S As Integer， k As Integer ? A(1， 1) =3:A(1， 2) =1:A (2, 1)=2:A(2, 2)=5 ? B(1， 1) =2:B(1， 2)=3:B(2， 1)=6:B(2， 2)=1 ? For n=1 TO 2 ? For m=1 TO 2 ? S=0 ? For k=l TO 2 ? S=S+A(n,k) *B(k,m) ? C(n,m)=S ? Next k ? Next m ? Next n ? For n=1 TO 2 ? For m=1 TO 2 ? Print C(n， m)； Spc(3)； ? Next m ? Print ? Next n ? End Sub ? (1)以下關(guān)于語句“ Option Base1”正確的說法是 ( )。 ? (A)其功能是聲明數(shù)組下標(biāo)的默認(rèn)上界 ? (B)其功能是定義動態(tài)數(shù)組 ? (c)其功能是聲明數(shù)組下標(biāo)的默認(rèn)下界 ? (D)其功能是定義靜態(tài)數(shù)組 ? (2)以于關(guān)于語句“ Option Explicit”正確的說法是 ( )。 ? (A)表明此模塊沒有通用過程 ? (B)表明此模塊的通用過程不能被其他模塊調(diào)用 ? (c)表明此模塊變量不聲明可以直接使用 ? (D)表明此模塊變量必須先聲明后使用 ? (3)程序運行完成后， Print C(n,m)語句輸出的結(jié)果是 ( )。 ? (A)0 16 (B)12 26 (C)26 11 (D)12 8 ? 13 11 8 11 12 8 26 11 動態(tài)數(shù)組（ Dynamic） ?動態(tài)數(shù)組：僅在運行時開辟內(nèi)存區(qū)，當(dāng)程序不運行時，動態(tài)數(shù)組不占據(jù)內(nèi)存空間。 ?格式： ReDim [Preserve]數(shù)組名（下標(biāo)） [as 類型 ] 功能：重新定義動態(tài)數(shù)組，按定義的上下界重新分配存儲單元。 動態(tài)數(shù)組（ Dynamic） ?說明： 1）動態(tài)數(shù)組的定義分兩步： 、標(biāo)準(zhǔn)模塊或過程中用Dim或 Public聲明一個沒有下標(biāo)的數(shù)組（括號不能省略），這樣就將數(shù)組聲明為動態(tài)數(shù)組。 ReDim語句定義帶下標(biāo)的數(shù)組，給數(shù)組指定實際的元素個數(shù)。 動態(tài)數(shù)組（ Dynamic） ? ReDim語句是一個可執(zhí)行語句，并且只能出現(xiàn)在過程中。 ?動態(tài)數(shù)組的下標(biāo)用變量來表示。也可以是有確定值的變量。 ?聲明動態(tài)數(shù)組時并不指定數(shù)組的維數(shù)，數(shù)組的維數(shù)由第一次出現(xiàn)的 ReDim語句指定。 ? [Preserve]選項：當(dāng)改變原有數(shù)組最末維的大小時，使用此關(guān)鍵字可以保持?jǐn)?shù)組中原來的數(shù)據(jù)。 動態(tài)數(shù)組（ Dynamic） ?如果使用了 Preserve 關(guān)鍵字，就只能重定義數(shù)組最末維的大小，且根本不能改變維數(shù)的數(shù)目。例如，如果數(shù)組就是一維的，則可以重定義該維的大小，因為它是最末維，也是僅有的一維。不過，如果數(shù)組是二維或更多維時，則只有改變其最末維才能同時仍保留數(shù)組中的內(nèi)容。下面的示例介紹了如何在為已有的動態(tài)數(shù)組增加其最末維大小的同時而不清除其中所含的任何數(shù)據(jù)。 ? ReDim X(10, 10, 10) . . . ReDim Preserve X(10, 10, 15) 動態(tài)數(shù)組舉例 Option Explicit Option Base 1 39。數(shù)組下標(biāo)從 1開始 Private Sub Command1_Click() Dim i As Integer
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號-1