本人使用MSFlexGrid控件创建列表框输出信息,
定义如下:
Dim MSFlexGrid1 As MSFlexGrid
   With MSFlexGrid1 
   .Cols = 8
   .Rows = 6
   .FixedCols = 0
   .TextMatrix(0, 0) = "借书证编号"
   .TextMatrix(0, 1) = "读者姓名"
   .TextMatrix(0, 2) = "图书编号"
   .TextMatrix(0, 3) = "书名"
   .TextMatrix(0, 4) = "价格"
   .TextMatrix(0, 5) = "类别"
   .TextMatrix(0, 6) = "出版社"
   .TextMatrix(0, 7) = "借出日期"
   End With
运行的时候报错:
  对象变量或with变量未设置,光标停在.cols行

解决方案 »

  1.   

    Dim MSFlexGrid1 As MSFlexGrid
    这句多余,去掉就好了With MSFlexGrid1 
       .Cols = 8
       .Rows = 6
       .FixedCols = 0
       .TextMatrix(0, 0) = "借书证编号"
       .TextMatrix(0, 1) = "读者姓名"
       .TextMatrix(0, 2) = "图书编号"
       .TextMatrix(0, 3) = "书名"
       .TextMatrix(0, 4) = "价格"
       .TextMatrix(0, 5) = "类别"
       .TextMatrix(0, 6) = "出版社"
       .TextMatrix(0, 7) = "借出日期"
       End With
      

  2.   

    是动态生成?还真没试过。
    不过感觉好像有点悬,没有实体,怎么能赋值?或者用Set MyGrid = New MSFlexGrid,或者老老实实的方一个控件
      

  3.   

    ok,thank you!
    可否留个email地址,有问题请教你,我初学vb