السلام عليكم ورحمة الله,,
ممكن تصحيح هذا الكود,
Private Sub Check1_Click() If Check1 = True Then Text22.Text = "65" End If End Sub
اذا Check1 فعال قم بكتابة 65 في التكست 22
هل هذا الكود صحيح؟,لأني حاولت ولم يعمل.
ممكن تصحيح هذا الكود؟
Check1 هي الاداه و True هي القيمة, لكن قيمة ماذا, يجب تحديد الخاصية اولاً
If Check1.Value=1 Then ........... End If
خاصية التحديد هي Value وتكون قيمها 0 او 1 او 2
فيكتب اسم الاداه ثم "." ثم الخاصية ثم "=" ثم القيمة
هذه هي الصيغة العامة لتغيير او تحديد قيمة خاصية معينة بالكود
وتكون نفس الخاصية التي تقوم بتغييرها اثناء التصميم
فلجعل الـ CheckBox محدد اثناء التصميم نزهب للخاصية Value ونجعلها "1" .. كذلك نفعل ايضاً لتغييرها بالكود
It does not matter what they know about you, but what you can do, so let your work speak of you
mmghv VB6 Programmer
اقتباساذا Check1 فعال قم بكتابة 65 في التكست 22
هل هذا الكود صحيح؟,لأني حاولت ولم يعمل
المشكلة ليست فى وجود كلمة VALUE أو عدم وجودها
انما الخطأ فى أن Check1 اذا كان فعال فقيمته =1 (لاتساوى True)
واذا كان غيرفعال فقيمته =0 (لاتساوى False)
أى أنه عليك فقط تعديل أول جملة هكذا
If Check1 = 1 Then
الأخ vb6-qx-kok
لم ترد علينا حتى الآن
هل انتهت مشكلتك أم لا؟