資源簡介

信息技術（九年級上） 試題卷
第一部分：筆試試題（60分）
一、選擇題（每題3分，共30分）
1、下列不屬于計算機語言的高級語言的是 （ ）
A、BASIC語言 B、C語言 C、PhotoShop D、.Java
2、VB程序在保存工程的時候生成的工程文件后綴名是 （ ）
A、.frm B、.vbp C、.exe D、pdf
3、想要改變對象的文字顏色，我們可以修改以下哪個屬性值來實現 （ ）
A、BackColor B、BackStyle C、FontSize D、FonrColor
4、下列對象不具有Caption屬性的是 （ ）
A、Label B、Form C、Command D、Text
5、下列VB賦值語句中不正確的的是 （ ）
A、Text1.Text = Str(x) B、x =Val（text1.text）C、a = - b D、Label1.Caption=“你好”
6、由“For i=1 To 10 Step 2”決定的循環結構被執行的次數是 （ ）
A、3 B、4 C、5 D、6
7、下列常用函數中表示求x的算數平方根的是 （ ）
A、val（x） B、str（x） C、sqr（x） D、cint（x）
8、在for-----next 循環結構的語句中的循環變量可以是 （ ）
A、integer B、single C、string D、boolean
9、我們在優化“海倫公式求三角形面積”程序，判斷a、b、c三邊能否構成三角形條件是：a+b>c，b+c>a,a+c>b三個條件同事滿足，在VB程序中表示該條件的邏輯表達式是 （ ）
A、a+b>c，b+c>a, a+c>b B、（a+b）>c and（b+c）>a and（a+c）>b
C、（a+b）>c or（b+c）>a or（a+c）>b D、a+b>c or b+c >a or a+c >b
10、以下VB程序段運行后，x的值是 （ ）
Dim x As Interger
X = 1
Do While x < 50
x = ( x + 1 )*( x + 2 )
Loop
A、50 B、56 C、72 D、6

二、綜合題（1每空2分，2每空5分，3每空4分，共30分）
① ② ③
④ ⑤ ⑥
⑦ ⑧ ⑨
1、填空⑴計算機程序一般可以分為三種結構：順序結構、 ① 結構和 ② 結構。
⑵自從1946年出現第一臺電子計算機以來，計算機技術以驚人速度發展著。計算機語言也從 ③ ，發展到 ④ ，再發展到高級語言。
2、完成流程圖

3、窗體上有四個文本框Text1控件數組，兩個按鈕Command1和Command2。程序功能是解一個一元二次方程ax2+bx+c=0（a≠0）。程序運行后如圖所示。給定的程序不完整，將程序補充完整。
Private Sub Command1_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
End Sub
Private Sub Command2_Click()
Dim a As Single, b As Single, c As Single
Dim x1 As Single, x2 As Single, det As Single
a = Val(Text1.Text)
b = Val(Text2.Text)
c = Val(Text3.Text)
det = ⑦ ‘（根的判別式b2-4ac）
Select Case det
Case Is > 0
x1 = (-b + Sqr(det)) / (2 * a)
x2 = (-b - Sqr(det)) / (2 * a)
Text4.Text = "方程有兩個實數根" & " x=" & Str(x1) & " x=" & Str(x2)
Case Is = 0
Text4.Text = "方程有兩個相等的實數根 x=" & Str(x1)
Case ⑧
Text4.Text = "此方程無實數根"
⑨
End Sub
第二部分：上機操作題（40分）
用vb程序實現：過年的時候小李打算每個月都把一部分零花錢存起來，第一個月他存了10元，他準備以后每個月都比上個月多存2元。請問當小明的存錢達到1000元以上要幾個月？

筆試題
一、選擇題（每題3分，共30分）

1 C 2 B 3 D 4 D 5 D
6 C 7 C 8 A 9 B 10 B


二、綜合題（1每空2分，2每空5分，3每空4分，共30分）
①分支 ②循環 ③機器
④匯編 ⑤i≤n ⑥i ← i+1
⑦b*b-4*a*c ⑧else （或Is<0） ⑨end select

操作題
Private Sub Command1_Click()
Dim x As Integer, n As Integer, i As Integer
n = 10
i = 0
x = 0
Do While x < 1000
x = x + n
n = n + 2
i = i + 1
Loop
Print i & "個月"
End Sub
運行結果： 28個月
















命題說明
一、命題意圖說明
在本次命題過程中始終遵循“導向性、基礎性、規范性、創新性”四個原則，把握好試卷分值、試卷難度系數和考試時間長度的指標要求，本著以學生發展為本的理念，題型豐富，設計合理，做到了試卷內容與所使用的教材、考查大綱所列舉的知識細目要求的基本一致。
在命題中，考核的學科能力以知識與技能、過程與方法、情感態度與價值觀三維目標為主要內容，包括對觀察能力、記憶能力、操作能力、分析和解決問題的能力考核，對考核內容的掌握程度從知識性方面進行了識記、領會、應用三個層次的考核，從技能性方面進行了“模仿制作”、“獨立創作”、“綜合應用”三個層次的考核。
命題導向
1.試題要以兼顧三維教學目標為導向。
2.試題要以強調學生解決實際問題的能力為導向。
3.試題要以考核學生的信息技術學業質量水平為導向。
4.重視信息技術課程中的專業術語，促進教學的規范性和專業性。
三、命題設想
本份試卷，考查的是浙教版2015年版九年級課本內容，涵蓋了課本上的第一第二單元的知識與技能，目的在于考核學生對九年級所學的基礎知識、基本操作技能的理解和掌握程度，以及學生運用此階段所學知識和技能解決學習和生活中實際問題的能力與水平。理論部分考查學生了解算法和流程圖基本知識，掌握VB的基本技能情況；操作部分考查學生運用VB軟件編程的能力。命題緊扣基礎知識和基本操作技能，適當降低難度，整體試卷的難度系數大概0.75，在整個試卷中，沒有偏題和怪題。
四、試卷結構特點
整份試卷包含理論卷和操作卷兩部分，理論卷面分值60分，答題時間25分鐘，題型為判斷題10題，30分，綜合題3題，30分。操作卷面分值40分，答題時間35分鐘，由兩部分組成，第一部分：窗體設計，分值14分；第二部分：程序編輯，分值26分。
五、內容模塊與難度分布：


題型 題號 單元 難度( A-容易B-中等 C-較難） 具體章節
第一單元 第二單元
單項選擇題 1 √ A 第一課：生活與算法
2 √ A 第三課：初識Visual Basic
3 √ A 第三課：初識Visual Basic
4 √ B 第四課：Visual Basic控件
5 √ B 第五課：順序結構
6 √ A 第八課：循環結構—FOR循環
7 √ A 第五課：順序結構
8 √ B 第八課：循環結構—FOR循環
9 √ B 第六課：分支結構
10 √ C 第九課：循環結構—DO循環
綜合題 1 √ √ A 第一課 第二單元
2 √ √ B 第二課 第八課
3 √ B 第七課：多分支結構
操作題 1 √ B 窗體設計
2 √ C 第九課：循環結構—DO循環
試題說明
一、選擇題（每題3分，共30分）
1、下列不屬于計算機語言的高級語言的是 （ ）
A、BASIC語言 B、C語言 C、PhotoShop D、.Java
考察學生對高級語言的了解，針對課本第一課內容
2、VB程序在保存工程的時候生成的工程文件后綴名是 （ ）
A、.frm B、.vbp C、.exe D、pdf
考察學生對VB文件的保存，針對課本第三課內容
3、想要改變對象的文字顏色，我們可以修改以下哪個屬性值來實現 （ ）
A、BackColor B、BackStyle C、FontSize D、FonrColor
考察學生對對象屬性的修改，針對課本第三課內容
4、下列對象不具有Caption屬性的是 （ ）
A、Label B、Form C、Command D、Text
考察學生對屬性的了解，針對課本第四課內容
5、下列VB賦值語句中不正確的的是 （ ）
A、Text1.Text = Str(x) B、x =Val（text1.text）C、a = - b D、Label1.Caption=“你好”
考察學生對對賦值預言的掌握，針對課本第五課內容

6、由“For i=1 To 10 Step 2”決定的循環結構被執行的次數是 （ ）
A、3 B、4 C、5 D、6
考察學生對for循環的循環變量的特點的掌握，針對課本第八課內容
7、下列常用函數中表示求x的算數平方根的是 （ ）
A、val（x） B、str（x） C、sqr（x） D、cint（x）
考察學生對常用函數的認識，針對課本第五課內容
8、在for-----next 循環結構的語句中的循環變量可以是 （ ）
A、integer B、single C、string D、boolean
考察學生對循環變量的認識，針對課本第八課內容
9、我們在優化“海倫公式求三角形面積”程序，判斷a、b、c三邊能否構成三角形條件是：a+b>c，b+c>a,a+c>b三個條件同事滿足，在VB程序中表示該條件的邏輯表達式是 （ ）
A、a+b>c，b+c>a, a+c>b B、（a+b）>c and（b+c）>a and（a+c）>b
C、（a+b）>c or（b+c）>a or（a+c）>b D、a+b>c or b+c >a or a+c >b
考察學生如何運用邏輯表達式，針對課本第六課內容
10、以下VB程序段運行后，x的值是 （ ）
Dim x As Interger
X = 1
Do While x < 50
x = ( x + 1 )*( x + 2 )
Loop
A、50 B、56 C、72 D、6
考察學生對do循環的掌握，針對課本第九課內容

二、綜合題（1每空2分，2每空5分，3每空4分，共30分）
① ② ③
④ ⑤ ⑥
⑦ ⑧ ⑨
1、填空⑴計算機程序一般可以分為三種結構：順序結構、 ① 結構和 ② 結構。
⑵自從1946年出現第一臺電子計算機以來，計算機技術以驚人速度發展著。計算機語言也從 ③ ，發展到 ④ ，再發展到高級語言。
考察學生對計算機語言的發展以及計算機程序的三種結構的掌握



2、完成流程圖

考察學生對流程的認識和do循環的掌握，針對課本第二、九課內容


3、窗體上有四個文本框Text1控件數組，兩個按鈕Command1和Command2。程序功能是解一個一元二次方程ax2+bx+c=0（a≠0）。程序運行后如圖所示。給定的程序不完整，將程序補充完整。
Private Sub Command1_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
End Sub
Private Sub Command2_Click()
Dim a As Single, b As Single, c As Single
Dim x1 As Single, x2 As Single, det As Single
a = Val(Text1.Text)
b = Val(Text2.Text)
c = Val(Text3.Text)
det = ⑦ ‘（根的判別式b2-4ac）
Select Case det
Case Is > 0
x1 = (-b + Sqr(det)) / (2 * a)
x2 = (-b - Sqr(det)) / (2 * a)
Text4.Text = "方程有兩個實數根" & " x=" & Str(x1) & " x=" & Str(x2)
Case Is = 0
Text4.Text = "方程有兩個相等的實數根 x=" & Str(x1)
Case ⑧
Text4.Text = "此方程無實數根"
⑨
End Sub
考察學生編程能力對多分支結構的掌握，針對課本第七課內容


第二部分：上機操作題（40分）
用vb程序實現：過年的時候小李打算每個月都把一部分零花錢存起來，第一個月他存了10元，他準備以后每個月都比上個月多存2元。請問當小明的存錢達到1000元以上要幾個月？
考察學生的窗體的布局和編程能力，以do循環進行考察



選擇題
每個3分共30分


綜合題共30分
第一題每空2分，
第二題每空5分，
第三題每空4分，


操作題共40分
窗體布置
1、2兩處修改文字 4分
3處要求選擇文體顏色藍色、字體大小4號 6分
4處要求更換所給的圖片作背景 4分
Private Sub Command1_Click()
Dim x As Integer, n As Integer, i As Integer 定義正確3分
n = 10 1分
i = 0 1分
x = 0 1分
Do While x < 1000 do---loop 格式對7分
x = x + n 2分
n = n + 2 2分
i = i + 1 2分
Loop
Print i & "個月" ' 7分
無& "個月" 5分
或者寫成text1.text=str(i) & "個月"等語句的 4分

End Sub
運行結果： 28個月

展開更多......

收起↑