那位能给我一个图片所示的VB查询酒店员工信息的代码,数据库示Access的 类似的代码也可以,满意我追加50分

我只要点击查询后在在页面上显示查询结果的代码满意后我追加50分,谢谢你了麻烦把答案发我邮箱里936514229@qq.com,各位哥哥姐姐们帮帮小妹啊好烦了啦... 我只要点击查询后在在页面上显示查询结果的代码 满意后我追加50分,谢谢你了
麻烦把答案发我邮箱里 936514229@qq.com,各位哥哥姐姐们 帮帮小妹啊 好烦了啦
展开
 我来答
yangyingjun999
2011-02-11 · TA获得超过1230个赞
知道小有建树答主
回答量:782
采纳率:0%
帮助的人:395万
展开全部

直接给你一套完整的“人事管理系统”借鉴和修改可以吗?你看看下面的图示,看看是否符合你的需求,如果符合你的需要就请到我的留言薄回复我一下,我再发送给你吧,不符合你的需要就免回复啦。

我的留言薄http://www.iz88.net/book/book_write.asp

主界面如下: 

【已经发送到邮箱491220843@qq.com里,希查收】

ajlija
2011-02-11 · TA获得超过939个赞
知道大有可为答主
回答量:1118
采纳率:0%
帮助的人:1059万
展开全部
If Len(Trim(Txt检索.Text)) <> 0 Then
//如果Txt检索去掉空格后的长度不等于0不为空,Trim是去空格

If Left(StrConCode, 1) <> "w" Then
//如果StrConCode的第一个字母不是w

StrConCode = StrConCode & "where "
//StrConCode链接字符串where 赋给StrConCode

End If
//分支结束

If Right(StrConCode, 3) <> "ere" Then
//如果StrConCode右边三个字母不是ere

StrConCode = StrConCode & "and "
//StrConCode链接字符串and 赋给StrConCode

End If
//分支结束

Str = ""
//把空赋给Str

Str = Str & Trim(Txt检索.Text)
//Str链接Txt检索(去空格之后)赋给Str

StrConCode = StrConCode & " 名称 like '" & Str & "*"&"'"
//StrConCode 链接 字符串 名称 like '链接 Str 链接 字符串*"&"'赋给
//StrConCode

End If
//分支结束
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
許康栋79
2011-02-17
知道答主
回答量:12
采纳率:0%
帮助的人:1.9万
展开全部
是啊,有那个yangyingjun999的那个代码借鉴应该足够了,我也研究过那个人事管理系统,包括Access的知识点很多
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(1)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式