Debug.Print的使用

'找出各断面地形高程最低点，并保存在GCH_MIN(I)中
For I = 1 To NN
  GCH_MIN(I) = GCH(I, 1)
  For J = 2 To M(I)
  If GCH(I, J) < GCH_MIN(I) Then
  GCH_MIN(I) = GCH(I, J)
  End If
  Next J
Next I
Debug.Print "GCH_MIN(I) = "; GCH_MIN(I)

'求第一个，即起始断面面积，湿周，水力半径，流速，谢才系数
I = 1
Call AERA(I)
Call SHUIWEI(Z)
R(I) = W(I) / X(I)
V(I) = Q / W(I)
C(I) = (1 / n(I)) * R(I) ^ (1 / 6)
Open App.Path & "\out.txt" For Random As #2
Print #2, Z(I); W(I); V(I)
Close #2
Debug.Print "R(I) = "; R(I)
Debug.Print "V(I) = "; V(I)
Debug.Print "C(I) = "; C(I)
为什么我写了Debug 可是运行中断按ctrl+B没有反应啊