有如下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