在窗体中有命令按钮Command1和两个文本框Text0、Text1，命令按钮对应的代码过程如下：
Private Sub Command1_Click()
    Dim m, k As Integer
    Dim flag As Boolean
    m = Val(Me!Text0)       '输入一个整数
    Do While 1
        k = 2
        flag = True
        Do While k <= m / 2 And flag
            If m Mod k = 0 Then
                flag = False
            Else
                k = k + 1
            End If
        Loop
        If flag Then
            Me!Text1 = m    '输出计算结果
            Exit Do
        Else
            m = m + 1
        End If
    Loop
End Sub
运行程序，输入15，单击按钮，程序的输出结果是
A. 17
B. 15
C. 13
D. 其他整数

答案：A

解析：