For i = 1 To 6
For k = i + 1 To 6
For y = 1 To 5
If criterc(y) = 1 Then
h(i, 0) = " c(" & i & ", " & k & ")"
h(i, y + 1) = y
Else
If criterd(y) = 1 Then
l(i, 0) = " c(" & i & ", " & k & ")"
l(i, y + 1) = y
End If
Next y
Next k
Next i
End If
End Sub
bole bi kod yazdim ama surekli hata veriyor...next without for..for without next gibi ne yaptiysam olmadi
komut hatasi..yardimederseniz sevinirim
Bu Konudaki Yorumlar |
komut hatasi..yardimederseniz sevinirim - Yazar: ubermensch - 25/12/2009, 00:28
Cvp: komut hatasi..yardimederseniz sevinirim - Yazar: ozanakkaya - 25/12/2009, 00:41
Cvp: komut hatasi..yardimederseniz sevinirim - Yazar: Seruz - 25/12/2009, 10:27
|
Konuyu Okuyanlar: 1 Ziyaretçi