以下的代码看不懂，请教， - 编程论坛

#2

wangyiaihu2020-04-26 18:44

请详细解释说明，没个代码的意思，

#3

ZHRXJR2020-04-26 21:30

真的，这么着急吗？

#4

wangyiaihu2020-04-26 21:38

回复 3楼 ZHRXJR

不着急，
是自己也在同步开发，练习写，这一段，追加查询显示的内容后，老是报错，所以，看看，有没有能指导的，
每天花两三个小时，在弄这个，这两天，技术没长进，

以上是我自己加了一些东西，然后运行时就报错，所以看看，有没有人能解惑，

#5

ZHRXJR2020-04-27 09:56

程序代码：

MSFlexGrid1.Clear
MSFlexGrid1.Visible = True
With MSFlexGrid1   '这里是设置 MSFlexGrid1 的块，在块中不需要再用这个控件名，直接设置属性将可以了
    .Cols = 8   '这里是设置控件表格的列数
    .Rows = 1    '这里是设置控件表格的行数

    .TextMatrix(0, 0) = Space(3) & "序号"    '下面是设置表格头，也就是第一行的内容，第一个 0 是行数代码，第二个 0 是列数代码，Space(3) 是空格，为了使标题居中
    .TextMatrix(0, 1) = Space(6) & "设备编号"
    .TextMatrix(0, 2) = Space(6) & "抽屉台车号"
    .TextMatrix(0, 3) = Space(6) & "坏点位置"
    .TextMatrix(0, 4) = Space(6) & "坏点现象"
    .TextMatrix(0, 5) = Space(6) & "确认状态"
        .TextMatrix(0, 6) = Space(7) & "提交人员"

.TextMatrix(0, 6) = Space(7) & "权限"    '列数相同第6列只能显示权限，不能显示提交人员，应该修改为    .TextMatrix(0, 7) = Space(7) & "权限"

    .ColWidth(0) = 1000   '下面是设置各列的宽度
    .ColWidth(1) = 2000
    .ColWidth(2) = 2000
    .ColWidth(3) = 2000
    .ColWidth(4) = 2000
    .ColWidth(5) = 2000
   .ColWidth(6) = 2000
      .ColWidth(7) = 2000
     .ColWidth(8) = 2000   '总列数是8刘，看看现在一共有几列，这里肯定出错

End With

清楚了吗？

#6

wangyiaihu2020-04-27 18:33

回复 5楼 ZHRXJR

这是我见过解释最详细的一份代码了，看了能够吸收消化，赞！