Memecah string

Comments

• khiwie1979

  May 2006

  Coba Mas / Mbak pakai fungsi split("string yang dipecah","karakter pemisah"). Nih contohnya (moga-moga ga salah) :
  
  
  stringku=split("admin@klenix.org","@)
  
  Tapi ntar hasilnya jadi Array :
  stringku(0)="admin"
  stringku(1)="klenix.org"
• nundee

  May 2006

  betul mas khiwie1979, koding lengkap yang paling mudah untuk mencoba fungsi split...
  
  
  Private Sub Form_Load()
  Dim i As Integer
  Dim a
  a = Split("admin@klenix.org", "@" )
  For i = LBound(a) To UBound(a)
  List1.AddItem a(i)
  Next i
  End Sub
  
  
  semoga membantu...
• khiwie1979

  May 2006

  Thank's mas nundee buat koreksinya =D
• nundee

  May 2006

  Originally posted by khiwie1979
  Thank's mas nundee buat koreksinya =D

  
  bukan koreksi kok, hanya menambahkan.....
• klenix

  May 2006

  Thankyou, udah jalan. lama2 asyik juga coding desktop, lebih mudah daripada web, logikanya lebih sederhana. sekarang aku dah bisa enjoy coding dengan vb, thanks semua. Rencana programku mau tak upgrade dari acces ke sql server sama oracle, nih. yah, sapa tahu ada yang tertarik:). oh, ya, ada yang pernah pake posgresql ga? bagi dunk pengalamannya, daripada kena lisence neh.. sebab dari pengalaman klien biasanya nggak mau tahu mau pake apa, yang penting solutif dan berjalan lancar. mo pake access, oracle, sqlserver ato apalah namanya yang penting programnya jalan.