vuquockhanh-54
Thành viên mới

- Tham gia
- 10/6/15
- Bài viết
- 4
- Được thích
- 0
Chào mọi người,
Em viêt môt đoạn code nhưng nó bị lỗi "Invalid qualifier".Em ko biết tại sao nữa. Mọi nguơi xem cho em vs ạ
Em cam ơn !!
Private Sub SectionContour(Sommet() As Double, n As Integer, X() As Double, Y() As Double)
Dim i As Integer
ReDim X(1 To n) As Double
ReDim Y(1 To n) As Double
For i = 1 To n
X(i) = Sommet(i, 1).Value
Y(i) = Sommet(i, 2).Value
Next i
End Sub
Em viêt môt đoạn code nhưng nó bị lỗi "Invalid qualifier".Em ko biết tại sao nữa. Mọi nguơi xem cho em vs ạ

Em cam ơn !!
Private Sub SectionContour(Sommet() As Double, n As Integer, X() As Double, Y() As Double)
Dim i As Integer
ReDim X(1 To n) As Double
ReDim Y(1 To n) As Double
For i = 1 To n
X(i) = Sommet(i, 1).Value
Y(i) = Sommet(i, 2).Value
Next i
End Sub