将数据从窗体传递到模块（VBA）

问题描述：

我在VBA中有FORM和MODULE。当宏运行时，窗体显示（frmQuestions），数据输入到文本框（txtName）和下拉菜单（lstChoose）中。当用户按下命令按钮（cmdEnter）时，如何将txtName和lstChoose中的数据传递给模块？将数据从窗体传递到模块（VBA）

您需要开发一些代码，然后问具体问题。这[我的帖子]（http://yoursumbuddy.com/a-flexible-vba-chooser-form/）可能是有趣的。 “专业Excel开发”一书在这方面有很好的一章。 –

答

在窗体上从一个事件传递的数据包含在模块中的功能做一些这样的：

的在包含在frmQuestions形式点击事件代码：

Private Sub cmdEnter_Click() 
    Dim TempReturnVal as Boolean 

    TempReturnVal = funUpdateRecords(txtName.value, lstChoose.value) 
End Sub

功能模块：

Public Function funUpdateRecords(funName As String, funChoice As String) As Boolean 
    ' Do whatever it is that you want to 
    'funName contains the value of txtName 
    'funChoice contains the value of lstChoose 

    'Return True if successful or False if not. 
    funUpdateRecords = True 
End Function

将数据从窗体传递到模块（VBA）

相关推荐