Di Access, fungsi Sin digunakan untuk mendapatkan nilai sinus sebuah angka. Tipe data yang dihasilkan dari fungsi Sin adalah Double.
Sintaks penulisan fungsi Sin adalah sebagai berikut:
Keterangan:
Number (angka): wajib diisi, berupa angka dengan tipe data Double yang menunjukkan sudut pada segitiga yang dinyatakan dalam radian.
Fungsi Sin menghitung perbandingan dari sisi di depan sudut pada segitiga siku-siku dengan si diagonalnya. Hasil perbandingan dinyatakan dalam radian. Perbandingan itu adalah garis di depan sudut pada segitiga di satu sisi dengan garis diagonal segitiga di sisi lain. Pada gambar di atas, secara trigonometri:
Sin a = t / d
Nilai fungsi Sin terletak di antara -1 (untuk 270o) dan 1 (untuk 90o). Untuk mengkonversi ke radian, nilai derajat dikalikan pi/180. Jadi misalnya:
Sin 45o, maka:
Kita bisa membuat fungsi Sin seperti halnya fungsi trigonometri pada umumnya, seperti fungsi berikut ini:
Dalam contoh ini, kita sudah memasukkan nilai dalam derajat.
Sintaks penulisan fungsi Sin adalah sebagai berikut:
Sin(Number)
Keterangan:
Number (angka): wajib diisi, berupa angka dengan tipe data Double yang menunjukkan sudut pada segitiga yang dinyatakan dalam radian.
Fungsi Sin menghitung perbandingan dari sisi di depan sudut pada segitiga siku-siku dengan si diagonalnya. Hasil perbandingan dinyatakan dalam radian. Perbandingan itu adalah garis di depan sudut pada segitiga di satu sisi dengan garis diagonal segitiga di sisi lain. Pada gambar di atas, secara trigonometri:
Sin a = t / d
Nilai fungsi Sin terletak di antara -1 (untuk 270o) dan 1 (untuk 90o). Untuk mengkonversi ke radian, nilai derajat dikalikan pi/180. Jadi misalnya:
Sin 45o, maka:
konstanta pi = 3.14159265358979nilai radian untuk 45o :
45o x 3.14159265358979 / 180o = 0.785398163397448
Sin 45o secara trigonometri = Sin (45o x pi/180) secara Access atau VBA Sin 45o = Sin (0.785398163397448) = 0.7071068Pada contoh di atas, kita tidak bisa langsung menuliskan di VBA dengan menggunakan derajat, tetapi harus diubah dulu ke radian. Untuk 45o menjadi 0.785398163397448 radian, sehingga, penulisan Sin 45o pada fungsi Sin di Access atau VBA menjadi Sin (0.785398163397448).
Kita bisa membuat fungsi Sin seperti halnya fungsi trigonometri pada umumnya, seperti fungsi berikut ini:
Function nilaiSin(dbDerajat As Double) As Double If dbDerajat > 360 Or dbDerajat < 0 Then MsgBox "Nilai derajat harus terletak di antara 0 dan 360", vbExclamation Exit Function End If nilaiSin = Round(Sin (dbDerajat * (3.14159265358979 / 180)), 6) End FunctionBerikut ini adalah contoh penggunaan fungsi Sin dalam nilaiSin di atas di Immediate Window:
Dalam contoh ini, kita sudah memasukkan nilai dalam derajat.
? nilaiSin (0) 0 ? nilaiSin(90) 1 ? nilaiSin (180) 0 ? nilaiSin(270) -1
Comments
Post a Comment