- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 程序设计语言
- 循环结构
- 分支结构
- 顺序结构
- 类、对象、属性、方法、事件和事件处理的概念
- VB应用程序的界面设计与调试
- 基本数据类型
- 常量、变量、数组
- + 常用的标准函数
- 基本运算及表达式
- 赋值语句
- 选择语句
- 循环语句
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
产生一个在[-10,99]中随机整数的VB表达式是
A.int (rnd*100) -10 | B.int(rnd*99)-10 |
C.int(rnd*109)-10 | D.int(rnd*110)-10 |
下面这个程序实现了把一个十进制数转换成八进制数。

(1)要是按钮命令显示文本改为“转换”可在属性窗口中__________属性的属性值改为“转换”。
(2)为实现上述功能,请在划线处填入合适代码。

(1)要是按钮命令显示文本改为“转换”可在属性窗口中__________属性的属性值改为“转换”。
(2)为实现上述功能,请在划线处填入合适代码。
Private Sub Command1_Click( )
Dim n, m As Integer
Dim ch, s As String
s = "01234567"
____________________
ch = ""
Do While n > 0
m = n Mod 8
__________________
n = n \ 8Loop
Text2.Text = ch
End Sub
在VB中,下列与表达式Len (“-20”) +20的值相等的是:( )
A.Str(20)“+3” |
B.Sqr(25)+20 |
C.Val(“-20”)+20 |
D.Abs(-3)+20 |
在文本框Text1中输入十进制数,将其转换为二进制数后在标签Labell上输出。VB程序段如下:
Dim x As Integer,s As String,t As Integer
x=Val(Text1.Text)
Do While x>0

Loop
Labell.Caption= s
方框中的代码由以下三部分组成:
①x=x\2
②s=Str(t)+s
③t=x Mod 2
代码顺序正确的选项是( )
Dim x As Integer,s As String,t As Integer
x=Val(Text1.Text)
Do While x>0

Loop
Labell.Caption= s
方框中的代码由以下三部分组成:
①x=x\2
②s=Str(t)+s
③t=x Mod 2
代码顺序正确的选项是( )
A.②①③ | B.①③② | C.③②① | D.①②③ |
有如下VB程序段:
s=“Good Luck 2019!”
n=0:m=0:k=0
For i=1 To Len(s)
执行该程序段后,变量k的值为( )
s=“Good Luck 2019!”
n=0:m=0:k=0
For i=1 To Len(s)
ch=Mid(s,i,1)
If ch >=”0”And ch<=”9” Then
m=m+1Else If ch>="a” And ch<=”z” Then
n=n+1Else
k=k+1End If
Next i执行该程序段后,变量k的值为( )
A.2 | B.3 | C.4 | D.5 |
产生一个在[1,9]中随机整数的VB表达式是
A.Int(Rnd * 5) * 2+1 | B.Int(Rnd * 8)+1 |
C.Int(Rnd * 9+1) | D.Int(Rnd * 9) |
[0,500]范围的十进制数转八进制的VB程序段如下:
n=Val(Textl.Text)
a(1)=0:a(2)=0:a(3)=0
For i=1 To n
s=a(1)&a(2)&a(3)
方框中的代码由以下三部分组成
①a(j)=a(j)+1
②a(j)=0
③j=j-1
代码顺序正确的选项是
n=Val(Textl.Text)
a(1)=0:a(2)=0:a(3)=0
For i=1 To n
j=3:a(j)=a(j)+1
Do While a(j)=8
Loop
Next is=a(1)&a(2)&a(3)
方框中的代码由以下三部分组成
①a(j)=a(j)+1
②a(j)=0
③j=j-1
代码顺序正确的选项是
A.①③② | B.③②① | C.②③① | D.②①③ |