|
|
دليل استخدام إجراءات VBAppAss.dllللمبرمجين بلغة Visual Basic 6.0 |
الحصول على الجزء الصحيح الذي يمثل الدينارات من عدد حقيقي يمثل مبلغاً مالياً.
الصيغة:
Function GetDinars(Value As Double) As Long
الصنف:
TNumber.
الوسائط (Parameters):
| Value | عدد حقيقي يمثل المبلغ المالي. |
الشرح:
تعيد هذه الدالة الجزء الصحيح من عدد حقيقي.
الاستخدام:
Dim ObjNumber As New TNumber
Dim Dinars As Long
Dinars = ObjNumber.GetDinars(CDbl(Text1.Text))
انظر أيضاً:
الدالة GetDirhams
الدالة GetMoneyByWordsDD
الدالة GetMoneyByWordsV