请问一个VB功能实现的问题,如何能将MSHFlexGrid1中的每一列的数据用checkbox复选框选择显示?
请问一个VB功能实现的问题,如何能将MSHFlexGrid1中的每一列的数据用checkbox复选框选择显示?类似上图,想实现成为当勾选了ID日期cpu交易量四个复选框的...
请问一个VB功能实现的问题,如何能将MSHFlexGrid1中的每一列的数据用checkbox复选框选择显示?
类似上图,想实现成为当勾选了 ID 日期 cpu 交易量 四个复选框的时候,上面第一张图只显示所选的列。 求大神指导! 展开
类似上图,想实现成为当勾选了 ID 日期 cpu 交易量 四个复选框的时候,上面第一张图只显示所选的列。 求大神指导! 展开
2个回答
展开全部
把不需要显示的列宽设为0就行
Private Sub Check1_Click()
Call SetWidth
End Sub
Private Sub Check2_Click()
Call SetWidth
End Sub
Private Sub SetWidth()
If Check1 = 1 Then MSFlexGrid1.ColWidth(1) = 1000 Else MSFlexGrid1.ColWidth(1) = 0
If Check2 = 1 Then MSFlexGrid1.ColWidth(2) = 1000 Else MSFlexGrid1.ColWidth(2) = 0
End Sub
Private Sub Check1_Click()
Call SetWidth
End Sub
Private Sub Check2_Click()
Call SetWidth
End Sub
Private Sub SetWidth()
If Check1 = 1 Then MSFlexGrid1.ColWidth(1) = 1000 Else MSFlexGrid1.ColWidth(1) = 0
If Check2 = 1 Then MSFlexGrid1.ColWidth(2) = 1000 Else MSFlexGrid1.ColWidth(2) = 0
End Sub
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询