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 tema
Cloud & AI
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
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