单项选择题

下列程序段的运行结果是( )。 Sub sele() Dim n As Integer i=21:n=3 Do While i>n i=i-n Loop Print i End Sub

A.2
B.4
C.5
D.3