dim str
dim arr

str = "000:111:222:333"
arr = split(str,":")

hasilnya :

arr(0) = "000"
arr(1) = "111"
arr(2) = "222"
arr(3) = "333"

----- Original Message ----- 
From: "Iwan Setiawan" <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Monday, January 16, 2006 3:58 PM
Subject: [indoprog-vb] Pemisah di text


> Dear All,
> 
> Saat ini saya punya data text sebagai berikut
> 
> Label1="00:data:989:teest:0909:7677:7:power:akhir::W656'"
> 
> Sedangkan lambang ' adalah tanda akhir baris
> Pemisah antar data menggunakan tanda : sedangkan isi data tiap field data,
> tidak dapat diperkirakan max panjangnya (dari 1 char hingga 1998).
> Bagaimana cara agar data dari atas, bisa saya pecah menjadi data-data
> dibawah
> 
> Data1="00"
> Data2="data"
> Data3="989"
> Data4="teest"
> Data5="0909"
> Data6="7677"
> Data7="7"
> Data8="power"
> Data9="akhir"
> Data10=""
> Data11="w656"
> 



Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED]

Ikuti juga forum diskusi VB.net dengan 
mengirim email kosong ke [EMAIL PROTECTED]
 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/indoprog-vb/

<*> To unsubscribe from this group, send an email to:
    [EMAIL PROTECTED]

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/
 



Kirim email ke