题目

有如下 VB 程序段： Dim p As Integer, q As Integer, s As Integer, t As Integer p = Val(Text1.Text) t = 0 For q = p+ 1 To 2 * p s = (p * q) Mod (q - p) If s = 0 Then t = t+ 1 End If Next q Label1.Caption = Str(t) 该程序段运行时，在文本框T extl中输入8 , 则在标签Labell中显示的内容是（  ） A . 3 B . 4 C . 5 D . 6 答案：B

查看本题答案和解析