如何在VB6中設置驗證

Question

我需要代碼來設置一個限制，從允許用戶在文本框中將ID爲&的用戶名作爲id lo-gin保存在所需的字段中？

Answer 1

試試這個...

if trim(text1.text) ="" then 
    'message here 
    text1.setfocus 
    end if 

Answer 2

您可以驗證它的驗證;

Private sub Validate_Click() 

// verify username 
If trim(Username.text) = "" then 
    Msgbox ("Please enter a username.") 
    Username.focus() 
    End sub 
end if 

// Verify password 
If trim(pwd.text) = "" then 
    Msgbox ("Please enter a password.") 
    pwd.focus() 
    End sub 
end if 

-- Your codes 

End sub