题库 高中信息

题干

在VB中,表示窗体加载的事件名是
A.LoadB.ClickC.KeypressD.Dblclick
上一题 下一题 0.99难度 选择题 更新时间:2019-05-09 08:07:18

答案(点此获取答案解析)

同类题1

为了丰富学生业余生活,学校举办校园歌手大赛,邀请了5位音乐老师作为评委打分,打分的上限是10分。统计选手得分时,去掉一个最高分,再去掉一个最低分,取评委打分的平均值作为选手的最终得分。程序运行结果界面如图所示。

请分析任务,完成下列题目。
程序代码如下:
Private Sub Command1_Click()
Dim s, As single
Dim Max , Min ,I As Integer
Dim a(5) As Integer
Max = 0
Min =          
s = 0   
For i = 1 To 5
a(i) = InputBox("请输入第" & i & "个分数")
s = s + a(i)
If        Then Max = a(i)  
If  Min > a(i) Then Min = a(i)   
Next i
s =  
Text1.Text = Max
Text2.Text = Min
Text3.Text = s
End Sub
Private Sub Command2_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
End Sub
Private Sub Command3_Click()
End
End Sub
请分析任务,完成下列题目。
【小题1】在界面设计阶段,下列能清空文本框中内容的属性是
A.nameB.textC.fontD.value
【小题2】在界面设计阶段,当双击窗体上的“计算”命令时,所打开的窗口是
A.代码窗口B.属性窗口C.工具箱窗口D.工程资源管理器窗口
【小题3】下列控件在本程序窗体中用到的是
A.列表框B.单选按钮C.标签D.组合框
【小题4】为精确计算选手的最终得分,程序中变量s的数据类型应定义为
A.整型B.单精度型C.字符型D.布尔型
【小题5】在Visual Basic 6.0中,下列是窗体文件默认扩展名的是
A.vbpB.frmC.basD.exe
【小题6】程序中①所在位置表达式正确的是
A.0B.1C.5D.10
【小题7】程序中②所在位置表达式正确的是
A.Max < a(i)B.Max >a(i)C.Max =a(i)D.Max <> a(i)
【小题8】程序中③所在位置表达式正确的是
A.s/3B.(s+Max+ Min)/5C.(s - Max - Min) / 3D.(s - Max - Min) / 5
【小题9】在设计程序界面时,要把Command1命令按钮上显示的文字“计算”字体设成“微软雅黑”,下列Command1控件的属性应设置的是
A.CaptionB.FontC.DefaultD.name
【小题10】变量s所表示的含义是
A.最低分B.最高分C.评委打分D.最终得分
【小题11】当一个选分的得分分别为9,8,9,7,8的时候,下列最终得分计算正确的是
A.8B.8.33C.7.66D.7
【小题12】程序中Command1控件响应的事件是
A.单击事件B.双击事件C.载入事件D.活动事件
【小题13】程序中数组a(5)包含的元素个数是
A.1B.5C.6D.10
【小题14】程序“For i = 1 To 5 ……Next i”中“s = s + a(i) ”被执行的次数是
A.1B.4C.5D.6
【小题15】下图程序结构属于
A.顺序结构B.分支结构C.循环结构D.混合结构

同类题3

计算机在存储数字字符时,1个字符占1个字节(8位),现在有如下算法可以对数字字符的存储进行压缩:以每2个数字字符为一组,将其组成一个两位的十六进制数(如输入的“41”组成十六进制数41H),再转换为对应的ASCII字符进行存储。(注意:ASCII的最大值为127D,所以2个数字字符为一组时,第1个字符必须小于8,否则不合法)
例如:
输入
输出
414243
ABC
758927
不合法
 
小波用Visual Basic 6. 0软件编写了一个压缩程序,功能如下:在文本框Text1中输入需压缩数据(偶数个字符),单击“压缩”按钮,程序对压缩数据依次进行压缩处理,压缩数据显示在文本框Text2中。程序运行界面如图所示:

(1)结合程序代码,命令按钮“压缩”的对象名是_________________
(2)为实现上述功能,请在程序划线处填入合适的代码。
Private Sub cm1_Click()
Dim s1 As String,s2 As String,c1 As String,c2 As String
Dim i As Integer,k As Integer
s1 = Text1. Text
For i = 1 To Len(s1) Step 2

c1 = Mid(s1,i,1)

______________

If c1 >= “8” Then

s2 = “不合法”
Exit For  ‘跳出For循环

Else

k = _____________
s2 = s2 + Chr(k) ‘ Chr函数的作用,将ASCII码转换为字符,例Chr(65) = “A”

End If

Next i
Text2. Text = s2
End Sub
(3)若在文本框Text1中输入“61A2”,单击“压缩”按钮后,变量i的值为_________(单选,填字母:
A.3 /B.4 /C.5 /D.程序错误)。