如何引用 Ms Access 表中的文本?
Posted
技术标签:
【中文标题】如何引用 Ms Access 表中的文本?【英文标题】:How to refer to a text in an Ms Access table? 【发布时间】:2010-04-19 04:21:07 【问题描述】:我想引用一个数据单元格,如果它等于某个字符串,它会做一些事情。 代码:
If ds.Tables(0).Rows(i)("Status") = "Reserved" Then
MessageBox.Show("Can't reserve")
End If
这是正确的方法吗? 因为我没有这样做..
【问题讨论】:
你为什么失败了?你有例外吗?女巫一号?或者,也许代码没有在应该显示 MessageBox 的时候显示? 程序没有显示消息框 这不是关于任何形式的 MS-ACCESS 的问题。该标签应该被删除。 【参考方案1】:检查返回类型:
ds.Tables(0).Rows(i)("Status")
还有,
大小写不同(db 中的大写??)
检查前导/尾随空格。
数据库中的字段是否定长
你可能想在比较之前尝试修剪字符串:
例如,在 VB6 中我可能已经尝试过:
IF lower(trim$(<thedbqueryhere>))= "reserved" then
msgBox("Can't reserve")
End if
祝你好运!!
CVS @ 2600 赫兹
【讨论】:
你有在 VB.Net 中做的参考吗?我找不到任何明确的参考。 请试试上面的 magnifico 的 sn-p。这可能只是可以解决问题!【参考方案2】:您可能需要检查单元格的 Value 属性。
这里还有 CVS @ 2600Hertz 翻译成 VB.NET 的 VB6 代码
Dim cell = ds.Tables(0).Rows(i)("Status")
If cell.Value.ToUpperInvariant().Trim() = "Reserved".ToUpperInvariant() Then
MessageBox.Show("Can't Reserve")
End If
【讨论】:
以上是关于如何引用 Ms Access 表中的文本?的主要内容,如果未能解决你的问题,请参考以下文章
将 VBA 用于 MS Access 2000 文本框的控制源
如何在 MS Access VBA 上将文本框注释值输入设置为表格数据插入