26-03-18, 03:23 PM
السلام عليكم
يمكنك عمل هذا الكود لاستثناء مربع نص :
و لكن يجب عمل Index لمربع النص من 0 حتى 9
يمكنك عمل هذا الكود لاستثناء مربع نص :
و لكن يجب عمل Index لمربع النص من 0 حتى 9
كود :
Dim i As Integer
For i = 0 To 9
If i = 4 Or i = 8 Then
Else
Text1(i).Text = "90"
End If
Next