【单选题】下面程序的运行结果是()。 Function f(m As Integer) As Integer b = 1 Static c As Integer b = b + 1 c = c + 1 f = m * b * c End Function Private Sub Command1_Click() Dim a As Integer a = 2 sum=0 For I = 1 To 3 sum=...
【单选题】下面程序的运行结果是 Dim m1 As Integer, p1 As Integer ‘模块级变量 Private Sub Form_Load() Show p1 = 1: m1 = 5 Call Sub1 Call Sub1 Print p1 End Sub Private Sub Sub1() If m1 > 1 Then m1 = m1 - 1 p1 = p1 * 4...