1,453
社区成员
发帖
与我相关
我的任务
分享vb 怎么给 listview 和 MsHFlexGrid 增加行序号啊！
vb 怎么给 listview 和 MsHFlexGrid 增加行序号啊！
第一、希望是读出数据后自动生成与数据库本身没有关系。（MsHFlexGrid增加行后也能自动更新）
第二、序号前能设置出倒三角指定当前行的效果吗吗！
谢谢！
另外我的一个程序最小化总缩在屏幕左下角，到不了windows的任务栏怎么回事？运行时也不在任务栏，我误设置什么参数了吗？谢谢！
第一、希望是读出数据后自动生成与数据库本身没有关系。（MsHFlexGrid增加行后也能自动更新）
第二、序号前能设置出倒三角指定当前行的效果吗吗！
谢谢！
另外我的一个程序最小化总缩在屏幕左下角，到不了windows的任务栏怎么回事？运行时也不在任务栏，我误设置什么参数了吗？谢谢！
...全文
请发表友善的回复…
发表回复
孤独剑_LPZ 2009-08-07
- 打赏
- 举报
"程序最小化总缩在屏幕左下角，到不了windows的任务栏",是否用了MDI窗体?,如果是,改为普通窗体,
且 Me.BorderStyle = 2
且 Me.BorderStyle = 2
孤独剑_LPZ 2009-08-07
- 打赏
- 举报
你的问题还真不少,listview的,
lvw.ListItems.Add , "W" & intI, CStr(intI + 1) '自动生成序号
intI = intI + 1
MsHFlexGrid的,在插入数据时,
For i = 1 To rs.PageSize
With MSHFlexGrid1
.Rows = .Rows + 1
.Row = i
.Col = 0
.Text = CStr(i)
.Col = 1
.Text = rs!姓名
End With
rs.MoveNext
If rs.EOF Then Exit For
Next
lvw.ListItems.Add , "W" & intI, CStr(intI + 1) '自动生成序号
intI = intI + 1
MsHFlexGrid的,在插入数据时,
For i = 1 To rs.PageSize
With MSHFlexGrid1
.Rows = .Rows + 1
.Row = i
.Col = 0
.Text = CStr(i)
.Col = 1
.Text = rs!姓名
End With
rs.MoveNext
If rs.EOF Then Exit For
Next
feicui999 2009-08-07
- 打赏
- 举报
能给我点代码吗？谢谢！
SYSSZ 2009-08-07
- 打赏
- 举报
可以,让第一列的文本为行号就行了,倒三角也行,加个倒三角图标.
yachong 2009-08-07
- 打赏
- 举报
[Quote=引用楼主 feicui999 的回复:]
另外我的一个程序最小化总缩在屏幕左下角，到不了windows的任务栏怎么回事？运行时也不在任务栏，我误设置什么参数了吗？谢谢！
[/Quote]
窗体的ShowInTaskbar属性设置为True即可。
另外我的一个程序最小化总缩在屏幕左下角，到不了windows的任务栏怎么回事？运行时也不在任务栏，我误设置什么参数了吗？谢谢！
[/Quote]
窗体的ShowInTaskbar属性设置为True即可。
贝隆 2009-08-07
- 打赏
- 举报
飘过
