langs a-z
This commit is contained in:
parent
db842d013d
commit
d066446780
11389 changed files with 98361 additions and 1020 deletions
14
Task/Empty-string/VBA/empty-string.vba
Normal file
14
Task/Empty-string/VBA/empty-string.vba
Normal file
|
|
@ -0,0 +1,14 @@
|
|||
dim s as string
|
||||
|
||||
' assign an empty string to a variable:
|
||||
s = ""
|
||||
|
||||
' test if a string is empty:
|
||||
if s = "" then Debug.Print "empty!"
|
||||
' or:
|
||||
if Len(s) = 0 then Debug.Print "still empty!"
|
||||
|
||||
'test if a string is not empty:
|
||||
if s <> "" then Debug.Print "not an empty string"
|
||||
'or:
|
||||
if Len(s) > 0 then Debug.Print "not empty."
|
||||
Loading…
Add table
Add a link
Reference in a new issue