+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : [vb6.0] برنامج ميزان شاحنات كبيرة (/showthread.php?tid=39758)
RE: برنامج ميزان شاحنات كبيرة - وادي العوضي - 03-11-21
استاذي الفاضل Amir_Alzubidy الله لايحرمنا من شخصك الكريم والطيب يا طيب ممنون منك على المساعدة جزاك الله خيرا وهذا البرنامج بالمرفقات
ارجو التعديل عليه مع وافر التحايا
RE: برنامج ميزان شاحنات كبيرة - وادي العوضي - 04-11-21
اساتذتي الافاضل ممكن المساعدة الموضوع غاية في الاهمية جزاكم الله خيرا
RE: برنامج ميزان شاحنات كبيرة - وادي العوضي - 06-11-21
اساتذتي الافاضل جزاكم الله خيرا اذا امكن المساعدة لاهمية الموضوع بارك الله فيكم
RE: برنامج ميزان شاحنات كبيرة - Taha Okla - 06-11-21
السلام عليكم ورحمة الله وبركاته
من الصعب على المبرمج المساعدة في البرامج التي تتعامل مع الأجهزة الخارجية (لعدم القدرة على التجريب لعدم وجود الجهاز لديه).
فكثير من البرمجين يلاحظون بأن برامجهم تعمل على أجهزة وأجهزة أخرة لا تعمل عليها لأسباب كثيرة منها :
- اختلاف مواصفات الجهاز. - اختلاف نظام التشغيل. وأحيانا نفس البرنامج تحاول صناعته مرة أخرى على جهازك الذي صنعت عليه النسخة الاولى تجد أنه لا تعمل عليه النسخة الثانية (مع أنه نفس الكود المستخدم ونفس الادوات) لكن ما السبب (الله أعلم).
===
على كلٍ عملت تعديل على البرنامج لديك وأفقته
ستقوم بتنزيله وتجريبه - ربما لن تجد اختلافاً كثيراً (ولكن سيقوم بتسجيل كل عملية يقوم بها في قاعدة البيانات).
فأريد أن تقوم بعد تجريبه عدة مرات أن تعود هنا وترفع قاعدة بيانات البرنامج لأرى ماذا سجل فيها البرنامج.
وما الاختلافات التي حدثت مع التغيير.
ونرجوا من الله أن يمكننا من مساعدتك..
RE: برنامج ميزان شاحنات كبيرة - وادي العوضي - 06-11-21
استاذي الفاضل Taha Okla الله لايحرمنا من شخصك الكريم والطيب يا طيب شكرا جزيلا لحضرتك ربي يحفظك يارب
ان شاء الله سوف اقوم بالتجربة واخبارك النتيجة مع تصوير شاشة قارء الوزن وشاشة البرنامج ورفع المشروع بالكامل هنا شكرا مرة ثانية استاذي الفاضل
RE: برنامج ميزان شاحنات كبيرة - ahmedabdelaliem - 07-11-21
السلام عليكم
اخي جرب الكود هكذا
انا وضعت رقم ثابت في المتغير C
ولم يتغير الرقم
المهم جرب وضع تايمر للقراءة
PHP كود :
Private Sub Timer2_Timer()
On Error Resume Next
Dim c As Variant
Dim n As Integer
'If MSComm1.CommEvent = comEvReceive Then
If comEvEOF Then
MSComm1.InputLen = 1
'Do While MSComm1.Input = "0"
MSComm1.InputLen = 8
c = MSComm1.Input
c1 = ""
For i = 1 To Len(c)
cut = Mid(c, i, 1)
If (IsNumeric(cut)) Or (cut = ".") Then
c1 = c1 & cut
End If
Next i
Label5.Caption = Val(c1)
Timer2.Enabled = False
End If
End Sub
الرجاء في حال استمرار المشكلة عمل فيديو لصعود الشاحنة وقراءة البرنامج للبيانات ورفعه
بالتوفيق
RE: برنامج ميزان شاحنات كبيرة - وادي العوضي - 07-11-21
السلام عليكم استاذي الفاضل ahmedabdelaliem ورحمة الله وبركاته
ان شاء الله راح اجرب الكود واعطيك النتيجة بتصوير فيديو للحالة شكرا جزيلا مرة ثانية جزاك الله خيرا
RE: برنامج ميزان شاحنات كبيرة - وادي العوضي - 15-11-21
السلام عليكم اساتذتي الافاضل ورحمة الله وبركاته
اليوم تم تجربة برنامج الوزن المرفق وكانت النتيجة كما في رابط الفيديو المرفق بحيث تظهر في الشاشة السوداء للبرنامج علامة @ وعند الضغط على زر امر وزن السيارة محمل تظهر
هذه العلامات والارقام والحروف
اذا امكن المساعدة وحل هذه المشكلة والتخلص من علامة ال @ في الشاشة السوداء وايضا نقل الرقم بشكل صحيح الى التيكست بوكس الخاص بوزن السيارة محمل مع وافر التحايا
https://www.mediafire.com/file/mh8ffm784l964f6/khiarat1.mp4/file
RE: برنامج ميزان شاحنات كبيرة - ahmedabdelaliem - 16-11-21
السلام عليكم
اخي استخدم هذا الكود للتخلص من @
PHP كود :
Me.Label5.Caption = Replace(Me.Label5.Caption, "@", " ")
RE: برنامج ميزان شاحنات كبيرة - وادي العوضي - 16-11-21
ممنون منك استاذ ahmedabdelaliem جزاك الله خيرا
ان شاء الله اجرب الكود واعطيك النتيجة شكرا جزيلا لك مرة ثانية