|
Monday, 31 October 2011
pencarian menggunakan textbox VB6
Posted by Unknown | Monday, 31 October 2011 | Category:
tutorial VB6
|
Adodc1.RecordSource = "select*from pesan where nama='" & Text4 & "' "
Adodc1.Refresh
With Adodc1.Recordset
If .BOF And .EOF Then
MsgBox "data tidak ada"
Text4 = ""
Text4.SetFocus
Else
tampil
Text4 = ""
Text4.SetFocus
End If
End With
Subscribe to:
Post Comments (Atom)
Popular Posts
-
klik download Narpes Antivirus C Language Source Code V 2 klik download Narpes Antivirus C Language Source Code V 1 klik download Narp...
-
free antivirus local indonesia klik download setup klik download portable
-
Kursus View more documents from Ahmad Mustaqim .
-
monggo dipun unduh bos...bok menawi pengen di cobo... Adobe PhotoShop CS5 12.0.3 meniko dipun pencet . 3all
-
2 Langkah Mudah Bergabung Daftar Gratis 100%, Tanpa Biaya Registrasi ( ahmad mustaqim CN001741 ) 085640865808 >>...
-
if adodc1.recordset.BOF and adodc1.recordset. EOF then text1.text=format (date,"yyyy") & "001" else adodc1.record...
-
klik download
-
Gridkaryawan.Cols = 6 Gridkaryawan.Rows = 10 Gridkaryawan.ColWidth(0) = 100 Gridkaryawan.ColWidth(1) = 900 Gridkaryawan.ColWidth(2) = 200...
Currently have 0 comments: