Private Sub Command1_Click()
Call aa
Sub aa()
    Print "11"
End Sub
End Sub
提示错误!!请指教!!

解决方案 »

  1.   

    Private Sub Command1_Click()
        Call aa
    end subSub aa()
      Print "11"
    End Sub
      

  2.   

    那么如果我将sub放到模块里,需要怎么编写?
    我直接复制你的sub到模块提示错误哦
      

  3.   

    模块里面
    public Sub aa()
      Print "11"
    End Sub窗体里面
    Private Sub Command1_Click()
        Call aa
    end sub
      

  4.   

    窗体事件中调用模块时,如果在模块中直接调用Print方法时,需要加上窗体对象的名字,如下:
    Sub aa()
      Form1.Print "11"
    End Sub