作者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