VB.NET 模块

'定义模块
Module ModuleFunction
    Private Function insertlog(ByVal Sfzhm As String)
　　　＇功能语句
   End Function
end Module

我在同一个目录下的另一个窗体文件中怎么调用，例如
另一个窗体的按钮事件中这么调用出错，为什么，应该怎么改，加什么东西呢，谢谢
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 　　　　　　Button2.Click
　　　　　insertlog（"465456465"）
    End Sub --------------------编程问答-------------------- 要这样，用Public,还有Function需要有返回类型，如BOOLEAN:
Public  Function   insertlog(ByVal   Sfzhm   As   String) AS BOOLEAN
　　　＇功能语句
  End  Function
--------------------编程问答-------------------- '定义模块
Module   ModuleFunction
        Private   Function   insertlog(ByVal   Sfzhm   As   String)
　　　＇功能语句
      End   Function
end   Module

我在同一个目录下的另一个窗体文件中怎么调用，例如
另一个窗体的按钮事件中这么根本就不安能调用,显示函数名错误，为什么，应该怎么改，加什么东西呢，谢谢
  Private   Sub   Button2_Click(ByVal   sender   As   System.Object,   ByVal   e   As   System.EventArgs)   Handles   　　　　　　Button2.Click
　　　　　insertlog（"465456465"）
        End   Sub --------------------编程问答-------------------- 模块里定义要另一个窗体文件中能访问的函数,过程,变量等都要用Public，
用Private定义限制了就不能访问了 --------------------编程问答-------------------- Module   ModuleFunction
      public  sub insertlog(ByVal   Sfzhm   As   String)
　　　＇功能语句
       End  sub
end   Module --------------------编程问答-------------------- Module       ModuleFunction
            public     sub   insertlog(ByVal       Sfzhm       As       String)
　　　＇功能语句
              End     sub
end       Module --------------------编程问答-------------------- '定义模块
Module   ModuleFunction
        Private   Function   insertlog(ByVal   Sfzhm   As   String)
　　　＇功能语句
      End   Function
end   Module

我在同一个目录下的另一个窗体文件中怎么调用，例如
另一个窗体的按钮事件中这么调用出错，为什么，应该怎么改，加什么东西呢，谢谢
  Private   Sub   Button2_Click(ByVal   sender   As   System.Object,   ByVal   e   As   System.EventArgs)   Handles   　　　　　　Button2.Click
　　　　　insertlog（"465456465"）
        End   Sub

1. 将Function的Private变成Public
2. Function需要有返回值。 --------------------编程问答-------------------- 我想楼主是不是把问题复杂化了?
假如你要点击按钮发生事件,你可以在Module中定义一个变量,然后点击按钮后,在给Module里面的变量赋值不就ok了!? --------------------编程问答-------------------- 不知道楼主要干什么

首先，Private 定义的，外部是无法访问
其次，Function 是函数，必须有返回值的，没有返回值的是过程（SUB）

至于调用，一般直接调用就可以了，如果觉得不爽，或者由同名的，就要使用模块名.方法  了 --------------------编程问答-------------------- 搬個板凳來，聼老師們上基礎課。 --------------------编程问答-------------------- 先要由最基本的窗体学起。理解过程与函数，类，声明关健字的使用范围等。.....
例:
Public Function LoadFile(ByVal FileName As String) As String
'....须要做什么，用户代码
Return "公共函数返回"
End Function

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim MM As String = LoadFile("公共函数")
Debug.WriteLine(MM)    '监显窗口可看到调用返回的字符串----"公共函数返回"

End Sub

补充：.NET技术 ,  VB.NET