mshflexgrid 显式自动排列序号问题??

lijianjian 2004-12-22 09:49:42
我想让它自动排列序号,编写的源代码为:'增加记录时,表格编号自动加一
With MSF1
.Col = 0
.Row = MSF1.Rows - 1
X = .Text
.AddItem X + 1
End With
'删除记录时,表格编号自动减一
With MSF1
N = .Row
.RemoveItem (N)
For j = N To MSF1.Rows - 1
.Col = 0
.Row = j
.Text = str(Val(.Text) - 1)
Next
'删除时编号自动递减
End With
结果是隐式的,点击时显示一下,接着就没了????
...全文
119 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
lijianjian 2004-12-22
  • 打赏
  • 举报
回复
就是记录自动排序:1 2 3 。。。。
结果我的只是点击时在第一列显示一下,结果就没有了。
myhot-河马吃草 2004-12-22
  • 打赏
  • 举报
回复
没有搞明白你的问题是什么.
lijianjian 2004-12-22
  • 打赏
  • 举报
回复
to myhgpy: 你用过吗?我是这还是只显一下???????
myhgyp 2004-12-22
  • 打赏
  • 举报
回复
不会,应该可以啊

1,216

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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