单项选择题

下列程序段的运行结果是：
Private Sub Command1_Click()
Dim n AS Integer
I =21: n = 3
do while I＞n
I=I- n
Loop
Print I
End Sub
在窗体上打印的结果是______。

点击查看答案&解析