将十进制数转化为二进制数的VB程序段如下：DimyAsInteger,sAsString,rAsIntegery=Val(Text1．Text)'输入十进制数s_刷题宝

题干

将十进制数转化为二进制数的 VB 程序段如下：
Dim y As Integer,s As String,r As Integer
y=Val(Text1．Text) '输入十进制数
s= ""
Do While y <> 0

Loop
Text2．Text = s '显示出二进制数
方框中的代码由以下三部分组成：
① s =CStr(r) +s 'CStr(r)是将变量Rr内容转换为字符串（字符串前没有空格）
② y= y\2
③ r= y Mod 2
代码顺序正确的选项是

A．②③①

B．②①③

C．①③②

D．③②①

上一题下一题 0.99难度选择题更新时间:2019-05-07 09:38:15

答案(点此获取答案解析）

同类题1

下列VB程序段执行后变量n、s的值为( )
n=1: s=0
Do while s<20
s=s+n
n=n+2
Loop

同类题2

有如下程序，要使Label1中显示的值是30，划线处应该填(　　)
Dim i As Integer，s As Integer
s＝0
For i＝2 To ________ Step 2
　s＝s＋i
Next i
Label1.Caption＝Str(s)

同类题3

某算法的部分流程图如图所示，执行这部分流程，输入n的值为5，则输出值依次为

同类题4

使用两种不同的VB程序段实现相同的功能：则划线处填入的代码正确的是（）

A．	B．
C．	D．

同类题5

有如下Visual Basic程序段：
Dim i As Integer, s As Integer
s = 0
For i = 1 To 20
If i Mod 3 = 2 And i Mod 5 = 3 Then s = s + i
Next i
Label1.Caption = str(s)
执行以上程序后，标签Label1中显示的内容为

相关知识点