coba gunakan fungsi array, trs pake metode split.. contoh : dim potong() as string 'inisialisasi array dim Kalimat as string
Kalimat = "25 s/d 28 September 2008" potong() = split(Kalimat, " ") 'pisahkan kata dalam "Kalimat" dengan pemisah (spasi) yang terdapat pada tanda yg diapit string " " maka akan didapat : potong(0) = 25 'array ke 0 potong(1) = s/d 'array ke 1 potong(2) = 28 'array ke 2 potong(3) = September 'array ke 3 potong(4) = 2008 'array ke 4 mudah2an bermanfaat.. [EMAIL PROTECTED] Pada tanggal 26/06/08, zamhur <[EMAIL PROTECTED]> menulis: > kalo sudah fix panjang kata keseluruhan atau dari kiri saja atau dari kanan > saja, bisa pakai MID(textnya,x,y) > > > > ----- Original Message ---- > From: yoesgreat <[EMAIL PROTECTED]> > To: [email protected] > Sent: Wednesday, 25 June 2008 8:58:45 > Subject: [Programmer-VB] Memotong Kata > > > Ada yang bisa bantu gak yaa...! > > saya ingin memotong kata yang letaknya ditengah dalam sebuah kalimat. > > contoh : "25 s/d 28 September 2008" > > yang ingin saya ambil hanya kata "september"nya aja. > > bisa bantu untuk source code-nya! > > > > > New Email names for you! > Get the Email name you've always wanted on the new @ymail and > @rocketmail. > Hurry before someone else does! > http://mail.promotions.yahoo.com/newdomains/sg/
