Visual Basic гляньте ошибку

[Яна696]

кто-нибудь понимает в чем здесь беда?:
"Sub sort1(bytA() As Byte, T As TextBox)
For bytI = 1 To 5
Call минэлемент(bytA, 1, bytN)
For bytK = 1 To 5
bytR = bytA(bytI)
bytA(bytI) = bytA(bytN)
bytA(bytN) = bytR
'For bytK = 1 To 5
T.Text = T.Text + Str(bytA(bytK))
Next bytK
T.Text = T.Text + vbCrLf + vbCrLf
Next bytI
MsgBox (T.Text), vbInformation + vbOKOnly, "Отсортированный массив"
End Sub
Sub минэлемент(bytA() As Byte, bytJ As Byte, bytN As Byte)
bytmin = bytA(bytJ)
bytN = bytJ
For bytO = bytJ + 1 To 5
If bytA(bytO) <= bytmin Then
bytmin = bytA(bytO)
bytN = bytO
End If
Next bytO
End Sub"

[Smitt&Wesson]

По-моему в этом: "минэлемент". VB не понимает кириллицу в названиях функций.

[Яна696]

щас попробую..но он первый элемент находит а потом ахинею какую-то несет(
не,попробовала...не в этом дело((( он просто сортирует фиг пойми как( еще и какие-то левые элементы приписывает..
у меня тупняк ...уже 2 часа голову ломаю..

[Яна696]

всё,разобралась) уже не надо)