Hallo Expert VB.NET
Biasanya kalau saya lakukan query di VB 6, dan hasil querynya tampilkan di
Text box txtNama, saya gunakan contoh code seperti dibawah ini:
Rs.open "Select nama from tabel1 where NomorInduk='240401'"
If not rs.eof then
txtNama= rs!nama
else
msgbox "Data tidak ditemukan"
End if
Yang mau saya tanyakan:
Bagaimana menampilkan hasil query di Text box pada VB .NET.
Saya menggunakan code seperti dibawah ini:
Dim sqlstring = "select Nama from tabel1 where NomorInduk =
'240401'"
Dim da As New MySqlDataAdapter(sqlstring, cnn)
da.Fill(ds, "tabel1")
If ds.Tables("tabel1").Rows.Count > 0 Then
' txtNama= ???????? 'disini saya tidak tahu
harus ketik code apa disini. Untuk menampilkan di txtNama
Else
MsgBox("Data tidak ditemukan")
ds.Clear()
ds.Dispose()
End If
