[aliday03]

الموديل طريقة عمله سهلة
عندما تنشئ موديل أدخل عليه
الموديل يعتمد في عمله على عمل إجراءات و دوال 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)
أتمنى أن تكون إستفدت