Private Sub Command1_Click()
Call SetText(MSFlexGrid1)
End SubPrivate Sub SetText(ctlGrid As MSFlexGridLib.MSFlexGrid)
ctlGrid.TextMatrix(1, 1) = "Test"
End Sub
Call SetText(MSFlexGrid1)
End SubPrivate Sub SetText(ctlGrid As MSFlexGridLib.MSFlexGrid)
ctlGrid.TextMatrix(1, 1) = "Test"
End Sub
解决方案 »
- 很晚了。可我还在解决WebBrowse的一个问题。实在找不到解决办法。求各位大哥大姐帮忙。十分感谢了。
- 求助:索引超出范围。必须为非负值并小于集合大小。参数名: index
- 山西太原的VB的程序员进来看看...
- 诚聘一编程人员帮我做个小东西。QQ12675407
- 过路的朋友。来看看,一个很简单的问题,我就是不行!
- 请问如何做能防止VB向微软发送数据包?
- adodc控件编程实现数据筛选
- 求助 VB6 WebBrowser怎样获取 id="J_VolCat_???"的???
- 怎样在文本框内只输入数字而不输入字母?
- 如何将一个指定部件里的图像贴到另一个部件中!利用API
- 关于recordset.sort的问题
- 好何一句话改变richtextbox 所有文字的颜色,不要selcolor
Public Sub Gdtz(ByVal FG As object)
FG.Clear
FG.Cols = 10
FG.Rows = 19
End Sub