If Trim(TextBox1.Value) <> "" Or Trim(TextBox2.Value) <> "" Then
MsgBox "Textboxlardan biri dolu"
Else
MsgBox "Hepsi bos"
End If
Buda empty ile çalışan gif.
If Trim(TextBox1.Value) <> "" Or Trim(TextBox2.Value) <> "" Then
MsgBox "Textboxlardan biri dolu"
Else
MsgBox "Hepsi bos"
End If