السلام عليكم اخواني الاعزاء
سؤالي اريد ان احسب مدة بقائي على الانترنت لقد ارفقت برنامج واريد ان واريد ان تساعدوني في بعض الطلبات
كيف يمكنني ان احسب عدد الساعات التي قضيتها على الانترنت
لقد استخدمت قيمتين في التكست وطرحتهم من بعض ولكنة يعطيني الساعات فقط بدون الدقائق ولا الثواني
Dim no1, no2
no1 = Val(Text1.Text)
no2 = Val(Text2.Text)
Text3.Text = no1 - no2
واريد عندما تكتمل الساعة يضع سعر الساعة وهي ريال واحد
وكل زيادة ربع ساعة يزيد ريال واحد على القيمة ولكم مني كل التقدير والاحترام
وفق الله الجميع للخير والصلاح