如何引用 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 表中的数据?

如何在 MS Access VBA 上将文本框注释值输入设置为表格数据插入

在 MS Access 组合框中,如何将表单值用作 where 类

表格中的 MS Access 下划线文本

将日期插入 Ms-Access 数据库的问题