Dim posisi As Integer
str = "ABC Mentimun Jepang"
'posisi spasi pertama
posisi = InStr(1, str, " ", vbTextCompare)
strambil = Mid(str, posisi + 1, Len(str))
silakan di coba
'===
--- In belajar-access@yahoogroups.com, "noorshiam" <noorshiam@...> wrote:
>
> Dear All My Best Friend At Belajar-Access ^_^
>
> To the point aja, misal saya punya string berikut :
>
> ABC Mentimun Jepang
> ABC Labu Siyem
> BCD Kangkung Lombok
> DEF Cabe Rawit
>
> Nah, bagaimana cara memanipulasi string diatas sehingga menjadi :
>
> Mentimun Jepang ABC
> Labu Siyem ABC
> Kangkung Lombok BCD
> Cabe Rawit DEF
>
> Atas bantuan dan pencerahan rekan-rekan yang baik, saya haturkan banyak-banyak terima kasih.
>
>
> Salam
>
> Arief Noorshiam
>
------------------------------------
SPAM IS PROHIBITEDYahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/belajar-access/
<*> Your email settings:
Individual Email | Traditional
<*> To change settings online go to:
http://groups.yahoo.com/group/belajar-access/join
(Yahoo! ID required)
<*> To change settings via email:
belajar-access-digest@yahoogroups.com
belajar-access-fullfeatured@yahoogroups.com
<*> To unsubscribe from this group, send an email to:
belajar-access-unsubscribe@yahoogroups.com
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
No comments:
Post a Comment