vb中MSHFlexGrid在第一列增加序号

几天前帮人做课程设计,遇到一个问题:怎么在vb中MSHFlexGrid在第一列增加序号,搜了一下,没有结果,果断自己编

看一下MSHFlexGrid的函数,发现一个叫做TextMatrix的,就是直接在指定位置加入文字,我试了下 MSHFlexGrid1.TextMatrix(0,0) = "排名",左上角果然出现了“排名”二字,ok,小喜悦,那直接在下面加循环,一直插入不就行了?

实践是检验真理的唯一标准, 试一下,但是要加几行呢?嗯……

查询结果mrc有几条记录了。代码就像下面的,果然ok。喜悦呢……

i=1

mrc.MoveFirst While mrc.EOF = False MSHFlexGrid1.TextMatrix(i,0) = i i = i + 1 mrc.MoveNext Wend

相关文章

Format[$] ( expr [ , fmt ] ) format 返回变体型 format$ 强制返回为文本 --------------------------...
VB6或者ASP 格式化时间为 MM/dd/yyyy 格式,竟然没有好的办法, Format 或者FormatDateTime 竟然结果和...
在项目中添加如下代码:新建窗口来显示异常信息。 Namespace My ‘全局错误处理,新的解决方案直接...
转了这一篇文章,原来一直想用C#做k3的插件开发,vb没有C#用的爽呀,这篇文章写与2011年,看来我以前没...
Sub 分列() ‘以空格为分隔符,连续空格只算1个。对所选中的单元格进行处理 Dim m As Range, t...
  窗体代码 1 Private Sub Text1_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integ...