eli olisi tälläinen kysymys. miten saadaan inputboxista ulos
siihen syötetty teksti kahtena sanana, jos väliin on lyöty space?
elikäs,
jos inputboxiin on kirjoitettu vaikka Matti Meikäläinen, miten saadaan nuo kaksi sanaa omiin stringeihin?
jos teen ihan perustyyliin:
dim strnimi as string dim strannanimi as string 'button.clicked:in alle strannanimi = inputbox("kirjoita nimesi","nimikenttä") strnimi = strannanimi messagebox.show("Terve " & strnimi)
näin saa koko nimen, mutta miten saa katsottua edelliset kirjaimet ennen space nappia ja loput spacen jälkeen?
ehkä joku keycode vois toimia et sais sen ekan pätkän tyyliin:
dim stretunimi as string If e.keycode = key.space Then stretunimi = strannanimi End IF
ei ole oikein tuo merkkijonoista erottelu hallussa :(
Merkkijonon voi jakaa osiin tietyn merkin kohdalta metodilla Split:
Dim nimi As String Dim osat() As String nimi = "Matti Meikäläinen" osat = nimi.Split(" ") If osat.Length = 2 Then MsgBox("Etunimi: " & osat(0)) MsgBox("Sukunimi: " & osat(1)) Else MsgBox("Väärä määrä välejä!") End If
Kiitokset!
Aihe on jo aika vanha, joten et voi enää vastata siihen.