题目内容

下面定义窗体级变量a的语句中错误的是

A. Dim a%
B. Private a%
C. Private a As Integer
D. Static a%

查看答案

搜索结果不匹配？点我反馈

更多问题

有如下程序：
Option base 1
Private Sub Command1_Click
Dim arr(10)
Arr=Array(10,35,28,90,54,68,72,90)
For Each a In arr
If a＞50 then
Sum=sum+a
End If
Next a
End Sub
运行上述程序时出现错误，错误之处是

A. 数组定义语句不对，应改为Dim arr
B. 没有指明For 循环的终值
C. 应在For语句之前增加sum=0
D. Next a 应改为next

请在“答题”菜单上选择相应的命令，完成下面的内容：
注意：下面出线“考生文件夹”均为K:\k12\150031011
1. 浏览GTTP://LOCALHOST/DJKS/CaeIntro.htm页面，找到“查看更多汽车品牌标志”链接，打开并浏览该页面，并为该页面创建桌面快捷方式，然后将该页面的桌面快捷方式保存到考生目录下，并删除桌面快捷方式。
2. 接收并阅读来自朋友小赵的邮件（zhaoyu@sudu.com），主题为：“生日快乐”。将邮件中的附件“生日贺卡.jpg”保存到考生目录下，并回复该邮件，回复内容为：“贺卡已收到，谢谢你的祝福，也祝你天天幸福快乐！”。

关于IP地址的描述中，正确的是
A）IP地址可以代替MAC地址
B）一条物理连接只能绑定一个IP地址
C）IP地址是路由的依据
D）IP地址由48位二进制组成

要求产生10个随机整数，存放在数组Arr中，从键盘输入要删除的数组元素的下标，将该元素中的数据删除，后面元素中的数据依次前移，并显示删除后剩余的数据，现有如下程序：
Option base 1
Private Sub Command1_Click()
Dim arr(10)as integer
For i=1 to 10 ‘循环1
Arr(i)=int(rnd*100)
Print arr(i);
Next
X=inputbox(“输入1-10的一个整数：”)
For i=x+1 to 10 ‘循环2
Arr(i-1)=arr(i)
Next
For i=1 to 10 ‘循环3
Print arr(i);
Next
End Sub
程序运行后发现显示的结果不正确，应该进行的修改是

A. 产生随机数时不使用int函数
B. 循环2的初始值应为i-x
C. 数组定义改为Dim a(11)as integer
D. 循环3的循环终值应改为9