[VBA6.0 ] 請問一下 這個函數裡面哪邊有錯?

看板Visual_Basic作者 (王阿伯掛了....)時間17年前 (2008/11/13 00:51), 編輯推噓3(301)
留言4則, 2人參與, 最新討論串1/1
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

11/13 09:40, , 1F
[13 形態不符] 是這樣嗎? 應該是錯在最後的迴圈吧
11/13 09:40, 1F

11/13 09:45, , 2F
好像不是 囧
11/13 09:45, 2F

11/13 14:00, , 3F
錯誤訊息好歹也附來吧,讓大家打啞謎有何意義
11/13 14:00, 3F

11/13 15:44, , 4F
我執行沒錯耶XD 你的訊息該不會是 [424 此處需要物件] 嗎?
11/13 15:44, 4F
文章代碼(AID): #196mc97J (Visual_Basic)