behöver ta en textrad o lägga dom i en vektor <code> tanken va att ja skulle skriva in uttrycket i en textruta Ja det får du gärna göra för min del. <b>behöver ta en textrad o lägga dom i en vektor </b> mitt misstag vill inte veta allt på en gång utan ha det i delarlägga talen i en textsträng 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 tobbenSv: lägga talen i en textsträng i en vektor
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>Sv:lägga talen i en textsträng i en vektor
/tobbenSv: lägga talen i en textsträng i en vektor
Nu får du tame faen bjuda till lite själv.Det ligger ju serverat framför dig.Sv:lägga talen i en textsträng i en vektor
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)Sv: lägga talen i en textsträng i en vektor
men jätte tack för hjälpen