Mengembalikan angka yang terdapat di dalam string sebagai nilai numerik dari tipe yang sesuai.
Sintaks
Val ( string )
String yang diperlukanargumen adalah ekspresi stringyang valid.
Keterangan
Fungsi Val berhenti membaca string pada karakter pertama yang tidak bisa dikenali sebagai bagian dari angka. Simbol dan karakter yang sering dianggap sebagai bagian dari nilai numerik, seperti tanda dolar dan koma, tidak dikenali. Namun, fungsi mengenali prefiks bilangan pokok &O (untuk octal) dan &H (untuk heksadesimal). Kosong, tab, dan karakter garis bawah dihapus dari argumen.
Berikut ini mengembalikan nilai 1615198:
Val(" 1615 198th Street N.E.")
Dalam kode di bawah ini, Val mengembalikan nilai desimal-1 untuk nilai heksadesimal yang diperlihatkan:
Val("&HFFFF")
Catatan: Fungsi Val hanya mengenali periode (.) sebagai pemisah desimal yang valid. Ketika pemisah desimal yang berbeda digunakan, seperti dalam aplikasi internasional, gunakan Cdbl sebagai ganti string menjadi angka.
Contoh kueri
|
Ekspresi |
Hasil |
|
Pilih DateofSale, Val (DateofSale) sebagai testVal dari ProductSales; |
Mengembalikan nilai dari "DateofSale" dan karakter numerik utama dari nilai bidang "DateofSale" di kolom testVal. Val () akan berhenti membaca string pada karakter non-numerik pertama. |
Contoh VBA
Catatan: Contoh yang mengikuti demonstrasi penggunaan fungsi ini dalam modul Visual Basic for Applications (VBA). Untuk informasi selengkapnya tentang bekerja dengan VBA, pilih Referensi Pengembang di daftar turun bawah di samping Cari dan masukkan satu istilah atau lebih di kotak pencarian.
Contoh ini menggunakan fungsi Val untuk mengembalikan angka yang terdapat dalam string.
Dim MyValue
MyValue = Val("2457") ' Returns 2457.
MyValue = Val(" 2 45 7") ' Returns 2457.
MyValue = Val("24 and 57") ' Returns 24.
