" id="b1img" alt="米课”N+1“思维建站-非官方免费技术支持,Wordpress/Zencart/Opencart建站、SEO" title="米课”N+1“思维建站-非官方免费技术支持,Wordpress/Zencart/Opencart建站、SEO">
  • " alt="米课”N+1“思维建站-非官方免费技术支持,Wordpress/Zencart/Opencart建站、SEO" title="米课”N+1“思维建站-非官方免费技术支持,Wordpress/Zencart/Opencart建站、SEO" />
  • " alt="Windows/Linux服务器运维技术支持 环境搭建、应用发布、服务器管理、虚拟化、云计算" title="Windows/Linux服务器运维技术支持 环境搭建、应用发布、服务器管理、虚拟化、云计算" />
  • " alt="高校/小型企业网络运维与建设免费技术支持,网络规划、网络优化、故障排除、网络管理" title="高校/小型企业网络运维与建设免费技术支持,网络规划、网络优化、故障排除、网络管理" />

VB-解决mshflexgrid 不能删除最后一条记录的问题

程序设计2005-03-22 itlogger阅读(589) 评论(0)

    如果默认设置routegrid.fixedrows=1,那么删除最后一条记录的时候就会提示出错”can not move last non-fixed row”

    解决方法如下:

If Rs.RecordCount = 1 Then’如果是最后一条记录

For I = 0 To 4 ‘将Mshflexgrid的最后一条记录置为空

RouteGrid.TextMatrix(1, i) = “”

Next

Else

RouteGrid.RemoveItem (RouteGrid.RowSel)

End If

sql = “delete from IProute where id=” /从数据库删除

Cnn.Execute sql

Rs.Requery

转载请注明 :IT樵客
文章地址:http://www.itlogger.com/program/2.html
标签:,
相关文章

发表评论

电子邮件地址不会被公开。 必填项已用*标注