試卷征集
加入會員
操作視頻
菁優(yōu)網(wǎng)將一個十進(jìn)制正整數(shù)x轉(zhuǎn)換成十六進(jìn)制數(shù)的方法和轉(zhuǎn)換成二進(jìn)制類似,反復(fù)除16取余法,它的算法如下
第一步:x被除16取余數(shù)r1,r1是所求的十六進(jìn)制數(shù)的一個數(shù)(第一次就是個位數(shù));
第二步:r1轉(zhuǎn)換成十六進(jìn)制數(shù)的一個基數(shù)并轉(zhuǎn)換成字符,追加到十六進(jìn)制數(shù)S的左邊;
第三步:求出x被除16的商x1;
第四步:對x1重復(fù)(1)、(2)、(3)過程,直至商為0;
第五步:最后的S即為所求的十六進(jìn)制數(shù);
    下列Visual Basic程序的功能是將一個十進(jìn)制正整數(shù)x轉(zhuǎn)換成十六進(jìn)制數(shù).界面如圖所示,在文本框Text1中輸入一個十進(jìn)制數(shù)制,單擊“十進(jìn)制轉(zhuǎn)十六進(jìn)制按鈕”(Command1)后,在文本框Text2中輸出轉(zhuǎn)換的結(jié)果. 相應(yīng)的Visual Basic程序如下:
Private Sub Command1_Click (  )
Dim s As String,r As Integer
dec=val(Text1.Text)’dec得到一個十進(jìn)制整數(shù),例如:255;
base=16’base表示16
s=““’s變量存放要轉(zhuǎn)換到的十六進(jìn)制整數(shù);
Do While dec<>0
r=

If r>=10Then’如果base>10進(jìn)制,r可能>10;
s=Chr(65+(r-10))+s’Chr (65)=“A“,16進(jìn)制數(shù)A對應(yīng)10;
Else’Chr (66)=“B“,16進(jìn)制數(shù)B對應(yīng)11;
s=Str(r)+s’余數(shù)r<10時,十進(jìn)制數(shù)和十六進(jìn)制基數(shù)相同;
End If’Chr (65+( r-10))或str(r)在s左邊,實現(xiàn)了反次序輸出;
dec=

Loop
Text2.Text=s
End Sub
(1)在①應(yīng)填入
C
C

A.base Mod dec           B.dec/base        C.dec Mod base          D.dec\base
(2)在②應(yīng)填入
D
D

A.base Mod dec          B.dec/base         C.dec Mod base          D.dec\base.
【答案】①;②;C;D
【解答】
【點評】
聲明:本試題解析著作權(quán)屬菁優(yōu)網(wǎng)所有,未經(jīng)書面同意,不得復(fù)制發(fā)布。
發(fā)布:2024/6/27 10:35:59組卷:6引用:1難度:0.1
相似題
  • 1.【加試題】小白同學(xué)為了方便和同學(xué)們的聯(lián)系,在QQ注冊網(wǎng)(http://zc.qq.com)注冊了一個QQ賬號:2796290808.由于長時間未使用該QQ,小白忘記了登錄密碼,但他清楚地記得:
    (1)密碼由8個字符組成;
    (2)密碼最前面2位是“xb”;
    (3)密碼后6位是純數(shù)字:①前面兩位數(shù)字是68;②最后兩位數(shù)字相同;③能被19和39整除.
    編寫VB程序,實現(xiàn)程序功能:單擊“查找”按鈕Command1后,在文本框Text1中顯示小白的QQ密碼.程序設(shè)計界面如圖所示:
    菁優(yōu)網(wǎng)
    程序代碼如下,請在橫線處填入合適的代碼.
    Function f(s As Long)As Boolean'自定義函數(shù),用于判斷密碼后6位是否滿足條件
    Dim a As Integer,b As Integer
    a=s Mod 10
    b=(s Mod 100)\10
    If
     
    Then
    f=True
    Else
    f=False
    End If
    End Function
    Private Sub Command1_Click( ?。?br />Dim i As Integer,n As Long
    i=0
    Do While i<10000
     

    If f(n)Then
    Text1.Text=“xb”+LTrim(Str(n))'LTrim函數(shù)的功能:刪除字符串的起始空格
    End If
    i=i+1
    Loop
    End Sub.
    發(fā)布:2024/6/27 10:35:59組卷:14引用:1難度:0.1
  • 菁優(yōu)網(wǎng)2.小李想用vb制作一個分鐘倒計時器,界面如圖所示.先在文本框text1中輸入分鐘數(shù),然后在文本框text2中輸入秒鐘數(shù),再點擊“開始倒計時”按鈕開始倒計時.Vb程序如下:
    Private Sub Command1_Click ( ?。?br />Timer1.Enabled=
     

    End Sub
    Private Sub Timer1_Timer (  )
    sec=Val(Text2.Text)
    min=Val(Text1.Text)
    If sec>0Then
    sec=sec-1
    Else  
     sec=59
    If min>0Then
    min=min-1
    Else
    Text1=0
    Text2=0
    MsgBox“倒計時時間到“
    End If
    End If
    Text1=min
    Text2=sec
    End Sub
    (1)程序中①處應(yīng)該填
     

    (2)計時器timer1的inteval屬性應(yīng)該設(shè)置為
     
    發(fā)布:2024/6/27 10:35:59組卷:5引用:1難度:0.3
  • 3.【加試題】統(tǒng)計字母出現(xiàn)的頻數(shù).隨機(jī)輸入一段全部由小寫字母組成的字符串(默認(rèn)輸入的內(nèi)容都符合要求),長度不大于1000,分別統(tǒng)計a~z出現(xiàn)的次數(shù),未出現(xiàn)的字母次數(shù)默認(rèn)為0,對出現(xiàn)次數(shù)不為0的字母按出現(xiàn)次數(shù)降序排列.下面程序模擬該功能,程序界面如圖所示.在文本框Text1中輸入字符串,單擊“統(tǒng)計”按鈕Command1,在列表框List1顯示最終結(jié)果.
    菁優(yōu)網(wǎng)
    實現(xiàn)上述功能的VB程序代碼如下,請在橫線處填上合適的代碼.
    Private Sub Command1_Click( ?。?br />Dim s As String
    Dim ch as String'定義存儲字符串中的字符ch
    Dim total(1To 26)As Integer'定義存儲a~z字母的出現(xiàn)頻數(shù)數(shù)組
    Dim word(1To 26)As Integer'定義存儲a~z字母的序號數(shù)組
    List1.Clear
    s=Text1.Text
    n=Len(s)
    For i=1To n
    ch=
    total(Asc(ch)-96)=total(Asc(ch)-96)+1
    Next i
    For i=1To 26
    word(i)=i
    Next i
    For i=1To 25
    k=i
    For  j=i+1To 26
    If total(k)<total(j) Then k=j
    Next j
    If i<>k Then
    t=total(i):total(i)=total(k):total(k)=t
    t=word(i):word(i)=word(k):word(k)=t
    End if
    Next i
    For i=1To 26
    IfThen
    List1.AddItem Chr(word(i)+96)&“”&total(i)
    End If
    Next i
    End Sub
    程序中①橫線處應(yīng)填入
     

    程序中②橫線處應(yīng)填入
     
    發(fā)布:2024/6/27 10:35:59組卷:11引用:1難度:0.1
小程序二維碼
把好題分享給你的好友吧~~
APP開發(fā)者:深圳市菁優(yōu)智慧教育股份有限公司 | 應(yīng)用名稱:菁優(yōu)網(wǎng) | 應(yīng)用版本:4.8.2  |  隱私協(xié)議      第三方SDK     用戶服務(wù)條款廣播電視節(jié)目制作經(jīng)營許可證出版物經(jīng)營許可證網(wǎng)站地圖本網(wǎng)部分資源來源于會員上傳,除本網(wǎng)組織的資源外,版權(quán)歸原作者所有,如有侵犯版權(quán),請立刻和本網(wǎng)聯(lián)系并提供證據(jù),本網(wǎng)將在三個工作日內(nèi)改正