【正文】 （ 6）為了使復選框禁用（即呈現(xiàn)灰色），應把它的 value 屬性設置為 【 6】 。下面能正確實現(xiàn)上述功能的 事件過程是 A ） Private Sub P1_MouseMove 48 （ Button AS Integer,Shift As Integer,X As Single, Y As Single） Print X,Y End Sub B ） Private Sub P1_MouseDown（ Button AS Integer,Shift As Integer,X As Single, Y As Single） X,Y End Sub C ） Private Sub P1_MouseMove（ Button AS Integer,Shift As Integer,X As Single, Y As Single） X,Y End Sub D ） Private Sub Form_MouseMove（ Button AS Integer,Shift As Integer,X As Single, Y As Single） X,Y End Sub （ 26）計算二的近似值 的一個公式是。詳細設計屬于 ( ) A)定義階段 B)開發(fā)階段 C)維護階段 D)上述三個階段 （ 7）數(shù)據(jù)庫管理系統(tǒng)中負責數(shù)據(jù)模式定義的語言是 A）數(shù)據(jù)定義語言 B）數(shù)據(jù)管理語言 C）數(shù)據(jù)操縱語言 D）數(shù)據(jù)控制語言 （ 8）在學生管理的關系數(shù)據(jù)庫中，存取一個學生信息的數(shù)據(jù)單位是 A）文件 B）數(shù)據(jù)庫 C）字段 D）記錄 （ 9）數(shù)據(jù)庫設計中，用 ER 圖來描述信息結構但不涉及信息在計算機中的表示，它屬于數(shù)據(jù)庫設計的 A）需求分析階段 B）邏輯設計階段 C）概念設計階段 D）物理設計階段 （ 10）有兩個關系 R 和 T 如下： 41 則由關系 R 得到關系 T 的操作是 A）選擇 B）投影 C）交 D）并 （ 11）在 VB 集成環(huán)境中要結束一個正在運行的工程，可單擊工具欄上的一個按鈕，這個按鈕是 （ 12）設 x 是整型變量，與函數(shù)Ⅱ f(x0,x,x)有相同結果的代數(shù)式是 A） |x| B） |x| C） x D） x 42 （ 13）設窗體文件中有下面的事件過程： Private Sub Command1_Click（） Dim s a%=100 Print a End Sub 其中變量 a 和 s 的數(shù)據(jù)類型分別是 A）整型，整型 B）變體型，變體型 C）整型，變體型 D）變體型，整型 （ 14）下面哪個屬性肯定不是框架控件的屬性 A） Text B） Caption C） Left D） Enabled （ 15）下面不能在信息框中輸出“ VB”的是 A） MsgBox VB B） x=MsgBox（ VB） C） MsgBox（ VB） D） Call MsgBox VB （ 16）窗體上有一個名稱為 Option1 的單選按鈕數(shù)組，程序運行 43 時，當單擊某個單選按鈕時，會調用下面的事件過程 Private Sub Option1_C1ick（ Index As Integer） … End Sub 下面關于此過程的參數(shù) Index 的敘述中正確的是 A） Index 為 1 表示單選按鈕被選中，為 O 表示未選中 B） Index 的值可正可負 C） Index 的值用來區(qū)分哪個單選按鈕被選中 D） Index 表示數(shù)組中 單選按鈕的數(shù)量 （ 17 ）設窗體中有一個文本框 Text1 ，若在程序中執(zhí)行了，則觸發(fā) A） Text1 的 SetFocus 事件 B） Text1 的 GotFocus 事件 C） Text1 的 LostFocus 事件 D）窗體的 GotFocus 事件 （ 18） VB 中有 3 個鍵盤事件： KeyPress、 KeyDown、 KeyUp，若光標在 Text1 文本框中，則每輸入一個字母 A）這 3 個事件都會觸發(fā) B）只觸發(fā) KeyPress 事件 C）只觸發(fā) KeyDown、 KeyUp 事件 D）不觸發(fā)其中任何一個事件 （ 19）下面關于標準模塊的敘述中錯誤的是 44 A）標準模塊中可以聲明全局變量 B）標準模塊中可以包含一個 Sub Main 過程，但此過程不能被設置為啟動過程 C）標準模塊中可以包含一些 Public 過程 D）一個工程中可以含有多個標準模塊 （ 20）設窗體的名稱為 Form1，標題為 Win，則窗體的 MouseDown事件過程的過程名是 A） Form1_MouseDown B） Win_MouseDown C） Form_MouseDown D） MouseDown_Form1 （ 21）下面正確使用動態(tài)數(shù)組的是 A） Dim arr() As Integer … ReDim arr(3,5) B） Dim arr() As Integer … ReDim arr(50)As String C） Dim arr() … ReDim arr(50) As Integer D） Dim arr(50) As Integer 45 … ReDim arr(20) （ 22）下面是求最大 公約數(shù)的函數(shù)的首部 Function gcd(ByVal x As Integer, ByVal y As Integer) As Integer 若要輸出 1 16 這 3 個數(shù)的最大公約數(shù)，下面正確的語句是 A） Print gcd(8,12)， gcd(12,16)， gcd(16,8) B） Print gcd(8,12,16) C） Print gcd(8)， gcd(12)， gcd(16) D） Print gcd(8,gcd(12,16)) （ 23）有下面的程序段，其功能是按圖 1 所 示的規(guī)律輸出數(shù)據(jù) Dim a(3,5) As Integer For i=1 To 3 For j=1 To 5 A(i,j)=i+j Print a(i,j)。 （ 4）在數(shù)據(jù)庫技術中，實體集之間的聯(lián)系可以是一對一或一對多的，那么 “學生 ”和 “可選課程 ”的聯(lián)系為【 4】多對多。HC000amp。 ，也可以小于隊尾指針 答案 D 解析 :如果隊頭指針大于隊尾指針說明隊列已經(jīng)循環(huán)存放數(shù)據(jù)了 ,如果隊頭指針小于隊尾指針說明沒有進行循環(huán)存放 4. 算法的空間復雜度是指（ ）。 請?zhí)羁?。b$amp。 （ 3）符合結構化原則的三種基 本控制結構是：選擇結構、循環(huán)結構和 【 3】 。其中參數(shù)數(shù)組 a()中存放給定序列（個數(shù)與數(shù)組 a 的元素個數(shù)相等） a1,a2,a3… 的值，要加密的文本放在參數(shù)變量 mystr 中。 Next n Print Next m End Sub B） 2 0 4 0 4 0 4 0 6 （ 25）設有如下函數(shù)過程： Function fun(a As Integer, b As Integer) Dim c As Integer If a b Then c = a: a = b: b = c End If c = 0 Do c = c + a Loop Until c Mod b = 0 fun = c End Function 若調用函數(shù) fun 時的實際參數(shù)都是自然數(shù)，則函數(shù)返回的是 29 B） a、 b 的最小公倍數(shù) （ 26）窗體上有 1 個名稱為 Text1 的文本框； 1 個名稱為 Timer1 的計時器控件，其Interval 屬性為 5000， Enabled 屬性值是 True。為得到與題目要求相符的結果，下面修改方案中正確的是 B）把 For k = To Step 100 和 Next k 兩行刪除 （ 34）下列有關文件的敘述中，正確的是 C）隨機文件中，每個記錄的長度是固定的 33 （ 35）窗體如圖 1 所示。 * r * r End If End Sub （ 7）設有整型變量 s，取值范圍為 0～ 100，表示學生的成績，有如下程序段： If s = 90 Then Level = A ElseIf s = 75 Then Level = B 35 ElseIf s = 60 Then Level = C Else Level = D End If 下面用 Select Case 結構改寫上述程序，使兩段程序所實現(xiàn)的功能完全相同，請?zhí)羁?。下面修改方案中正確的是 A）在 Dim n 語句的下面添加一句： n=O B）把 Print 口令輸入錯誤 amp。為此，某人在 Form1 窗體 53 文件中編寫如下程序： Private Sub Text1_KeyPress（ KeyAscii As Integer） If KeyAscii=13 Then If =Teacher Then =True Else =False End If End If End Sub 程序運行時發(fā)現(xiàn)剛輸入口令時就隱藏了 Form1，顯示了 Form2，程序需要修改。 Next End Sub Sub swap（ b（） As Integer） n=Ubound（ b） For i=1 To n / 2 t=b（ i）。要求在程序運行時，在 Form1的文本框 Text1 中輸入口令并按回車鍵（回車鍵的 ASCII 碼為 13）后，隱藏 Form1，顯示 Form2。 次 End If End Sub 希望程序運行時得到左圖所示的效果，即：輸入口令，單擊“確認口令”命令按鈕，若輸入的口令不是“ 123456”，則在窗體上顯 示輸入錯誤口令的次數(shù)。請?zhí)羁?。要求程序運行后，圓每秒向右移動 100，當圓遇到 Line2 時則停止移動。 numb 27 End Sub 連續(xù) 3 次調用 var_dim 過程，第 3 次調用時的輸出是 C） 6 1 （ 23）在窗體上畫 1 個命令按鈕，并編寫如下事件過程： Private Sub Command1_Click() For i = 5 To 1 Step Print Int(i)。若原文本長度大于 n，則只對前 n 個字符加密，后面的字符不變；若原文本長度小于 n，則在后面補字符 ―*‖使文本長度為 n 后再加密。 （ 2）軟件測試可分為白盒測試和黑盒測試。程序運行后，要求 ―宋 5 體 ‖單選按鈕和 ―粗體 ‖復選框被選中，則以下能夠實現(xiàn)上述操作的語句序列是 D A) = False = True B) = True = 0 C) = True = 2 D) = True （ 17）在窗體上畫一個名稱為 Command1 的命令按鈕，然后編寫如下事件過程： Private Sub Command1_Click() c = 1234 c1 = Trim(Str(c)) For i = 1 To 4 Print Next End Sub 程序運行后，單擊命令按鈕，要求在窗體上顯示如下內(nèi)容： 1 12 123 6 1234 則在橫線上應填入的內(nèi)容為 A ARight(c1,i) B)Left(c1,i) C)Mid(c1,I,1) D) Mid(c1,i,i) (18)假定有以下程序段 For i=1 to 3 For j=5 to 1 step