全國計算機(jī)等級考試vb二級筆試復(fù)習(xí)資料(參考版)
2025-01-17 01:31本頁面
【正文】 9數(shù)據(jù)庫 ?。骸 ∪斯す芾怼募芾怼獢?shù)據(jù)庫管理 ： 層次模型(樹型結(jié)構(gòu))—網(wǎng)絡(luò)模型(無向圖形)—關(guān)系模型(二維關(guān)系表) (Data)的重要屬性： Conncet:確定數(shù)據(jù)訪問類型(Access(缺省值)\dbase\Foxpro) DatabaseName:確定數(shù)據(jù)控件使用的數(shù)據(jù)庫 Access表包含“.mdb”的文件中，該屬性值就是：.mdb dbase\Foxpro數(shù)據(jù)庫時,該屬性值是：包含數(shù)據(jù)庫文件的路徑 RecordSource:確定訪問數(shù)據(jù)表的名稱 ?。簶?biāo)簽、文本框、檢查框、組合框、列表框、圖片框、圖象控件、DBCombo、Dblist、DBGrid 常用屬性： DataSource:指定一個數(shù)據(jù)控件(Data控件) DataField:指定顯示的數(shù)據(jù)表的哪一字段。、文本、圖形及多媒體處理 (1)常用鼠標(biāo)方法(MouseDown, MouseUp,MouseMove) (2)數(shù)據(jù)輸出的格式化處理(Format函數(shù)) (3)圖形控件Line、Shape使用畫點(diǎn)(Pset)、線(Line)、圓(Circle) 例如：在Form_Click事件中執(zhí)行如下語句的正確結(jié)果是( )?！ rivate Sub Form_Click() Dim a As Integer, b As Integer a = 1: b = 2 Call sub1(a, b) 39。n,m第一次變化后，第二次以變化后的值再調(diào)用 End Sub Private Function f(n As Integer, m As Integer) n = n + m m = m + 3 f = n + m End Function 執(zhí)行下面的程序，在窗體上顯示的輸出結(jié)果是______?！ ?9。x,y3=。x, y2=。x, y4=。x, y1=。 Chr(dec) dec = 0 Next i End Sub(2)static變量 Private Sub Command1_Click() Dim n As Integer, i As Integer n = 2 For i = 9 To 1 Step 1 Call sub2(i, n) Print i, n Next i End Sub Private Sub sub2(x As Integer, y As Integer) Static n As Integer Dim i As Integer For i = 3 To 1 Step 1 n = n + x x = x 1 Next i y = y + n End Sub (3) 遞歸 Private Sub Command1_Click() Dim a As Integer a = 2 Call sub1(a) End Sub Private Sub sub1(x As Integer) x = x * 2 + 1 If x 10 Then Call sub1(x) End If x = x * 2 + 1 Print x End Sub (4)遞歸 Private Sub test(x As Integer) Dim i As Integer If x 0 Then Call test(x 1) For i = 1 To x Print x?！ 、偃肿兞?②窗體或模塊級變量 ③形參與實(shí)參結(jié)合 ④靜態(tài)變量 A. ①②④ B. ①②③ C.②④ D.④ 二級考試必考題型：(課后習(xí)題) 傳值 傳地址 Static變量 同名變量 遞歸過程 例如： 以下有關(guān)變量作用域的說法中，錯誤的是( ) A. 只有在標(biāo)準(zhǔn)模塊中用public語句說明的變量才是全局變量 B. 在過程中不能使用public語句說明全局變量 C. 在標(biāo)準(zhǔn)模塊的通用聲明處可用private語句說明模塊級變量 D. 在窗體的通用聲明處可用private語句說明窗體級變量 ，在窗體通用聲明處和過程sub1中分別定義：public k as integer、dim k as integer如何在sub1中訪問全局變量k( ) 例：閱讀程序，給出輸出結(jié)果： (1)字符串處理(數(shù)組參數(shù)) Option Base 1 Private Sub Form_Click() Dim st As String, char As String Dim data() As String, i As Integer, j As Integer st = 10281018123811181038 For i = 1 To Len(st) If Mid(st, i, 1) 8 Then char = char amp?！ 〃C例如：Private Sub Form_Click() Dim a As String : a = 2 Call sub1(a) Print a End Sub Private Sub sub1(ByVal b As Integer) b = b + 1 : Print b End Sub F按地址傳遞參數(shù) –當(dāng)實(shí)參是變量時：如果形參規(guī)定了類型，則實(shí)參必須跟形參保持一致 如果形參沒有規(guī)定類型，則VB按要求進(jìn)行數(shù)據(jù)類型轉(zhuǎn)換 –當(dāng)實(shí)參是常量或表達(dá)式時： VB自動用“按值傳遞”的方式進(jìn)行處理，如果數(shù)據(jù)類型不統(tǒng)一，VB自動進(jìn)行數(shù)據(jù)轉(zhuǎn)換 例如：在應(yīng)用程序中用“Private function Fun(X as integer,Y as single)”定義了函數(shù)Fun。 Private Sub Form_Click() Dim a() As Integer, b() As Integer Dim k As Integer, i As Integer Open e:\ For Input As 2 Open e:\ For Input As 3 Do While Not EOF(2) k = k + 1 ReDim Preserve a(k) Input 2, a(k) Loop _______k=0______________________ Do While Not EOF(3) k = k + 1 ReDim Preserve b(k) Input 3, b(k)
試題試卷相關(guān)推薦
鄂ICP備17016276號-1