Vb 怎样调用模块的内容呢?
是这样的。我做了一个软件。他有好多个功能。因为每个功能都有大量的代码也包括调用APi的。而且功能的代码都互不相关。我想每个功能的代码分别放到模块上。然后直接调用。请问各位...
是这样的。我做了一个软件。他有好多个功能。因为每个功能都有大量的代码也包括调用APi的。而且功能的代码都互不相关。我想每个功能的代码分别放到模块上。然后直接调用。请问各位高手们可以这样的吗?别笑我,我只是初学者来的。
展开
3个回答
展开全部
窗体:form1
模块:module1
Form1中创建文本输入text1
Form1内容如下:
Private Sub Command1_Click()
MsgBox "文本内容是" & Tx
MsgBox "窗体标题是" & Tc
MsgBox "窗体大小是" & Ts
End Sub
模块内容如下:
Function Tx() As String
With Form1
Tx = .Text1.Text
End With
End Function
Function Tc() As String
With Form1
Tc = .Caption
End With
End Function
Function Ts() As String
With Form1
Ts = .Width & "-" & .Height
End With
End Function
请参考
模块:module1
Form1中创建文本输入text1
Form1内容如下:
Private Sub Command1_Click()
MsgBox "文本内容是" & Tx
MsgBox "窗体标题是" & Tc
MsgBox "窗体大小是" & Ts
End Sub
模块内容如下:
Function Tx() As String
With Form1
Tx = .Text1.Text
End With
End Function
Function Tc() As String
With Form1
Tc = .Caption
End With
End Function
Function Ts() As String
With Form1
Ts = .Width & "-" & .Height
End With
End Function
请参考
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询