有关DataGrid控件的问题?

comeonbabe 2003-10-15 03:10:49
我用DataGrid控件连接数据库以显示满足要求的数据,可我还想知道满足要求数据的记录总数,以及在点其中一行时能知道其是第几条记录,我想在DataGrid控件的固定列(即为最左边的灰色列)上显示该行的记录数,如1,2,。。。,这样就可实现上述的两点要求。请各位大虾帮帮忙,给小弟指点一二,在下将不胜感激!!!急!急!急!
...全文
94 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
comeonbabe 2003-10-15
  • 打赏
  • 举报
回复
难道在DataGrid控件的固定列(即为最左边的灰色列)上不能显示该行的记录数???怎样实现?我最想知道的就是此种解决办法?请各位大虾在这方面能给我指点指点。在这谢谢了!!!
haipingma 2003-10-15
  • 打赏
  • 举报
回复
sorry 少一end if
用一label控件顯示

Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
if rs.recordcount>0 then
label1.caption="共用" & rs.recordcount & "筆紀錄"
if rs.bof or rs.eof then
label1.caption=label1,caption & "目前為第" rs.AbsolutePosition & "筆記錄"
endif
end if
End Sub
haipingma 2003-10-15
  • 打赏
  • 举报
回复
用一label控件顯示

Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
if rs.recordcount>0 then
label1.caption="共用" & rs.recordcount & "筆紀錄"
if rs.bof or rs.eof then
label1.caption=label1,caption & "目前為第" rs.AbsolutePosition & "筆記錄"
end if
End Sub
strongfisher 2003-10-15
  • 打赏
  • 举报
回复
1。你可以添加一个lable 然后
If rs.RecordCount > 0 Then
lblTotal.Caption = "共有 " & rs.RecordCount & " 人"
Else
lblTotal.Caption = ""
End If

1,451

社区成员

发帖
与我相关
我的任务
社区描述
VB 控件
社区管理员
  • 控件
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧