gan, saya ingin bertanya, bagaimana cara menggabungkan string..
begini om table saya :



ini codingnya :

 Private Sub txtKode_KeyPress(KeyAscii As Integer)

 If KeyAscii = 13 Then

 Call Koneksi

 If txtKode.Text = "" Then

 MsgBox "Input Kode Terlebih Dahulu !", vbCritical + vbOKOnly, "Error"

 txtKode.SetFocus

 Else

 SQL = ""

 SQL = "SELECT * FROM tb_beiby " _

 & "WHERE kode ='" & txtKode.Text & "'"

 Set rsPeriksa = conn.Execute(SQL)

 

 If Not rsPeriksa.BOF Then

 

 SQL1 = "SELECT * FROM tb_beiby where kode = '" & txtKode.Text & "'"

 Set rsPeriksa1 = conn.Execute(SQL1)

 

 lblMacam = rsPeriksa1.Fields("macam")

 

 Else

 MsgBox "Kode " & txtKode.Text & " tidak ada!", vbCritical + vbOKOnly, "Error"

 End If

 End If

 End If

 End Sub

dan ini hasilnya :


gimana om caranya supaya bisa ngegabung,,
contoh kodenya = "buah01"
dan
hasilnya : mangga, jeruk, kiwi, sirsak

Mohon pencerahannya