behöver ta en textrad o lägga dom i en vektor

till exempel
tal(50)
3+4+1+5

0 3
1 +
2 4
3 +
4 5

Alltså lägga uttrycket i en vektor
mvh tobben

<code>
Option Explicit
Private Sub Form_Load()
Dim Tal() As String, SortedArray(50) As Long
Dim talTxt As String, i As Long, Fnum As Long
Fnum = FreeFile
Open ("C:\Temp\MinaTal.txt") For Input As #Fnum
Line Input #Fnum, talTxt
Close #Fnum
Tal = Split(talTxt, "+")
For i = 0 To 50
SortedArray(Tal(i)) = Clng(Tal(i))
Next 'i
'Nu ligger talen sorterade i vektor SortedArray
End Sub
</code>

tanken va att ja skulle skriva in uttrycket i en textruta


/tobben

Ja det får du gärna göra för min del.
Nu får du tame faen bjuda till lite själv.Det ligger ju serverat framför dig.

<b>behöver ta en textrad o lägga dom i en vektor </b>
Hur skall Vi kunna veta var denna textrad kommer från.En textfil är det naturliga för mig.

Vad är en textruta för något ? uttrycket skall skrivas i en textruta. Vilket djä... uttryck ?

Det är bara läsa bifogad kod och ändra bäst fae... du vill och lägg svaret var faen... du vill.

Börja att testa med MsgBox. Nog om detta "you are on your own now"

Label,TextBox,PicktureBox och en Form är alla rutor(windows) som kan innehålla text(textruta)

mitt misstag vill inte veta allt på en gång utan ha det i delar


men jätte tack för hjälpen