当前位置: 高中信息技术 / 单选题
  • 1. (2020高三下·金华月考) 有如下VB程序段:

    y=0

    n=Len(Text 1.Text)

    For i=1To n

        c=Mid(Text 1.Text,i,1)

        If c>=“0”And c<=“9”Then

            x=Val(c) :a(x) =a(x) + 1

        End If

    Next i

    For i= 0 To 9

        If a(i) >0Then y=y+ 1

    Next i

    Label 1.Caption=Str(y)

    a数组各元素的初值为0,程序运行时,在文本框Text 1中输入内容“pi=3.1415926535”,单击按钮Command 1后,标签Label 1中显示的内容是(  )

    A . 6 B . 7 C . 8 D . 9

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