如何检查字符串是否为空

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"
}