ايجاد ظل الزاوية بالفيجول

من طرف شيغو الأحد أبريل 13, 2014 9:41 pm

السلام عليكم امل المساعده في برنامج مساحي يحسب اتجاه نقطه ما بمعرفتة الاحداثيات
عندى مشكله في ايجاد ظل الزاويه بالفيجول بيسك6

مثال

E1=6
N1=5
E2=2
N2=2
E1-E2=4
N1-N2=3

E1-E2/N1-N2
=4/3
=1.3333
اذا حسبتها بالاله الحاسبه ظل الزاويه 1.3333 يظهر صحيح وهو 52.130 درجة
ولكن ارغب في عملها بالفيجول بيسك

من طرف السنى الإثنين أبريل 14, 2014 7:20 am

لايجاد جيب و ظل الزواية بالفجوال بيسك 6 يمكنك استخدام الاكواد التالى :

الكود:: Private Const PI = 3.14159265 Public Function Cosine(ByVal degrees As Single) As Single Cosine = Cos(degrees * PI / 180) End Function Public Function Sine(ByVal degrees As Single) As Single Sine = Sin(degrees * PI / 180) End Function

وفى حدث النقر على زر الامر وليكن "حساب" يستخدم الكود التالى :

الكود:: Label1.Caption = Sine(CLng(Text1.Text)) Label2.Caption = Cosine(CLng(Text1.Text))

حيث ان :Label1 و Label2 هى مكونات التسمية المراد اظهار ناتج العملية الحسابية فيها و ايضا Text1 هو مربع النص الذى سيتم ادخال القيم فيها المراد حسابها

ايجاد ظل الزاوية بالفيجول Egy-tech13974599821

والحساب على الالة الحاسبة للرقم 30

ايجاد ظل الزاوية بالفيجول Egy-tech13974599832

ايجاد ظل الزاوية بالفيجول Egy-tech13974599833

من طرف شيغو الإثنين أبريل 14, 2014 12:02 pm

مرحبا اخي
ارغب في حساب atn اي ان المفترض بالاله الحاسبه ان الزاويه 1=45
ولكن بالفيجول ماتضبط معي

من طرف **NEXT** الإثنين أبريل 14, 2014 4:54 pm

هذه اله حاسبة علمية فيها ما تبحث عنه

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]

1	#الحديثة
2	#الدورات
3	#موقع_لي_نور_الإلكتروني
4	#java
5	#datagridview
6	#سكن
7	#عقار
8	#عقارات
9	#استثمار
10	#الامارات

ايجاد ظل الزاوية بالفيجول

ايجاد ظل الزاوية بالفيجول

رد: ايجاد ظل الزاوية بالفيجول

رد: ايجاد ظل الزاوية بالفيجول

رد: ايجاد ظل الزاوية بالفيجول

مواضيع ذات صلة