有如下程序：
Private Sub Command1_Click()
Dim i As Integer, j As Integer
Dim sum As Integer
n=1
Do
j=1
Do
sum = sum + j
j=j+1
Print j;
Loop Until j ＞ 3
n=n+2
Loop Until n ＞ 10
Print sum
End Sub
运行上述程序，外层Do循环执行的次数为( )。

A) 4
B) 5
C) 7
D) 10

下列各组腧穴中，相距不是2寸的是（）。

A.中极-石门

B.关元-阴交

C.神阙-下脘

D.下脘-中脘

E.中脘-上脘