25-09-12, 04:03 PM
alzahrani كتب :وعلى فكره أخوي أشوف إنك في المثال الأخير إستخدمت جمل شرطية كثير
طيب من رأي المثال الأول أسهل وأسرع بحيث إني أكتب اسم مربع النص فقط لا غير
بالنسبة لمثالي الاخير
هذا الكود الصقة كما هو لانه اجراء
PHP كود :
For Each Ct As Control In Root.Controls If TypeOf Ct Is TextBox Then If CType(Ct, TextBox).Focused = True Then Nametxt = (Ct.Name) End If End If Next End Sub
ويبقى عليك
1- ان تستدعي الاجراء في حدث MouseHover
الخاص بأداة DateTimePicker1
PHP كود :
ClearTextBox(Me)
2- ان تقوب بوضع جملة IF لبيان الكتابة
PHP كود :
If Nametxt = "TextBox1" Then TextBox1.Text = DateTimePicker1.Text
ElseIf Nametxt = "TextBox2" Then TextBox2.Text = DateTimePicker1.Text
ElseIf Nametxt = "TextBox3" Then TextBox3.Text = DateTimePicker1.Text
ElseIf Nametxt = "TextBox4" Then TextBox4.Text = DateTimePicker1.Text
ElseIf Nametxt = "TextBox5" Then TextBox5.Text = DateTimePicker1.Text
End If
تحياتي لك
ابو سامي
ابو سامي
