Como aqui não encerra uma mensagem, então faço desta forma com "".
Noutro site já mostrei que ao não usar o Trim ocorre uma falha, isto não que
dizer que não funcione.
Quando se usa Text1.Text = "" ocorre uma falha, pois se clicar dentro da caixa de texto
e usar a tecla de espaço com um toque o mais vai dizer na mensagem que a caixa de
texto esta cheia. Na verdade só tem espaço
Quando se usa Trim(Text1.Text)="" ai não ocorre falha,pois o trim não permite a caixa
ficar vazia.Faça um teste com os dois jeitos.
Este é o teste que fiz,usando Mysql
Private Sub Command14_Click()
If Trim(txtNome.Text) = "" Then
MsgBox "vazio"
ElseIf Trim(Text1.Text) = "" Then
MsgBox "vazio"
Else
Dim Sql As String
Sql = "Update Admins Set Usuario='" & txtNome.Text & "',Senha='" & Text1.Text & "' Where IdAdmin='" & txtcodigo.Text & "'"
cn.Execute (Sql)
MsgBox "Alterado"
End If
End Sub