Cara penulisan fungsi IsNumeric:
IsNumeric(ekspresi)
Argumen ekspresi (harus diisi) adalah data berupa variant yang mengandung ekspresi numerik atau ekspresi string.
Catatan:
- IsNumeric mengasilkan True jika ekspresi yang diisi pada argumen berisi angka, selain itu menghasilkan False.
- IsNumeric menghasilkan nilai False jika ekspresi berisi tanggal.
Contoh berikut menggunakan fungsi IsNumeric untuk mengetahui jika suatu variable dapat dievaluasi sebagai angka.
Dim MyVar, MyCheck
MyVar = "53" ' Memberikan nilai.
MyCheck = IsNumeric(MyVar) ' Menghasilkan True.
If MyCheck = True Then
MsgBox("Data adalah angka!")
Else
MsgBox("Data adalah bukan angka!")
Endif
MyVar = "459.95" ' Memberikan nilai.
MyCheck = IsNumeric(MyVar) ' Menghasilkan True.
If MyCheck = True Then
MsgBox("Data adalah angka!")
Else
MsgBox("Data adalah bukan angka!")
Endif
MyVar = "45 Help" ' Memberikan nilai.
MyCheck = IsNumeric(MyVar) ' Menghasilkan False.
If MyCheck = True Then
MsgBox("Data adalah angka!")
Else
MsgBox("Data adalah bukan angka!")
Endif
Tidak Ada Komentar Pada Artikel » Fungsi IsNumeric di Access
Post a Comment