试题

试题 试卷

logo

题型:综合题 题类:模拟题 难易度:普通

浙江省杭州市2016年信息技术高考模拟卷八

十进制数转二进制数程序界面图1所示,相关VB程序运行时,单击命令按钮Command1后,执行十进制数转二进制数并输出显示的程序。

(1)、应用程序界面设计。转换得到的二进制数将显示在Label3中,请根据图3提供信息,确定使用图2控件工具箱中的(填写相应编号),修改属性的值为1010。
(2)、解决此问题的相应程序如下,请根据相应注释及题意将程序补充完整。

Private Sub Command1_Click() ‘不停除2到商为0为止,所得余数倒推

  Dim sjzs As Integer   ‘sjzs:十进制数

  Dim rjzs As String   ‘rjzs:二进制数

  sjzs = Val(Text1.Text)

  rjzs = ""

  Do While

    rjzs = Str(sjzs Mod 2) + rjzs

   

 

  Label3.Caption = rjzs

End Sub

举一反三
返回首页

试题篮