题型:综合题 题类:常考题 难易度:普通
浙江省高中信息技术 解析算法及程序实现同步练习
程序界面如图所示,在文本框Text1中输入一个正整数,单击“转换”按钮(Command1)后,对应的二进制数在文本框Text2中显示出来。
解决此问题的Visual Basic程序如下,在程序①和②划线处,填入适当的语句或表达式,把程序补充完整。
Private Sub Command1_Click()
Dim x As Integer,s As String,r As Integer,t As Integer
x=Val(Text1.text)
s=“”
Do While ①
r=x Mod 2
s=Str(r)+s
x=②
Loop
Text2.text=s
End Sub
试题篮