相关试卷
- 上海市浦东新区上海师范大学附属中学2024-2025学年高一上学期10月期中信息技术试题
- 海南省临高县第二中学2024-2025学年高一上学期期中考试信息技术试题
- 浙江省衢州市2024-2025学年高一下学期6月教学质量检测（期末）技术试题-高中信息技术
- 浙江省宁波市2024-2025学年高二下学期期末考试技术试题-高中信息技术
- 浙江省舟山市2024-2025学年高二下学期6月期末技术试题-高中信息技术
- 浙江省丽水市2024-2025学年高二下学期期末教学质量监控技术试题-高中信息技术
- 浙江省浙南名校联盟2024-2025学年高二下学期期末联考技术试题-高中信息技术
- 浙江省宁波市九校2024-2025学年高二下学期期末考试技术试题-高中信息技术
- 2025届浙江省Z20联盟（名校新高考研究联盟）高三下学期第三次联考技术试题-高中信息技术
- 2025届浙江省强基联盟高三下学期三模技术试题-高中信息技术
-
1、现在主板上的内存插槽一般都有两个以上，如果不能插满，则一般优先插在靠近（ ）的插槽中。A、CPU B、显卡 C、声卡 D、网卡
-
2、接通电源后，计算机自动搜索计算机中的硬件设备的状态，这一步骤称为（ ）A、系统重设 B、扫描病毒 C、系统监控 D、POST自检
-
3、在Phoenix-Award的BIOS报警声中，下列哪一项表示系统启动正常（ ）A、1短 B、1短1短1短 C、不停地响 D、2短1短1短
-
4、评定主板的性能首先要看（ ）A、CPU B、芯片组 C、主板结构 D、内存
-
5、目前速度最快的显卡传输接口为（ ）A、PCI B、AGP C、ISA D、PCI-Express
-
6、CMOS的中文解释正确的是（ ）A、基本输入/输出系统 B、摄像头的感光元件 C、互补金属氧化物半导体 D、射频积体电路
-
7、用随机数产生50个[10,100]不重复的正整数放入数组,从小到大排序,每行输出10个数。
Private Sub Command1Click()
Dim a(1 To 50) As Integer, i%, j%, t%, p%, n%, x%
n=0
Randomize
Do While n<50
x=
For i= 1 To n
If Then Exit For
Next i
If i> n Then
a(n)=x
End If
Loop
For i= 1 To 49
For j=i+ 1 To 50
If a(p)> a(j) Then
Next j
t= a(p): a(p) = a(i): a(i)=t
Next i
For i= I To 50
Print a(i);
if Then Print
Next i
End Sub
-
8、以下程序suixian可以判断某个数字是否为水仙花数，所谓“水仙花数”是指一个3位数，其各个数字立方和等于该数本身。
Private Sub Command1_Click( )
Dim i As Integer
For i = 100 to 999
Next i
End Sub
Public Sub suixian(x As Integer)
Dim i%,j%,k%
i =
j = (x -i * 100)\10
k =
If Then Print x
End Sub
-
9、编写事件过程并满足以下要求:单击命令按钮1,产生50个[50, 300]随机整数并显示在列表框1中，单击命令按钮2,在列表框2中显示上述随机整数中的所有大于100的数，并在列表框1中删除该数。如图所示。
Private Sub Command1_ Click( )
Randomize
For i= 1 To 50
x =
List1.
Next i
End Sub
Private Sub Command2 _Click( )
For i= To 0 step -1
If Then
List2.AddItem
List1.
Next i
End Sub
-
10、窗体上有一个图片框Picture1，两个命令按钮Command1和Command2,如图所示。当单击命令按钮Command1时，在图片框中画出正弦函数，当单击命令按钮Command2时，清空图片框中的图像，请填空。
Private Sub Command1_Click()
Picture1.Scale (-6, 6)-(6, -6)
Picture1.DrawWidth = 5
For i = -6 To 6 Step 0.0001
Picture1. (i,)
End Sub
Private Sub Command2_Click()
Picture1.
End Sub
-
11、下面过程max()用于求3个数中的最大值，利用这个过程求5个数中的最大值，请填空。
Private Sub Command1_Click( )
Print “5个数34、124、68、73、352的最大值是：”
Max1 = max(34,124,68)
Max1 =
Print Max1
End Sub
Public Function max(ByVal a%,ByVal b%,ByVal c%)
If Then
M = a
Else
M = b
End If
If Then
Max = m
Else
End If
End Function
-
12、在过程调用中，参数的传递可分为传递和传递两种方式。
-
13、如果列表框的ListCount属性为20，则列表框的最后一项的Listindex值为。
-
14、根据数组中元素的个数是否可以变化，数组分为数组和数组。
-
15、Visual Basic提供了结构化程序设计的三种基本结构，三种基本结构是、和。
-
16、VB中的变量如果没有显示声明其数据类型，则默认为。
-
17、产生一个[20，50]范围内的随机数的表达式是。
-
18、在VB中设计程序时，能自动被检查出来的错误是（ ）A、语法错误 B、语法错误和逻辑错误 C、运行错误 D、逻辑错误
-
19、以下程序的运行结果是（ ）
Private Sub Form_Click( )
a= 1: b= 1
Print"A="; a; "B="; b
Call mult(a, b)
Print"A=";a; "B=";b
End Sub
Sub mult(x, y)
x=2* x
y=3*y
End Sub
A、A=1 B=1A=1 B=1
B、A=1 B=1A=1 B=3
C、A=1 B=1A=2 B=3
D、A=1 B=1A=2 B=1
-
20、在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编如事件过程:
Private Sub Command1_Click()
Dim array1(10, 10) As integer
Dim i As integer, j As integer
For i= 1 To 4
For j= 2 To 5
Array1(i, j)=i+j
Next j
Next i
Text1.Text = array1(2, 5) + array1(3, 4)
End Sub
程序运行后，单击命令按钮，在文本框中显示的值是（ ）
A、15 B、14 C、13 D、12