当前位置: 高中信息技术 / 单选题
  • 1. (2021高二下·浙江月考) 编写一个读数小程序。在文本框1中输入一个10000以内的正整数,点击“读数”按钮,在文本框2中输出该数字的中文阅读,程序运行界面如图所示。实现该功能的VB程序段如下:

    Const SN = "〇一二三四五六七八九十百千"

    Dim s1 As String, s2 As String, i As Integer

    s1 = Text1.Text: s2 = "": i = 1

    Do While i < Len(s1)

        n1 = Val(Mid(s1, i, 1))

        n2 = Val(Mid(s1, i + 1, 1))

        If n1 <> 0 Then         

        If n1 = 0 And n2 <> 0 Then          

        i = i + 1

    Loop

    n1 = Val(Mid(s1, i, 1))

    If n1 <> 0 Then          

    Text2.Text = s2

    上述程序方框处可选语句为:

    ①s2 = s2 & Mid(SN, n1 + 1, 1) & Mid(SN, Len(s1) - i + 10, 1)

    ②s2 = s2 & Mid(SN, 1, 1)

    ③s2 = s2 & Mid(SN, n1 + 1, 1)

    则(1)、(2)、(3)处语句依次是(   )

    A . ①②③ B . ②①③ C . ②③① D . ③②①

微信扫码预览、分享更方便