2018-2019學年浙江省金華市云富高級中學高一（上）第一周周考信息技術試卷
發布：2024/12/26 14:30:2
一、選擇題（本大題共20小題，每小題2分，共40分，每小題列出的四個選項中只有一個是符合題目要求，不選、錯選、多選均不得分．）
-
1．在求解“一元二次方程實數根”的算法中，如果方程不存在實數解，也要求輸出結果“無實數根”。此 要求主要體現了算法特征中的（ ）
組卷：4引用：1難度：0.8 -
2．不能用算法描述“輸出所有完全數”是因為這不符合算法特征中的（ ）
組卷：4引用：1難度：0.8 -
3．在設計程序界面時，應使用題圖所示“控件工具箱”中的添加文本框 Text1．（ ）
組卷：3引用：1難度：0.7 -
4．某 VB 應用程序界面如圖所示，該應用程序窗體中對象（不包含窗體本身）有（ ）組卷：2引用：1難度：0.6 -
5．在 VB 中，某個對象的屬性窗口如圖所示：有關這個對象的說法錯誤的是（ ）
組卷：2引用：1難度：0.4 -
6．在 VB 中，在文本框 Text6 中顯示“云富高中“，應改變的屬性是（ ）
組卷：2引用：2難度：0.5 -
7．在 VB 中，在標簽 Lab1 中顯示“云富高中“，應改變的屬性是（ ）
組卷：1引用：1難度：0.5 -
8．在 VB 中，在窗體 From1 標題中顯示“云富高中“，應改變的屬性是（ ）
組卷：3引用：1難度：0.5
.附加題（加量不加分）
-
23．現要求編寫 VB 程序實現如下功能：在文本框 Textl 中輸入正整數 n （n 為奇數），單擊“生成”命令 按鈕后，如圖所示，在文本框 Text2 中會顯示一個有規律的對稱數字串，形式為“1 3 …n-2 n n-2 3 1“。例如 n=9 時，顯示的數字串為“1 3 5 7 9 7 5 3 1”
（1）根據代碼可知，命令按鈕“生成”的對象名是。
（2）實現上述功能的 VB 程序如下。請在橫線處填入合適代碼。Private Sub Com1 _Click （ ）
Dim n As Integer,i As Integer,s As String
①
s=““
For i=1 To n
Ifi＜=n\2+1Then s=s+Str （2*i-1）
Else
s=s+②End If
Next i
③End Sub組卷：1引用：1難度：0.6 -
24．小明設計了一個 VB 程序，實現功能如下：在文本框 Text1 中輸入一個學生成績，單擊“判定成績等級”按鈕，在 Label3 中輸出該成績的等級。運行界面如圖所示：
（1）若將 Text1 的名稱改為“Txt”，則應修改文本框的屬性。
（2）為實現上述功能，請在下橫線處填入合適的代碼。
Private Sub Command1_Click （ ）
Dim x As Integer
x=①
If x＞=90 Then
Label3．Caption=“A“ElseIf x＞=80 Then
Label3．Caption=“B“ElseIf x＞=60 Then
Label3．Caption=“C“ElseIf x＞=55 Then
Label3．Caption=“D“
②
Label3．Caption=“E“End If
End Sub組卷：0引用：1難度：0.7