2011年浙江省高中信息技術會考試卷(14)
發(fā)布:2024/4/20 14:35:0
一、選題題(算法)
-
1.計算圓錐體體積的算法如下:
①輸入底面半徑r、高h
②pi=3.1416
③計算底面積s=pi?r2
④計算體積v=s?h/3
⑤輸出體積v
上述算法屬于( ?。?/h2>組卷:16引用:2難度:0.9 -
2.下列Visual Basic表達式的值等于127的是( ?。?/h2>
組卷:8引用:4難度:0.9 -
3.在Visual Basic中,用變量存儲120位員工工號 (如“A01036”),下列最合適的變量說明是( )
組卷:6引用:1難度:0.5
二、填空部分
-
10.小黃編制了一個Visual Basic程序,能根據(jù)輸入的城市名查找并顯示該城市的日照時間。程序運行界面如圖所示,左邊列表框List1中顯示各城市的日照時間和相應的城市名,在文本框Text1中輸入查找的城市名,單擊“查找”按鈕Command1,若找到,則在文本框Text2中顯示該城市的日照時間。程序中數(shù)組a和數(shù)組b分別存儲城市名和對應的日照時間。
程序代碼如下:
Const n As Integer=10'n為城市數(shù)
Dim a(1To n) As String'數(shù)組a存儲城市名
Dim b(1To n) As Single'數(shù)組b存儲日照時間
Private Sub Command1_Click ( )
Dim i As Integer,s As String's用于存儲輸入的城市名稱
Dim f As Boolean'f用于表示是否找到,當f=True時,表示未找到
s=Text1.Text
f=True
i=1
Do While i<=n And f
If
Text2.Text=Str(b(i))
f=False
End If
Loop
If f Then
Text2.Text=“沒有該城市數(shù)據(jù)“
End If
End Sub
Private Sub Form_Load ( ?。?br />'此過程用于對數(shù)組a和數(shù)組b進行賦值,并顯示在List1中,代碼略
End Sub
(1)解決此問題的算法是
(2)在程序①和②橫線處,填入適當?shù)恼Z句或表達式,把程序補充完整:
程序中①橫線處應填入
程序中②橫線處應填入組卷:0引用:1難度:0.1
三、操作題
-
11.打開考生文件夾下“VB”文件夾中的“test.jye.ai”,該VB程序的功能是:在列表框List1中顯示10位同學的身高,單擊“計算”按鈕Command1,計算平均身高,并顯示在文本框Text1中。程序運行界面如圖所示:
完成以下操作:
(1)將Label2標簽的Caption屬性值設置為“平均身高”。
(2)運行程序,發(fā)現(xiàn)統(tǒng)計出的平均身高值沒有顯示在Text1中,修改程序中的一處代碼修正此問題。調(diào)試程序正確,并保存窗體文件test。frm與工程文件test。vbp。組卷:1引用:1難度:0.6