用checkbox+datagrid组合实现 '设置datagrid的属性,使其有下拉的那个三角形 Private Sub datagrid_ButtonClick(ByVal ColIndex As Integer) With datagrid check(ColIndex).Width = .Columns(ColIndex).Width check(ColIndex).Left = .Columns(ColIndex).Left check(ColIndex).Top = .Top + .Row * .RowHeight + 610 End With check(ColIndex).Visible = True check(ColIndex).SetFocus End Sub 也可以自己做控件啊!
'设置datagrid的属性,使其有下拉的那个三角形
Private Sub datagrid_ButtonClick(ByVal ColIndex As Integer)
With datagrid
check(ColIndex).Width = .Columns(ColIndex).Width
check(ColIndex).Left = .Columns(ColIndex).Left
check(ColIndex).Top = .Top + .Row * .RowHeight + 610
End With
check(ColIndex).Visible = True
check(ColIndex).SetFocus
End Sub
也可以自己做控件啊!
刷新 | 搜索 |
订全年杂志,送名家新书
玩出电脑“真精彩”
大本营8折优惠更送程序员杂志
搜索(VB VB资源)
作者:Bardo 关键字:
时间:2002年3月至今数据
最新:15篇 1
问 题 分数 回复 时间 功能
?圣诞礼物:完全平面的ACTIVEX控件的核心原码,打开本贴就能见到!(Bardo) 200 8 12-21 18:15 管理
?圣诞礼物:一个非常特别的窗口代码,很有用,运行后你就明白了!UP有分!(Bardo) 200 9 12-21 18:14 管理
?难题:VB编程如何控制I/O口? 来者,up者都给分!(Bardo) 200 6 12-21 17:21 管理
?VB写的两个程序怎样保持数据同步?(Bardo) 200 7 12-20 15:57 管理
√大家请前来我家做客!(Bardo) 200 78 12-19 17:54 管理
?ADO的例子无法运行通过,谁能说出原因?来者有分!(Bardo) 200 28 12-18 21:42 管理
√怎样让窗体的标题条竖起来?(Bardo) 200 15 12-15 12:25 管理
?怎样做一个平面的滚动条?请给出代码!(Bardo) 200 5 12-12 12:52 管理
?你是否想在网上分类收藏你的资源?来者有分!(Bardo) 200 19 12-10 16:29 管理
√ADO如何打开sybase复杂的临时表查询?(Bardo) 200 3 11-6 20:45 管理
√请问ADO连sybase数据库为什么不能返加记录数?(Bardo) 200 2 11-5 20:23 管理
r这个子要删除吗?为什么其它非法不会被及时删除,这个删除得真快!(Bardo) 0 0 4-21 17:30 管理
r请大家评一个理!!!!!!!!!(Bardo) 0 7 4-18 19:54 管理
?关于老山创业的建议!(Bardo) 1 14 4-9 00:03 管理
√不用任可控件,如果避免浮点数运算误差?(Bardo)