CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg
Cookie ikon
Avatar billede luigi007 Nybegynder
10. december 2007 - 08:34 Der er 6 kommentarer

identificer en karakter i tekst streng

Jeg vil gerne lave en funktion der i en tekststreng, f.eks "johndoe@foobar.com", tager alle karakterne frem til @ og skriver ned i en ny tekst streng - så den nye tekststreng vil indeholde blot "johndoe"

Nogen der kan hjælpe - jeg er ikke så velbevandret i vbs

På forhånd tak!
Avatar billede gider_ikke_mere Nybegynder
10. december 2007 - 08:48 #1
Jeg kan ikke forestille mig det er så anderledes end i VBA:

Sub test()
Tekst = "johndoe@foobar.com"
For I = 1 To Len(Tekst)
    If Mid(Tekst, I, 1) = "@" Then
        Nytekst = Left(Tekst, I - 1)
        Exit For
    End If
Next
MsgBox Nytekst
End Sub
Avatar billede gider_ikke_mere Nybegynder
10. december 2007 - 08:53 #2
Og som funktion:

Sub Find()
Tekst = "johndoe@foobar.com"
MsgBox FIndtekst(Tekst)
End Sub

Function FIndtekst(a)
For I = 1 To Len(a)
    If Mid(a, I, 1) = "@" Then
        FIndtekst = Left(a, I - 1)
        Exit For
    End If
Next
End Function
Avatar billede smitten1 Nybegynder
10. december 2007 - 11:26 #3
Split er også lidt tiltrækkende:

s = Split("johndoe@foobar.com", "@")(0)
Avatar billede luigi007 Nybegynder
10. december 2007 - 12:38 #4
Smukt - tak for hjælpen
Avatar billede gider_ikke_mere Nybegynder
06. januar 2008 - 17:07 #5
Lukketid?
Avatar billede gider_ikke_mere Nybegynder
21. januar 2008 - 00:36 #6
Du skal acceptere et svar for at afslutte spørgsmålet.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra VBscript kategorien

Titel Indlæg Oprettet Seneste aktivitet
Ændre navn på folder Af bsn i VBscript 12 07/07/202312:45 09/07/202307:04
Outlook makro Af Webnoob i VBscript 6 09/02/202313:32 16/02/202315:51
Sti / Filname med mellemrum ??? Af ksor i VBscript 10 07/10/202200:43 07/10/202215:40
GetLastRow - Google spreadsheet Af rickiegrayholm i VBscript 2 22/04/202213:23 22/04/202214:55
Batch fil Af BDV i VBscript 1 12/01/202210:00 12/01/202210:05
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester



Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I dag 08:58 Camera til usb > 30 Megapixel Af KurtG i Foto & video
I dag 03:15 omarrangering af skærme Af jcr18 i Skærme
I går 11:41 Windows 10 : Ikke kopiere tekst med Firefox. Men gerne med Opera. Af Ikke-ekspert i Browsere
27/0718:09 Kan ikke fildele fra PC til PC Af gertLundberg i LAN/WAN
27/0717:33 Facebook kopier en tråd Af clausito i Sociale medier
White papers
Flere white papers »


Premium
Teaser billede
Her er de tre største it-sikkerhedsudfordringer for bestyrelser: ”De fleste ved ikke, hvilken risiko de står overfor”
Læs mere »
Løsesum betalt efter angreb mod bilforhandlere: Konsekvenserne påvirker USAs økonomi
Huawei er ramt af forbud og anklager om overvågning - men hvert år bliver unge it-ledere fra hele Europa sendt på sommerskole på selskabets regning
Kritikken af Motorregistret tager til: Opdateringer rammer alle elbiler
Se alle »
Computerworld
Teaser billede
Med SearchGPT har verden fået en spritny søgemaskine: Kan den true Googles dominans?
Læs mere »
Apples spritnye app til kodeord kommer til iOS 18: Sådan virker den
Test: Endelig kan man få en soundbar der lyder godt - og som ikke behøver nogen klodset subwoofer
Nørgaard: Jeg har jo sagt det gang på gang på gang! VMS er det bedste styresystem EVER! Men lytter folk?! Nej, nej og atter nej!
Se alle »
CIO
Teaser billede
Telenor skrotter ældre it-system: Nyt system er en hyldevare
Læs mere »
Derfor står Danske Bank foran en kæmpe AWS-transformation: Ellers skulle vi bygge en ny infrastruktur for at følge med
Stor aftale gør Microsofts datacentre hurtigere - investerer i netværksudstyr
Top-CIO Rasmus Lundgaard Pedersen balancerer hele tiden mellem to poler
Se alle »
Job & Karriere
Teaser billede
Efter 12 år er NNIT's hovedkvarter i Søborg nu ryddet og tomt - alle arbejder hjemme: "Det er med et vist vemod"
Læs mere »
Dansk top-profil trækker sig fra Microsoft: Skal være direktør i TDC Erhverv
KMD-direktør forlader selskabet: Det skal hun nu
IBM Danmark skifter ud i sin øverste ledelse - her er den nye direktion
Se alle »
White paper
Teaser billede
Informationshåndtering på frontlinjen: Sådan optimerer du med automatisering
Læs mere »
Det behøver ikke at gøre ondt: Sådan gør du livet lettere for kunder med multicloud
Nemmere overblik, styring og omkostningskontrol i dit multicloud-miljø
SASE: Træf det rette valg – første gang
Se alle »

Events
Flere events »
White papers
Flere white papers »
IT-Kurser
Se alle vores it-kurser »