微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

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

如何解决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 举报,一经查实,本站将立刻删除。