为什么我将MSHFlexGrid.rows=2的时候还是只能看到一行啊!(即表头啊!) 急 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 你为字段赋值了么,给你一段我的代码参考With reportgrid .Rows = 2 .CellAlignment = 4 .TextMatrix(0, 0) = "虫腹" .TextMatrix(0, 1) = "╰参" .TextMatrix(0, 2) = "秨虫虫" .TextMatrix(0, 3) = "そ" .TextMatrix(0, 4) = "肈" .TextMatrix(0, 5) = "弧" .TextMatrix(0, 6) = "摸" .TextMatrix(0, 7) = "ビ叫" .TextMatrix(0, 8) = "惠璶Ч戳" .TextMatrix(0, 9) = "э弧" .TextMatrix(0, 10) = "筿福竒快" .TextMatrix(0, 11) = "龟悔Ч戳" .TextMatrix(0, 12) = "ㄏノ" .TextMatrix(0, 13) = "ノめ喷Μ" .TextMatrix(0, 14) = "狝叭篈" .TextMatrix(0, 15) = "珇借" .TextMatrix(0, 16) = "┦" .TextMatrix(0, 17) = "秨虫ら戳" .TextMatrix(0, 18) = "喷Μら戳" .TextMatrix(0, 19) = "э" .TextMatrix(0, 20) = "蝴臔" .TextMatrix(0, 21) = "称爹" Do While Not src.EOF .Rows = .Rows + 1 .CellAlignment = 4 .TextMatrix(.Rows - 2, 0) = src.Fields(0) .TextMatrix(.Rows - 2, 1) = src.Fields(1) .TextMatrix(.Rows - 2, 2) = src.Fields(2) .TextMatrix(.Rows - 2, 3) = src.Fields(3) .TextMatrix(.Rows - 2, 4) = src.Fields(4) .TextMatrix(.Rows - 2, 5) = src.Fields(5) .TextMatrix(.Rows - 2, 6) = src.Fields(6) .TextMatrix(.Rows - 2, 7) = src.Fields(7) .TextMatrix(.Rows - 2, 8) = src.Fields(8) .TextMatrix(.Rows - 2, 9) = src.Fields(9) .TextMatrix(.Rows - 2, 10) = src.Fields(10) .TextMatrix(.Rows - 2, 11) = src.Fields(11) .TextMatrix(.Rows - 2, 12) = src.Fields(12) .TextMatrix(.Rows - 2, 13) = src.Fields(13) .TextMatrix(.Rows - 2, 14) = src.Fields(14) .TextMatrix(.Rows - 2, 15) = src.Fields(15) .TextMatrix(.Rows - 2, 16) = src.Fields(16) .TextMatrix(.Rows - 2, 17) = src.Fields(17) .TextMatrix(.Rows - 2, 18) = src.Fields(18) .TextMatrix(.Rows - 2, 19) = src.Fields(19) .TextMatrix(.Rows - 2, 20) = src.Fields(20) .TextMatrix(.Rows - 2, 21) = src.Fields(21) src.MoveNext Loop乱码部分是繁体字,不用介意 关于XMLHTTP无法正确返回结果的问题。。 求關于VB中CLASS的詳細資料 请问vb怎样与其它计算机连接(不用控件) 急求乡镇医院管理系统 怎么才能得到msflexgrid单元格的行列 vb编程时命名采用什么规则,匈牙利法则?还是其他什么更好一点规则 关于VB生成EXE文件后进程问题 如果我在互联网上有一台服务器装有SQL,我怎样写一个客户端的程序可连接上面的数据库?(28分)28 TMD没14。接着散!!!!!!!!!!!!! VB EXCEL 文件查找并复制 这句程序什么意思? 哪位朋友知道怎么改变listview 表头的背景颜色,及其滚动栏的颜色
With reportgrid
.Rows = 2
.CellAlignment = 4
.TextMatrix(0, 0) = "虫腹"
.TextMatrix(0, 1) = "╰参"
.TextMatrix(0, 2) = "秨虫虫"
.TextMatrix(0, 3) = "そ"
.TextMatrix(0, 4) = "肈"
.TextMatrix(0, 5) = "弧"
.TextMatrix(0, 6) = "摸"
.TextMatrix(0, 7) = "ビ叫"
.TextMatrix(0, 8) = "惠璶Ч戳"
.TextMatrix(0, 9) = "э弧"
.TextMatrix(0, 10) = "筿福竒快"
.TextMatrix(0, 11) = "龟悔Ч戳"
.TextMatrix(0, 12) = "ㄏノ"
.TextMatrix(0, 13) = "ノめ喷Μ"
.TextMatrix(0, 14) = "狝叭篈"
.TextMatrix(0, 15) = "珇借"
.TextMatrix(0, 16) = "┦"
.TextMatrix(0, 17) = "秨虫ら戳"
.TextMatrix(0, 18) = "喷Μら戳"
.TextMatrix(0, 19) = "э"
.TextMatrix(0, 20) = "蝴臔"
.TextMatrix(0, 21) = "称爹"
Do While Not src.EOF
.Rows = .Rows + 1
.CellAlignment = 4
.TextMatrix(.Rows - 2, 0) = src.Fields(0)
.TextMatrix(.Rows - 2, 1) = src.Fields(1)
.TextMatrix(.Rows - 2, 2) = src.Fields(2)
.TextMatrix(.Rows - 2, 3) = src.Fields(3)
.TextMatrix(.Rows - 2, 4) = src.Fields(4)
.TextMatrix(.Rows - 2, 5) = src.Fields(5)
.TextMatrix(.Rows - 2, 6) = src.Fields(6)
.TextMatrix(.Rows - 2, 7) = src.Fields(7)
.TextMatrix(.Rows - 2, 8) = src.Fields(8)
.TextMatrix(.Rows - 2, 9) = src.Fields(9)
.TextMatrix(.Rows - 2, 10) = src.Fields(10)
.TextMatrix(.Rows - 2, 11) = src.Fields(11)
.TextMatrix(.Rows - 2, 12) = src.Fields(12)
.TextMatrix(.Rows - 2, 13) = src.Fields(13)
.TextMatrix(.Rows - 2, 14) = src.Fields(14)
.TextMatrix(.Rows - 2, 15) = src.Fields(15)
.TextMatrix(.Rows - 2, 16) = src.Fields(16)
.TextMatrix(.Rows - 2, 17) = src.Fields(17)
.TextMatrix(.Rows - 2, 18) = src.Fields(18)
.TextMatrix(.Rows - 2, 19) = src.Fields(19)
.TextMatrix(.Rows - 2, 20) = src.Fields(20)
.TextMatrix(.Rows - 2, 21) = src.Fields(21)
src.MoveNext
Loop
乱码部分是繁体字,不用介意