Streng -> Nummer

CInt("123123")

//>Rune

dim t as integer
dim str as string
dim num as long
str = "Andreas"

num = 0
for t = 0 to len(str)
  num = num + asc(mid(str,t,1)
next

msgbox num

altså fx.:

Dim strStreng As String
Dim intInteger As Integer

strStreng = "1234"

så kan du konvetere det sådan her:
intInteger = CInt(strStreng)

//>Rune

in in VB is max 32767 or something like that
CLng(32768) or CDbl() or ...... LOOK AT VB HELP!

Jeg tror ik' jeg har forstået dig korrekt..

Er det det her du ønsker?
For i = 65 to 90
    MsgBox((chr(i))
Next

//>Rune

Jeg tror ikke der en vb funktion men du kan selv lave det.
Evt. noget som dette:

ls = "andreas"

For i = 1 To Len(ls)
    ret = ret & Asc(Mid(ls, i, 1))
Next
MsgBox ret

ocp > tager den højde for at nogle strenge er længere end andre?

Rune > Du har misforstået det!

Hmm. alt for sent på den ...

Yes.

Gør asc() ikke forskel på store og små bogstaver? (A=65 og a=97)

Jo

Ole 288
Steen 511
Anders 605

Det skulle være:

Anders
Ole
Steen

Kan det ikke lade sig gøre?

Det er jo fordi at du lægger flere asc værdier sammen ved Anders end ved Ole

Så skal du lægge asc værdierne sammen som jeg viste i mit eks :

ls = "andreas"

For i = 1 To Len(ls)
    ret = ret & Asc(Mid(ls, i, 1))
Next
MsgBox ret

altså med & isteddet for +

Hvorfor vil du lave et navn om til et tal ?
Vil du ikke bare have sorteret navnene ?

Du kan jo gøre således?

asc(mid(lcase(str),t,1)

Bo = (66 + 111) = 177
Andreas = (97 + 110 + 100 + 114 + 101 + 97 + 115)  = 734


Bo = (66 & 111) = 66111
Andreas = (97 & 110 & 100 & 114 & 101 & 97 & 115)  = 9711010011410197115

Ja, hvad er det egentlig du skal lave?

Hvis du laver bogstaverene om til tal får du også problemer med "a" og f.eks "d"
a = 97
d = 100
Så kommer "d" før "a" hvis der sorteres på tallet.

zyber >> det er da noget sludder... et sortering på tal vil da give 97 før 100.

//akj

Dim I, J, t, arr(2)
arr(0) = "Bo"
arr(1) = "Ole"
Arr(2) = "Andreas"

For I = UBound(arr) - 1 To 0 Step -1
    For J = 0 To I
        If Arr(J) > Arr(J+1) Then
            t = Arr(J)
            Arr(J) = Arr(J+1)
            Arr(J+1) = t
        End If
    Next
Next

Så er array'et alfabetisk sorteret.

dk_akj> ja ok, men tallet er faktisk en tekst string og derfor går det galt med sortering. Jeg ved ikke hvilken data type du vil bruge til at holde på tal værdien 9711010011410197115 ("andreas", hvilket endda er et forholdsvis kort navn)

dk_akj >>> uanset om man bruger + eller & så skulle Andreas helst komme før Bo.

Jeg tror man kan bruge en double
Fra msdn:
Contains a double-precision, floating-point number in the range -1.79769313486232E308 to -4.94065645841247E-324 for negative values; 4.94065645841247E-324 to 1.79769313486232E308 for positive values.

Så kan selv de kongelige få deres navn konverteret til et tal i muta's db eller hvad han nu laver :o)

///akj

zyber > Det er netop det jeg skal bruge. Og det virker!

Min fejl, sorry...

Bo = (66 & 111) = 66111
Andreas = (65 & 110 & 100 & 114 & 101 & 97 & 115)  = 6511010011410197115

Så vil andreas komme før bo

//akj