你好，看到了你在VB代码中的精彩评论，想向您请教个问题。关于VB录入查询文本文档。

如上图，我想做一个录入查询文章的程序，现在查询是在Text1输入文本文档名字后Text2会出现文本文档中的内容，但是如果没有查询结果就会报错，麻烦帮我写下如果查询无结果时候的代码。还有个想请教下，我做这个程序目的是为了用VB进行录入和查询，因为是文章，字数比较多，你有什么好的建议没有？感觉用Excel或者Access不适合输入大量文字。查询最好能够有模糊查询一类的，具备关键字搜索或者模糊搜索。

你把command1_click()事件程序之中前面的一部分程序复制到“复制_click()”之中，就能解决你说的问题。（仅复制从dim到endif之间的这一部分即可）追问

不行啊。。复制过来的话查询变成创建了。。。

追答

复制过来之后，先把open和colse这两句删掉，再把msgboc"创建成功”这一句改成：

msgbox "文件不存在！" , vbinformation ,"失败"
exit sub

应该就可以了。

追问

谢谢你，我换了个方法查询。Text3.Text = Text3.Text & RS!T1 & Space(5) & RS!T2 & Space(4) & RS!T4 & Space(10) & RS!T3 & vbCrLf
其中TEXT3是用来显示查询结果的，T3是Access中录入文章的单元格，想查询时候T3只显示单元格内的前几个字，麻烦你帮忙看下，谢谢。（字太多发不了，简化了下。。）

追答

在查询事件中添加下面的代码试一下：

dim Lu as strint
Lu = RS!T3 
RS!T3=Left(Lu,8)

来自：求助得到的回答

温馨提示：内容为网友见解，仅供参考

当前网址：https://11.t2y.org/zz/vp2pm4p82pv4fvqp7s.html