[VBA6.0 ] 請問一下 這個函數裡面哪邊有錯?
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
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
11/13 15:44, 4F