屋租赁管理系统设计与实现(8)

来源：网络收集时间：2019-04-05 下载这篇文档手机版

说明：文章内容仅供预览，部分内容可能不全，需要完整文档或者需要复制内容，请下载word后使用。下载word有问题请添加微信号:或QQ：处理（尽可能给您提供完整文档），感谢您的支持与谅解。

If rs_house.BOF = True Then

MsgBox “对不起，已经是第一条记录了！”， vbOKOnly + vbInformation, “注意”

Exit Sub

’如果不是，则这个数据表的记录位置移到第一条记录，并且显示之 Else

For I = 0 To 7

Text(i).Text = rs_house.Fields(i) Next i

If rs_house.Fields(8) = “已租” Then Combol.ListIndex = 0

ElseIf rs_house.Fields(8) = “未租” Then Combol.ListIndex = 1

ElseIf rs_house.Fields(8) = “意向” Then Combol.ListIndex = 2 End If End If End SubPREV

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说综合文库屋租赁管理系统设计与实现(8)在线全文阅读。

屋租赁管理系统设计与实现(8).doc 将本文的Word文档下载到电脑，方便复制、编辑、收藏和打印下载失败或者文档不完整，请联系客服人员解决！

本文链接：https://www.77cn.com.cn/wenku/zonghe/571991.html（转载请注明文章来源）