tipe data Numeric kmu ubah menjadi Text
----- Pesan Asli ---- Dari: yongki <[EMAIL PROTECTED]> Kepada: vb - indo <[EMAIL PROTECTED]>; Programmer - VB <[email protected]>; indo prog vb <[EMAIL PROTECTED]> Terkirim: Selasa, 24 Juli, 2007 11:55:49 Topik: [Programmer-VB] membaca variabel desimal ke string salam para programmer.. ... tu de poin aja ya, saya punya 2 database yaitu : database A berisi field KODE (text, 10) dan field NAMA (text, 30) database B berisi field USER (text, 30), field TANGGAL (date) dan field KODE (numeric, 5.1) nah 2 database ini punya relasi berdasarkan field KODE. Isi database A : ------------ --------- --------- --------- --------- | Kode | Nama | ------------ --------- --------- --------- --------- | 100 | Transprotasi | | 100.1 | Bahan Bakar | | 200 | Biaya Lain2 | | 200.1 | Konsumsi Tamu | Isi database B : ------------ --------- --------- --------- --------- ------ | User | Tanggal | Kode | ------------ --------- --------- --------- --------- ------ | Anton | 07/14/07 | 100.1 | | Andi | 07/20/07 | 200.1 | | Anita | 07/20/07 | 100 | lalu saya buat 1 program yg berisi 2 DATA , 2 DBGrid dan 1 label. masing2 DATA konek ke 2 database berbeda tadi (DATA1 konek ke A dan DATA2 konek ke B) masing2 DBGrid konek ke 2 DATA berbeda tadi (DBGrid1 konek ke DATA1 dan DBGrid2 konek ke DATA2) dan label konek dengan DATA1 (A) dengan field KODE syntaks : ------------ - Private Sub Label1_Change( ) Data2.RecordSource= "select * from B where KODE ='" & Trim(CDbl(Label1) ) & "'" Data2.Refresh End Sub nah, kasusnya sewaktu di compile, ternyata keluar pesan error Run-Time error '3464': Data type mismatch in criteria expression mohon solusinya dari rekan2. Thanks sebelumnya. ________________________________________________________ Bergabunglah dengan orang-orang yang berwawasan, di di bidang Anda! Kunjungi Yahoo! Answers saat ini juga di http://id.answers.yahoo.com/
