我在模块里写了如下子程序
Public Sub Setgrid1(Msfgrid As MSFlexGrid)
'Dim igrid As Integer, icol As Integer
With Msfgrid
.Row = 0
.Col = 0
.Text = "行号"
.Col = 1
.Text = "分类名称"
.Col = 2
.Text = "使用模板"
.ColWidth(0) = 1000
.ColWidth(1) = 2000
.ColWidth(2) = 2000
For igrid = 1 To .Rows - 1
If .TextMatrix(igrid, 1) <> "" Then
.TextMatrix(igrid, 0) = igrid
Else
Exit Sub
End If
Next igrid
End WithEnd Sub为什么在窗体中调用该程序时说类型不匹配。
setgrid1(msffl)
解决方案 »
- 请问这样的字符,3,5,怎么取啊?
- ini文件在纯英文系统下编码为Unicode写入中文问题
- VB如何 对硬盘的头部 和 扇区进行读写操作?
- 怎样编程自动应答messagebox对话框
- VSFlexGrid可以实现Treeview的所有功能吗?
- VB和ASM(50分)(我的帖子没有过去百人的时候)
- 如何使用FlatScrollBar控件代替MSHFlexgrid里自带的滚动条,使网格滚动!
- VB串口通信
- 推荐个打包程序吧
- csdn应该为VB初学者提供一下VB与仪表开发过程视频教程
- 菜鸟的问题~~~randomize这个怎么用呀?
- 在制作组件的时候,我想把一大段javascript加到组件里面去,怎么才能放进去。
或者
setgrid1 msffl