如何在VB6中设置验证

Question

我需要代码设置一个限制，允许用户保存空ID＆amp; USERNAME在文本框中作为必填字段中的id lo-gin？

Answer 1

您可以在验证时验证它;

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

Answer 2

试试这个......

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