[quote:7bc568609b]What is do now, is collect a string of touchpad inputs (0 to 9). Then using the val command to set as an integer
...
Is there a way to use two Longs instead? [/quote:7bc568609b]
Yes, you can do
[code:1:7bc568609b]Dim Ar As String * 8
Dim Ar1 As String * 4
Dim Ar2 As String * 4
Dim Long1 As Long
Dim Long2 As Long
Ar = "12345678"
Do
Ar1 = Mid(ar , 1 , 4 )
Long1 = Val(ar1) '1234
Ar2 = Mid(ar , 5 , 4 )
Long2 = Val(ar2) '5678
Loop
End[/code:1:7bc568609b]
But is it not less complicated to transfer the string Ar[]
and then compare it with the password string ?
[code:1:7bc568609b]if Ar = "11223344" then open gate[/code:1:7bc568609b]
↧