下列程序执行后,a(n) 与b(n) 结果为______。 Dim a(10), b(10) As Integer n = 3 For i = 1 To 5 a(i) = i b(n) = 2 * n + i Next i
A.13 4
B.3 11
C.1 13
D.2 33
- · 有4位网友选择 B,占比40%
- · 有4位网友选择 D,占比40%
- · 有2位网友选择 A,占比20%
A.13 4
B.3 11
C.1 13
D.2 33
A、0
B、1
C、3
D、5
A、4321
B、12
C、34
D、1234
A、VB语言
B、VB.Net语言
C、C++语言
D、C#语言
A、-24 2
B、356 4
C、345 1
D、356 3
请使用Visual Studio作为程序的开发环境,将源代码粘贴到答题的文本编辑框中(无需提交附件)。 编写一个分数统计的程序。通过文本框TextBox1接受10个考试成绩的输入,单击“统计”命令按钮(Button1)后,统计优秀(90~100分)、良好(80~89分)、中等(70~79分)、及格(60~69分)、不及格(0~59分)的人数,统计结果显示在标签中Label1~Label5中。程序界面如下图所示。提示: 1)定义一个有10个数据元素的整型数组intScore来存放10个成绩。定义一个计数变量intNum来记录已输入的数据的个数。intScore和intNum需要定义为模块级的量,即需要定义在事件过程的上方。 2)编写文本框TextBox1的KeyPress事件过程来向数组中输入数据,用户输入回车表示一个数据输入完毕。(此段代码与9.3节的第2个视频的例子代码很相像,请看这个视频) If e.KeyChar = vbCr Then If intNum > 9 Then MsgBox("数据个数已满!不能再输入") TextBox1.Text = "" Exit Sub End If intScore(intNum) = Val(TextBox1.Text) intNum = intNum + 1 TextBox1.Text = "" End If 3)编写命令按钮Button1的Click事件过程来进行数据统计。 第一步:定义5个整型变量作为各档次人数的计数变量(注意,不要为变量起名为:e,因为e是这个事件过程的参数)。 第二步:通过循环依次读取数组中的数据元素,判断它的取值范围,并将相应的计数变量的值加1。 For i = 0 To 9 判断Score(i)的取值范围,并将相应的计数变量的值加1 Next 第三步:将计数变量的值依次显示在标签Label1~Label5中。
A、02468
B、0011223344
C、01234
D、都不对
A、ReDim语句只能更改一维数组的大小
B、它和Dim语句一样,可以定义数组的大小,可以写在程序的任何地方
C、ReDim语句是一种非执行语句
D、它只能用于过程内部
A、ReDim a(6)
B、ReDim Preserve a(6)
C、ReDim a(5)
D、ReDim Preserve a(5)
为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!