Android Question Counting password try

Sub searchPass(str1 As String)   
Dim del As Map
del.Initialize
del = DBUtils.ExecuteMap(SQL, "SELECT password FROM account WHERE password = '" & str1 & "'",Null)
If del.IsInitialized Then
      If Not (del.Get("password") == Null) Then
         'Log("Pass Okay: "& del.Get("password"))   
         wrongPass = 0 
      End If
Else
Log("Not found")
wrongPass = wrongPass+1
'NOTE: variable wrongPass should be declared at Sub Globals
'Dim wrongPass as int
if(wrongPass>3) then
'-DELETE something-
wrongPass = 0
End if
End If
End Sub