Kodenya di textbox tapi di ListBox. Coba seperti dibawah ini: Private Sub List1_Click() rs.Open "select hargabarang from namatable where namabarang = '" & List1.Text & "'" Text1 = rs!hargabarang rs.Close End Sub
Pada tanggal 23/04/08, okta mesepi <[EMAIL PROTECTED]> menulis: > > Dear moderator's dan master's > > Salam kenal dari saya yang baru gabung dimilis ini, nama saya okta dan > baru belajar computer dan tertarik sama vb karena kita bisa berkreasi dan > berangan-angan dengan menuangkan konssep atau ide untuk membuat program. > > sekalian disini saya mau tanya satu hal, kalo kita punya listbox yang > isinya nama2 barang misal mobil, motor, kapal laut dsb terus saya bikin > textbox yang dimaksukan, jika dilistbox dipilih mobil maka ditextbox berisi > harganya 10juta, jika dipilih motor maka harganya 2jt dst. > > kira2 bagaimana code untuk ditextboxnya ya?? terimakasih para master atas > bantuannya. > > > > okta > > > >
