06-06-13, 10:07 PM
السلام عليكم
- إستخدم هذا الكود على حسب مافهمت ، أنك تريد إذا أصبح أي تكست من الثمانية في حالة الظهور يتم وضعه في جملة الشرط أي إذا كان أي تكست ظاهرا يجب فحصه ما إذا كان فارغ أم لا , إذا أعتقد أن هذا هو الكود المناسب :
- تحياتي .
- إستخدم هذا الكود على حسب مافهمت ، أنك تريد إذا أصبح أي تكست من الثمانية في حالة الظهور يتم وضعه في جملة الشرط أي إذا كان أي تكست ظاهرا يجب فحصه ما إذا كان فارغ أم لا , إذا أعتقد أن هذا هو الكود المناسب :
كود :
Dim Ctrl As Control
For Each Ctrl In Controls
IF TypeOf Ctl Is TextBox And Ctl.Visible = True Then
IF Trim$(Ctl.Text) = "" Then
MsgBox "Write Text"
Ctl.SetFocus
Exit Sub
End If
End IF
Next- تحياتي .

