Citat:
Geomaster kaže:
Kod:
Dim razdvojeno() As String
razdvojeno = Split(TextBox1.Text, " ")
Dim i As Integer, broj As Integer
For i = LBound(razdvojeno) To UBound(razdvojeno)
broj = Val(razdvojeno(i))
' ovde si u promenljivu broj izvukao i-tu brojku iz TextBox-a, tu možeš
' da joj radiš šta hoćeš
Next i
Nisam dugo radio u VB6 tako da možda ima neke greške, ali to ti je princip
|
Veliko hvala prijatelju, to je to