如何取得MSHFlexGrid 控件总宽度,和表格总宽度?????

解决方案 »

  1.   

    msgbox MSHFlexGrid.width
    表格总宽度?不明白
      

  2.   

    把所有的ColWidth(index)都相加即可
      

  3.   


    Option ExplicitPrivate Sub Command1_Click()
        Dim intP As Integer
        Dim lngW As Long
        lngW = 0
        For intP = 0 To MSHFlexGrid1.Cols - 1
            lngW = MSHFlexGrid1.ColWidth(intP) + lngW
        Next intP
        Command1.Caption = CStr(lngW)
    End SubPrivate Sub Form_Load()
        MSHFlexGrid1.FormatString = "^1|^2|^3^|^4|^5|^6|^7|^8|^9"
    End Sub