学进去-教育应平等而普惠
试题
类型:填空题
难度系数:0.40
所属科目:高中信息技术
老王用VB编写了一个程序实现求第k(1≤k≤n)大的数。程序运行时,单击“获取成绩”按钮Command1得到n个学生成绩(百分制)保存在cj(1)~cj(n)中,并显示在List1中。在文本框Text1中输入k的值,单击“查找”按钮Command2,在标签Label1中显示第k大的数。程序运行界面如图所示。

(1)为使程序开始运行时,窗体标题自动更改为“查找第K大的数”, 则可在_____________(单选,填字母:A. Command1_Click()/ B. Form_Load()/C. Form1.Load())事件处理过程中添加语句Form1.Caption=“查找第k大的数”。
(2)请在划线处填入合适代码。
(3)加框处的程序代码有错,应改为_________
Dim cj(0 To 1000)As Integer,n As Integer
Private Sub Command1_Click()
       ‘从数据库中读取n个学生的成绩并存储在cj数组中,代码略
End Sub
Private Sub Command2_Click()
Dim b(0 To 100) As Integer
Dim t(0 To 100) As Integer
Dim x as Integer
k = Val(Text1.Text)
For i = 1 To n
   ________        
          b(x) = b(x) + 1
Next i

For i = 99 to 0 step -1

If   k <= t(i+1)   Then Exit For

________        


Next i
Label1.Caption = "第k大的数为"+ ______     
End Sub
编辑解析赚收入
收藏
|
有奖纠错

同类型试题

优质答疑

y = sin x, x∈R, y∈[–1,1],周期为2π,函数图像以 x = (π/2) + kπ 为对称轴
y = arcsin x, x∈[–1,1], y∈[–π/2,π/2]
sin x = 0 ←→ arcsin x = 0
sin x = 1/2 ←→ arcsin x = π/6
sin x = √2/2 ←→ arcsin x = π/4
sin x = 1 ←→ arcsin x = π/2

用户名称
2019-09-19

y = sin x, x∈R, y∈[–1,1],周期为2π,函数图像以 x = (π/2) + kπ 为对称轴
y = arcsin x, x∈[–1,1], y∈[–π/2,π/2]
sin x = 0 ←→ arcsin x = 0
sin x = 1/2 ←→ arcsin x = π/6
sin x = √2/2 ←→ arcsin x = π/4
sin x = 1 ←→ arcsin x = π/2

用户名称
2019-09-19
我要答疑
编写解析
解析:

奖学金将在审核通过后自动发放到帐

提交
我要答疑
我要答疑:
提交