题目

有如下VB程序段，运行后，文本框Text1中输出的内容为（    ） Dim a As Long, k As Integer, s As String a=1234567 : k=0 Do while a>0   r=a mod 10   If r Mod 2 =0 Then k=k+1   s= s+ Str(r)   a=a\10 Loop Text1.Text= Str(k) +s A .  2 4 6 3 B . 3 6 4 2 C . 3 1 2 3 4 5 6 7 D . 3 7 6 5 4 3 2 1 答案：D

查看本题答案和解析