27. december 2003 - 23:59
Der er
12 kommentarer og 1 løsning
udtage info fra string
kan man udtage info fra en fast string... f.eks name = "USERNAME Wizz" => username = "Wizz" name = "USERNAME Google" => username = "Google" eller addr = "Ostegade 71, 5732 Bredby" => gade = "Ostegade" gadenr = "71" postnr = "5732" by = "Bredby" addr = "Trandegade 63, 2144 Grødby" => gade = "Trandegade" gadenr = "63" postnr = "2144" by = "Grødby"
Annonceindlæg fra Barco
28. december 2003 - 00:09
#1
' Text1.text har Multiline sat til True Private Sub Command1_Click() addr = "Ostegade 71, 5732 Bredby" addr = Replace(addr, ",", "") arr = Split(addr, " ") Text1.Text = "" Text1.Text = Text1.Text & "gade = " & arr(0) & vbCrLf Text1.Text = Text1.Text & "gadenr = " & arr(1) & vbCrLf Text1.Text = Text1.Text & "postnr = " & arr(2) & vbCrLf Text1.Text = Text1.Text & "bynavn = " & arr(3) End Sub
28. december 2003 - 00:14
#2
28. december 2003 - 00:22
#3
er der ingen måde at lave en skabelon... f.eks USERNAME *[0,100] oversat USERNAME også tag 0 til 100 bogstaver/tal efter
28. december 2003 - 00:30
#4
dim navn, tmp navn = "USERNAME Wizz" tmp = Mid(navn, Len("USERNAME") + 1) MsgBox tmp bruge ikke "name" da det er reserveret.
28. december 2003 - 00:35
#5
okay, tak :)
28. december 2003 - 00:35
#6
point?
28. december 2003 - 00:36
#7
lige inden, jeg kan ikke finde Mid funktionen på msdn bibloteket, har du linket?
28. december 2003 - 00:41
#8
28. december 2003 - 00:42
#9
28. december 2003 - 00:42
#10
ting = funktioner :)
28. december 2003 - 00:49
#11
jeg fandt dem også lige på msdn :)
28. december 2003 - 00:50
#12
Lækkert :) Takker for points. - Godt nytår!
28. december 2003 - 16:34
#13
i lige måde :)
Kurser inden for grundlæggende programmering