计算机等级考试真题
选课中心 APP下载
当前位置:首页 > 技能类 > 计算机等级 > 考试真题 > 2020年计算机二级VB语言考试每日一练(7月15日)

2020年计算机二级VB语言考试每日一练(7月15日)

更新时间:2020-07-16 18:14:10 来源: 阅读量:

【摘要】 小编整理了2020年计算机二级VB语言考试每日一练(7月15日)的相关内容,下面一起来看看2020年计算机二级VB语言考试每日一练(7月15日)的具体内容吧,希望能够帮助到大家!

2020年计算机二级VB语言考试每日一练(7月15日)

2020年计算机二级VB语言考试每日一练(7月15日)

1.以下程序段的作用是(A)(单)

Private Sub Picture1_Click( )

Dim asci As Integer, i As Integer

i = 0

For asci = 32 To 126

Picture1.Print Tab(7 * i + 2); Chr(asci); "="; asci;

i = i + 1

If i = 7 Then i = 0: Picture1.Print

Next asci

A.打印ASCII码表,一行7个表达式

B.打印九九乘法表,一行7个表达式

C.打印ASCII码表,一行8个表达式

D.以上说法都不正确

2.我国现在人口有13亿,按人口增长0.8%计算,多少年后我国人口将超过26亿。

Private Sub Command1_Click( )

Dim x, n

x = Val(Text1)

n = 0

Do While 【x】<26

x = x * (1 + 0.008)

n = n + 1

Loop

Text2 = Str(n)

End Sub

3.以下程序的作用是(B)(单)

For i = 1 To 9

For j = 1 To 9

se = i & "×" & j & "=" & i * j

Picture1.Print Tab((j - 1) * 9 + 1); se;

Next j

Picture1.Print

Next i

A.打印ASCII码表

B.打印九九乘法表

C.打印加法表

D.以上说法都不正确

以上就是2020年计算机二级VB语言考试每日一练(7月15日)的内容,更多资讯请及时关注考必过网站,小编会第一时间发布考试最新消息,大家考试加油!

分享到: 编辑:dada