如何检查字符串是否为空

Question

我需要检查一个字符串（输入框上的用户输入）是否为空，并且在我按下“播放”按钮时根据该条件执行一些操作。 这是我的脚本：

entry .eInput -width 50 -relief sunken -justify center -textvariable Input 
button .bAction -text "Play" -width 30 -height 5 -activebackground green -font "-12" 

bind .bAction <1> { 
if {$Input ne ""} 
    { puts "string is not empty"} 
else { puts "string is empty"} 
        } 

但是，当我按下“播放”按钮，这是错误：

wrong # args: no script following "$Input ne """ argument 
wrong # args: no script following "$Input ne """ argument 
    while executing 
"if {$Input ne ""}" 
    (command bound to event) 

就如何解决它的任何想法？

Answer 1

的问题是，你没有通过足够的参数来if

if {$Input ne ""} 

无效。在Tcl命令中以换行符结束。

尝试使用

if {$Input ne ""} then { 
    puts "string is not empty" 
} else { 
    puts "string is empty" 
}