以下程序的输出结果是【】。x=12.7x=Int(x+0.5)Print X
以下程序的输出结果是【 】。
x=12.7
x=Int(x+0.5)
Print X
以下程序的输出结果是【 】。
x=12.7
x=Int(x+0.5)
Print X
第1题
下列程序执行时,从键盘上依次输入123和234,则程序的输出结果是【 】。
Dim a,b As Integer
a=InputBox("请输入第一个整数")
b=InputBox("请输入第二整数")
Print a+b
第4题
体中有一个组合框和一个命令按钮,如下图所示。
程序的功能是:在运行时,如果在组合框中输入一个项目并单击命令按钮,则搜索组合框中的项目,如果没有此项,则把此项添加到列表中;如果有此项,则弹出提示:“此项已存在”,然后清除输入的内容。
要求:
去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序的其他部分,也不得修改控件的属性。最后原名保存修改后的文件。
第5题
上有一个名称为Cmd1,标题为“输出大于1000的整数之和”的命令按钮。其功能是产生40个0~2000的随机整数,放入一个数组中,然后输出这40个整数中大于1000的所有整数之和。程序运行后,单击命令按钮,即可求出这些整数的和,并在窗体上显示出来,如下图所示。
本程序不完整,请补充完整,并能正确运行。
要求:
去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序的其他部分。最后;按原文件名并在原文件夹中保存修改后的文件。
第6题
ex属性设为0。请为Cmd1设置适当的属性,使得当焦点在Text1上时,按Esc键就调用Cmd1的Click事件,该事件过程的作用是在文本框中显示Visual Basic,程序运行结果如下图所示。
注意:
程序中不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为 execise29.vbp,窗体文件名为execise29.frm。
第9题
别输入12和4,编写如下事件过程:
Private Sub Command1_Click()
A=InputBox("被除数")
B=InputBox("除数")
Print A;"÷";B;"=";A / B
End Sub
则窗体中显示的内容是______。
第10题
忆知数组A(4,4),各个元素在运行程序时被赋值并打印,形成四除非方阵。请在【 】和【 】处填处所需的内容,使产生一个转置矩阵(即行列互换),仍放在数组A中,并打印出来。例如:
1 2 3 4
1 2 3 4
1 2 3 4
l 2 3 4
1 1 1 1
2 2 2 2
3 3 3 3
4 4 4 4
Private Sub Command1_Click()
Dim a(4,4)
For k=1 To 4
For j=1 To 4
a(k,j)=j
Print a(k,j);
Next
Next
For k=2 To 4
For j=1 To【 】
t=a(j,k)
a(j,k)=【 】
a(k,j)=t
Next
Next
For k=1 To 4
Print a(k,1);a(k,2);a(k,3);a(k,4)
Next
End Sub
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!