Penerapan Nilai Null Pada MySQL dan VB 6.0

Bekerja dengan Nilai NULL (Working with NULL Values)

Secara konseptual , nilai NULL berarti " nilai tidak diketahui " (a missing unknown value) dan diperlakukan agak berbeda dari nilai-nilai lain .Untuk menguji NULL , menggunakan IS NULL dan IS NOT operator NULL , seperti yang ditunjukkan di sini :

buat Query sebagai berikut pada MySQL/Navicat for MySQL

SELECT 1 IS NULL, 1 IS NOT NULL;

jalankan query tersebut maka akan muncul hasil sebagai berikut:

+-----------+---------------+
| 1 IS NULL | 1 IS NOT NULL |
+-----------+---------------+
|         0 |             1 |
+-----------+---------------+

untuk melakukan filter pada bilangan NULL tidak bisa menggunakan operator aritmatika seperti =, <, or <>, gunakan statemen IS NULL pada query yang anda inginkan untuk melakukan filter pada nilai NULL, sedangkan untuk membatasi nilai yang tidak NULL bisa menggunakan statemen NOT IS NULL.

Contoh Penerapan nya pada MySQL/Navicat For MySQL

SELECT * FROM tbl_name WHERE key_col IS NULL;

SELECT * FROM tbl_name WHERE key_col <=> NULL;

SELECT * FROM tbl_name  WHERE key_col=const1 OR key_col=const2 OR key_col IS NULL;

sekarang bagaimana penerapan NULL pada Visual Basic?

yang umum terjadi adalah bagaimana membuat filter nilai NULL pada tanggal (type data date) dengan komponen VB DTPicker, misalnya kita akan menyimpan isian tanggal kosong (NULL) dan tanggl berisi, kalau DataSource DTPicker dihubungkan dengan ADODC dengan DataField "Tanggal" dengan "Tanggal" merupakan Type Data "Date", maka pada saat melakukan penyimpanan data akan muncul error, untuk mengatasi hal tersebut diatas makan DTPicker tidak dihubungkan dengan ADODC dan buatlah sebuah statement pada Visual Basic anda seperti contoh berikut:

Private Sub UpdateTanggal()
    If Not IsNull(Tanggal.Value) Then
        MySQL = "update tbl_name set Tanggal = '" & Tanggal.Value) & "' 
        where Kondisi = expr 
        (Kondisi Simpan ada Tanggal)
    Else
        MySQL = "update tbl_name set Tanggal = '' where Kondisi = expr
        (Kondisi Simpan tidak ada Tanggal "Null / tidak berisi")
    End If
    Ado.Execute MySQL
End Sub

Dari statement diatas bisa disimpulkan bahwa :

1. Untuk melakukan penyimpanan data type "Date" pada MySQL menggunakan Visual Basic 6.0 (VB 6.0) dilakukan dengan membuat kondisi IsNull atau Not IsNull
2. Untuk menyimpan data type date "NULL" pada database MySQL melalui Visual Basic 6.0 (VB 6.0) digunakan operator '' (kutip satu sebanyak 2 kali)