المشاركات : 4
المواضيع 2
الإنتساب : Jun 2016
السمعة :
1
الشكر: 0
تم شكره 1 مرات في 1 مشاركات
شكرا على الرد وكانت الاجابة المطلوب وناجحة في اضافة ()textbox1.focus
كيف استفيد من المودل في الفورم او كيف اربطهما مع بعض
في هذا السؤال اريد تحديد القيم و هي 11 و 12 و 13 و 14 ولانني لم استطع قمت بجعل الشرط ياخد القيمة التي اكبر من 15
Private Sub TextBox11_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox11.TextChanged
If TextBox11.Text > 15 Then
TextBox10.ReadOnly = False
Else
TextBox10.ReadOnly = True
End If
End Sub
المشاركات : 159
المواضيع 20
الإنتساب : Jul 2014
السمعة :
43
الشكر: 10
تم شكره 342 مرات في 123 مشاركات
الموديل طريقة عمله سهلة
عندما تنشئ موديل أدخل عليه
الموديل يعتمد في عمله على عمل إجراءات و دوال Sub And Function كدلك تعريف المتغيرات التي تريد عمل بها دون تكرار كتابتها كل مرة
المثال الدي أعطيتنا إياه سأقوم بعمله في إجراء Sub و هدا الاجراء يكتب داخل الموديل
public sub TxtReaOnly(txt1 as textbox,txt2 as textbox)
if txt1.text>15 then
txt2.readonly=false
else
txt2.readonly=true
end if
end sub
بعد دالك ادخل الى حدث TextBox11_TextChanged
بعد دلك قم باستدعاء الاجراء باسمه و قد أسميناه TxtReaOnly
هدا الاجراء ينتظر منك 2 برامترات و هي txt1 و txt2
txt1 هو textbox11
txt2 هو textbox 10
الاستدعاء سيكون كالاتي
TxtReaOnly(textbox11,textbox10)
أتمنى أن تكون إستفدت
التميز و الابداع شعاري
المشاركات : 6
المواضيع 0
الإنتساب : Dec 2015
السمعة :
0
الشكر: 0
تم شكره 1 مرات في 1 مشاركات
من الأفضل إستعمال errorprovider