请各位帮帮忙,我最近遇到一个问题:如何在msflexgrid控件的每行中加入一个复选框???急急急!!!!!!

解决方案 »

  1.   

    '在窗体上放一文本框Check1,和一MSHFLEXGRID控件Private Sub Form_Load()
        Check1.Visible = False
        
        MSFlexGrid1.Cols = 10
        MSFlexGrid1.Rows = 10
    End SubPrivate Sub MSFlexGrid1_EnterCell()
        MSFlexGrid1.CellBackColor = vbBlue
        MSFlexGrid1.CellForeColor = vbWhite
        Check1.Width = MSFlexGrid1.CellWidth
        Check1.Height = MSFlexGrid1.CellHeight
        Check1.Move MSFlexGrid1.Left + MSFlexGrid1.CellLeft, MSFlexGrid1.top + MSFlexGrid1.CellTop, MSFlexGrid1.CellWidth
    End SubPrivate Sub MSFlexGrid1_LeaveCell()
        MSFlexGrid1.CellBackColor = vbWhite
        MSFlexGrid1.CellForeColor = vbBlue
    End SubPrivate Sub MSFlexGrid1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
        Check1.Visible = True
    End SubPrivate Sub Check1_Change()
        MSFlexGrid1.Text = Check1.Text
    End Sub
      

  2.   

    我要进入界面后,在msflexgrid的每一行上都有一个复选框,lihonggen0:你的代码好像不能实现
      

  3.   

    自己做控件吧
    或者找一个叫FlexCell的控件
      

  4.   

    用VSFLEXGIRD
    下载地址:http://fibrlink.onlinedown.net/soft/892.htm
      

  5.   

    vsflexgrid都是使用版,这个控件也没有属性能控制复选框呀???
      

  6.   

    请大家帮忙;
    我的问题是:
    我要进入界面后,在msflexgrid的每一行上都有一个复选框