MS Access 中 ListBox 控件和 case 语句的正确使用是什么

问题描述

我正在使用 MS Access 2010，并试图让名为 txtCamposOrden 的文本框控件使用事件 AfterUpdate() 和 Case 语句基于名为 lstExamenes 的 ListBox 控件中的多项选择返回文本，但出现不匹配错误;如果我将列表框控件留空，则文本框会在代码的“Case Else”部分之后返回文本。这是我的代码：

Private Sub lstExamenes_AfterUpdate()
'Evaluate listBox control lstExamenes:

Select Case lstExamenes.Value

Case "BHC;EGO"

'Generate fields belonging to selected analysis:
txtCamposOrden.Value = "Hematocrito"

Case "BHC;VDRL"
txtCamposOrden.Value = "Hematocrito; VDRL"

Case Else
txtCamposOrden.Value = "PLEASE EDIT RESULT FOR THIS SELECTION"
End Select
End Sub

预先感谢您的帮助！

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）