ເນື້ອໃນ

# ຟັງຊັນ Sin

ສົ່ງຄືນຄ່າ ຊາຍ (sine) ຂອງມຸມ. ມຸມແມ່ນຖືກລະບຸເປັນເຣດຽນ. ຜົນໄດ້ຮັບຈະຢູ່ໃນຊ່ວງລະຫວ່າງ -1 ຫາ 1.

ໂດຍໃຊ້ຄ່າມຸມ Alpha, ຟັງຊັນ Sin ຈະສົ່ງຄືນອັດຕາສ່ວນຂອງຄວາມຍາວຂອງຂ້າງກົງຂ້າມມຸມ ກັບ ຄວາມຍາວຂອງຂ້າງກົງຂ້າມມຸມສາກ (hypotenuse) ໃນຮູບສາມແຈສາກ.

Sin(Alpha) = ຂ້າງກົງຂ້າມມຸມ/ຂ້າງກົງຂ້າມມຸມສາກ

### ໄວຍາກອນ:

    Sin (ຕົວເລກ As Double) As Double

### ປະເພດຄ່າທີ່ສົ່ງກັບ:

Double

### ພາຣາມິເຕີ:

ຕົວເລກ: ສຳນວນຕົວເລກທີ່ກຳນົດຄ່າມຸມເປັນເຣດຽນທີ່ທ່ານຕ້ອງການຄຳນວນຫາຄ່າຊາຍ.

ເພື່ອແປງອົງສາເປັນເຣດຽນ, ໃຫ້ຄູນອົງສາດ້ວຍ Pi/180, ແລະ ເພື່ອແປງເຣດຽນເປັນອົງສາ, ໃຫ້ຄູນເຣດຽນດ້ວຍ 180/Pi.

ອົງສາ=(ເຣດຽນ*180)/Pi

ເຣດຽນ=(ອົງສາ*Pi)/180

Pi ມີຄ່າປະມານ 3.141593.

### ລະຫັດຂໍ້ຜິດພາດ:

5 ການເອີ້ນໃຊ້ໂປຣຊີເຈີບໍ່ຖືກຕ້ອງ

### ຕົວຢ່າງ:

    ' ໃນຕົວຢ່າງນີ້, ສາມາດປ້ອນຂໍ້ມູນຕໍ່ໄປນີ້ສຳລັບຮູບສາມແຈສາກ:
    ' ຂ້າງກົງຂ້າມມຸມ ແລະ ມຸມ (ເປັນອົງສາ) ເພື່ອຄຳນວນຫາຄວາມຍາວຂອງຂ້າງກົງຂ້າມມຸມສາກ:
    Sub ExampleSine
    ' Pi = 3.1415926 ແມ່ນຕົວປ່ຽນທີ່ກຳນົດໄວ້ລ່ວງໜ້າ
    Dim d1 As Double
    Dim dAlpha As Double
        d1 = InputBox("ປ້ອນຄວາມຍາວຂອງຂ້າງກົງຂ້າມມຸມ: ","ຂ້າງກົງຂ້າມມຸມ")
        dAlpha = InputBox("ປ້ອນຄ່າມຸມ Alpha (ເປັນອົງສາ): ","Alpha")
        Print "ຄວາມຍາວຂອງຂ້າງກົງຂ້າມມຸມສາກແມ່ນ"; (d1 / sin (dAlpha * Pi / 180))
    End Sub

ຫົວຂໍ້ທີ່ກ່ຽວຂ້ອງ

ຟັງຊັນ Atn

ຟັງຊັນ Cos

ຟັງຊັນ Tan

ກະລຸນາສະໜັບສະໜູນພວກເຮົາ!