منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
الأمر بتنفيذ كود معين أثناء تنفيذ كود آخر - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم قواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=40)
+--- قسم : قسم اسئلة vb6.0 المتعلقة بقواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=72)
+--- الموضوع : الأمر بتنفيذ كود معين أثناء تنفيذ كود آخر (/showthread.php?tid=6951)

الأمر بتنفيذ كود معين أثناء تنفيذ كود آخر - اسلام الكبابى - 13-11-12

هل من الممكن الأمر بتنفيذ كود حدث معين أثناء تنفيذ كود آخر؟

مثلآ أثناء تنفيذ كود الضغط عل الزر command1
PHP كود :
Private Sub Command1_Click()
 


 End Sub 

هل توجد جملة توجه البرنامج لتنفيذ كود ال Text1_Click مثلآ
(طبعآ دون ضغط المستخدم على الText1 ولكن بمجرد مرور البرنامج على هذه الجملة)

[SIZE=5]ولكم ألف شكر[/SIZE]

الأمر بتنفيذ كود معين أثناء تنفيذ كود آخر - ناجي إبراهيم - 13-11-12

السلام عليكم...

طبعاً يمكن:
كود :
Private Sub Command1_Click()
    ' ...
    Text1_Click
    ' ...
End Sub

أي باستدعاء إجراء الحدث المطلوب (و ذلك بكتابة اسمه). و إذا كان للإجراء بارامترات فيجب تمرير قيم لتلك البارامترات. مثلاً:
كود :
Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If (Button = vbLeftButton) And (Shift = vbShiftMask) Then
        MsgBox "This is Text1_MouseDown event"
    End If
End Sub

' استدعاء الإجراء السابق مع تمرير قيم البارامترات
Private Sub Command1_Click()
    Text1_MouseDown vbLeftButton, vbShiftMask, 0, 0
End Sub

نرجو الاستفادة و السلام.

الأمر بتنفيذ كود معين أثناء تنفيذ كود آخر - اسلام الكبابى - 14-11-12

إقتباس :الأستاذ ناجي ابراهيم هوحلال العقد دائمآ
المفروض يتعمل قسم فى المنتدى باسمه عشان اللى عايز يحل مشكلته بسرعة يتجه مباشرة لهذا القسم

 مشكووووووووووووور ألف شكر