如何检查字符串是否为空

Question

我需要检查一个字符串（输入框上的用户输入）是否为空，并在我按下＆＃34; Play＆＃34;之后根据该条件执行一些操作。按钮。 这是我的剧本：

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

但是当我推动＆＃34; Play＆＃34;按钮这是错误：

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