高分求助!MSHFlextGrid的删除问题 我通过adodc1中的数据源向MSHFlexGrid控件添加数据(不是绑定),然后通过MSHFlexGrid的RemoveItem的方法将MSHFlexGrid中的数据删除,当删除到最后一行时,出现“不能删除最后一条非固定行”,我想把最后这条也删除,该怎么办?? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 苯方法:循环清除MSHFlexGrid的内容, for i=0 to MSHFlexGrid.cols-1 MSHFlexGrid.col=i MSHFlexGrid.Test="" next 写一个初始化MSHFlexGrid控件的函数,比如:sub mshflexgrid_show() With fg '控件名称 .Rows = 2 .Cols = 3 .TextMatrix(0, 0) = "code" .TextMatrix(0, 1) = "name" .TextMatrix(0, 2) = "number" .ColWidth(0) = 400 .ColWidth(1) = 600 .ColWidth(2) = 600 End Withend sub当要清空MSHFlexGrid内容时: fg.Clear call mshflexgrid_show 在删除代码前加一句:mshflexgrid1.fixedrows=0 If MSHFlexGrid.Rows=2 Then MSHFlexGrid.Rows=1Else MSHFlexGrid.RemoveItem MSHFlexGrid.RowSelEnd If FSO的getfile问题 vb中怎么样才能让表格像excel一样可以在每一个单元直接输入 图片调整的问题 怎么用VB创建控制面板的“计划任务“? 请问VBA中是否有接口或函数调用可以把word转化为pdf? datagrid+EXCEL 添加,删除,搜索记录 VB中怎样加载*.dll文件,和ocx是不是一样? 如何动态创建数组控件 OICQ里有一个上网类型的设置,请问有没有人知道OICQ是要那个设置做什么用的???? 翻译词汇 在MSHFlexGrid中,如何让文字竖直显示 连接本地库(access)的时候,表里面有记录,但是RecordCount确为-1?
for i=0 to MSHFlexGrid.cols-1
MSHFlexGrid.col=i
MSHFlexGrid.Test=""
next
With fg '控件名称
.Rows = 2
.Cols = 3
.TextMatrix(0, 0) = "code"
.TextMatrix(0, 1) = "name"
.TextMatrix(0, 2) = "number"
.ColWidth(0) = 400
.ColWidth(1) = 600
.ColWidth(2) = 600
End With
end sub当要清空MSHFlexGrid内容时:
fg.Clear
call mshflexgrid_show
MSHFlexGrid.Rows=1
Else
MSHFlexGrid.RemoveItem MSHFlexGrid.RowSel
End If