XK8ER
asked on
fix format number generator
hello,
how can i prevent numbers between this range from being generated
"5550100" through "5550199"
how can i prevent numbers between this range from being generated
"5550100" through "5550199"
For x As Integer = 2000000 To 9999999
If x.ToString Like "[2-9]*" And Not (x.ToString("D7") Like "[1-9]11*") Then
objWriter.WriteLine(x.ToString("D7"))
End If
Next
For x As Integer = 2000000 To 9999999
If x > 550100 AndAlso x < 550199 then
Continue For
End If
If x.ToString Like "[2-9]*" And Not (x.ToString("D7") Like "[1-9]11*") Then
objWriter.WriteLine(x.ToSt ring("D7") )
End If
Next
If x > 550100 AndAlso x < 550199 then
Continue For
End If
If x.ToString Like "[2-9]*" And Not (x.ToString("D7") Like "[1-9]11*") Then
objWriter.WriteLine(x.ToSt
End If
Next
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
if x < 550100 or x > 550199 then
If x.ToString Like "[2-9]*" And Not (x.ToString("D7") Like "[1-9]11*") Then
objWriter.WriteLine(x.ToSt
End If
end if
Next
1: