1、.浙江省永嘉縣碧蓮中學2019-2019學年高二信息技術上學期期中試題溫馨提示：所有試題答案都要答在答題卡上，答在試卷上的答案無效，總分50分！一、單項選擇題每題3分，共30分1計算表達式Val"10" + Len"2.3"的值是 A.12.3 B.102.3 C. 102 D.132. 以下選項中，可以作為VB變量名的是A9x Bx_9 C9_x Dfunction3. 在Visual Basic中，語句TName.Caption = "2019倫敦"中的TName是A 對象名 B屬性名 C屬性值 D事件名4以下Visual Bas

2、ic表達式的值等于56的是AMid"1234567",5,3 BLen"55" + 1 CSqr56 DAbs-55 + 15.以下程序段是實現x*yx、y均為自然數運算的程序段，那么劃線處的語句應該是 x=ValText1.Texty=ValText2.Texts = 0:j = 1Do While j <= y j = j + 1LoopText3.Text=StrsAs=s *j Bs=s+x Cs=x*j Ds =s*x6. 使用選擇排序的方法對數據8、6、1、9、4 從大到小排序，需要進展數據比較、數據互換的次數分別是A、4,5 B、10

3、,2 C、3,3 D、10,47. 有一個數組，采用冒泡排序，第一遍排序后的結果為：4，10，5，32，6，7，9，17，24那么該數組的原始順序不可能的是 A10，5，32，6，7，9，17，24，4B 10，5，32，6，7，9，4，17，24C10，5，32，4，6，7，9，17，24D 4，10，5，32，17，9，24，6，78. for i=1to 2For j=5 to i+1 step -1 If aj>ai then t=aj:aj=ai:ai=t end ifnext jnext i數組元素a1到a5的值一次為：33 24 45 16 77 經過該程序段加工后，數組元

4、素a1到a5的值依次為：A. 77 33 45 16 24 B. 77 45 33 16 24C. 77 24 45 16 33 D. 77 45 33 24 169Private Sub Command1_Clickn = 100: Sum = 0: k = 1 Do while k<=n j=1 Do while j<=k sum=sum+1:j=j+1 Loop k=k*2 Loop End sub該字段運行后，變量sum的值是A.256 B. 255 C.128 D. 127 10.有如下 VB 程序段：Dim p As Integer, q As Integer, s A

5、s Integer, t As Integerp = ValText1.Text :t=0For q = p+ 1 To 2 * ps = p * q Mod q - pIf s = 0 Thent = t+ 1End IfNext qLabel1.Caption = Strt該程序段運行時，在文本框Textl中輸入8 , 那么在標簽Labell中顯示的內容是 A. 3 B. 4 C. 5 D. 6二、非選擇題11題每空2分，12題 6 分，共20分11.n個數據元素存放到數組an中，對這n個數據進展降序排序算法程序段如下： For i=1 to n-1 For j=n to _step -1

6、 If_then t=aj: _: aj-1=t end if next j next in個數據元素存放到數組an中，對這n個數據進展升序排序算法程序段如下： For i=1 to n-1 k=_ For j=_ to n If_then k=j Next j If _then t=ai: ai=ak: ak=t end if next i12.有如下程序段：Dim a1 to 5 as integer ,s as string a1=77:a2=73:a3=87: a4=80:a5=66 i=1 : n=5 Do while i<=3 j=1 Do while j<=n-i If aj>aj+1 then aj=aj+aj+1:aj+1=aj-aj+1:aj=aj-aj+1 End if