- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 算法实例
- 面向对象程序设计 VB开发工具
- 算法实例的程序实现
- 算法及算法的表示方法
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
在VB中,下列程序段执行后,语句s=s+2执行的次数是( )
s=0
For i=1 To 3
Print s
s=0
For i=1 To 3
s=s+2
Next iPrint s
A.1次 | B.2次 | C.3次 | D.4次 |
为了安排寝室,需要将学生按性别分类。小陈设计了一个VB程序,运行该程序,单击“数据导入”按钮Command1后,左侧列表框List1中显示40位学生的编号和性别;然后单击“数据处理”按钮Command2,中间列表框List2中显示所有女生的信息,右侧列表框List3中显示所有男生的信息,并在相应的列表框下方显示人数。运行结果如下图所示。

实现上述功能的VB程序段如下,分析回答下列问题。
Dim a(1 To 40) As String '数组a用于存储学生编号
Dim b(1 To 40) As String '数组b用于存储学生性别
Private Sub Command1_Click
Dim i As Integer
List1.Clear
List2.Clear
List3.Clear
'在列表框List1中显示40位学生的编号和性别
For i=1 To 40
.AddItem a(i)+” ”+b(i) ①
Next i
End Sub
Private Sub Command2_Click
Dim n As Integer '用于存储女生人数
Dim m As Integer '用于存储男生人数
Dim i As Integer
List2.Clear
List3.Clear
n=0: m=0
For i=1 To 40
If b(i)=”女” Then
List2.AddItem a(i) '在列表框List2中显示女生信息
n=n+1
Else
List3.AddItem a(i) '在列表框List3中显示男生信息

②
End If
Next i
Label1.Caption=”女生人数:”+Str(n)
Label2.Caption=”男生人数:”+Str(m)
End Sub
(1)小陈将学生的编号和性别分别存放在数组a和数组b中,这段代码书写在窗体的加载事件中,下列属于该事件的是(____)
(2)①和②加边框处分别有误,根据题意修改源代码,①处应修改为________,②处应修改为__________

实现上述功能的VB程序段如下,分析回答下列问题。
Dim a(1 To 40) As String '数组a用于存储学生编号
Dim b(1 To 40) As String '数组b用于存储学生性别
Private Sub Command1_Click
Dim i As Integer
List1.Clear
List2.Clear
List3.Clear
'在列表框List1中显示40位学生的编号和性别
For i=1 To 40

Next i
End Sub
Private Sub Command2_Click
Dim n As Integer '用于存储女生人数
Dim m As Integer '用于存储男生人数
Dim i As Integer
List2.Clear
List3.Clear
n=0: m=0
For i=1 To 40
If b(i)=”女” Then
List2.AddItem a(i) '在列表框List2中显示女生信息
n=n+1
Else
List3.AddItem a(i) '在列表框List3中显示男生信息

②
End If
Next i
Label1.Caption=”女生人数:”+Str(n)
Label2.Caption=”男生人数:”+Str(m)
End Sub
(1)小陈将学生的编号和性别分别存放在数组a和数组b中,这段代码书写在窗体的加载事件中,下列属于该事件的是(____)
A.Form_Click | B.Command1_Click |
C.Form_Load | D.Form_Unload |
有如下Visual Basic程序段:
a=2
b=4
c=3
m=a
If b>a Then m=b
If c>m Then m=c
该程序段运行后,变量m的值是
a=2
b=4
c=3
m=a
If b>a Then m=b
If c>m Then m=c
该程序段运行后,变量m的值是
A.2 | B.3 | C.4 | D.5 |