作者qwqw46 (王阿伯挂了....)
看板Visual_Basic
标题[VBA6.0 ] 请问一下 这个函数里面哪边有错?
时间Thu Nov 13 00:51:16 2008
Private Sub Form_Load()
MSFlexGrid1.Rows = 400 '纵向
MSFlexGrid1.Cols = 12 '横向
Hb = 5
For i = 0 To 9
MSFlexGrid1.ColWidth(i) = 1000
Next i
For i = 0 To 399
MSFlexGrid1.RowHeight(i) = 400
Next i
MSFlexGrid1.TextMatrix(0, 0) = "天数"
MSFlexGrid1.TextMatrix(0, 1) = "V1"
MSFlexGrid1.TextMatrix(0, 2) = "V2"
MSFlexGrid1.TextMatrix(0, 3) = "W1"
MSFlexGrid1.TextMatrix(0, 4) = "QW1"
MSFlexGrid1.TextMatrix(0, 5) = "Pump"
MSFlexGrid1.TextMatrix(0, 6) = "Pump(All)"
MSFlexGrid1.TextMatrix(0, 7) = "QWE(All)"
MSFlexGrid1.TextMatrix(0, 8) = "V1Spill(All)"
MSFlexGrid1.TextMatrix(0, 9) = "WE'spill(All)"
MSFlexGrid1.TextMatrix(0, 10) = "V1ava"
MSFlexGrid1.TextMatrix(0, 11) = "V2ava"
For i = 1 To 365
MSFlexGrid1.TextMatrix(i, 0) = "第" & i & "天"
Next i
End Sub
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.121.221.87
1F：推 ClubT:[13 形态不符] 是这样吗? 应该是错在最後的回圈吧 11/13 09:40
2F：推 ClubT:好像不是 囧 11/13 09:45
3F：→ MOONRAKER:错误讯息好歹也附来吧，让大家打哑谜有何意义 11/13 14:00
4F：推 ClubT:我执行没错耶XD 你的讯息该不会是 [424 此处需要物件] 吗? 11/13 15:44