请教一下：这段代码未起作用，是什么原因？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

下面这段代码，未能起作用。没明白是什么原因？

If e.KeyCode = Keys.Enter Then

Dim txt7 As WinForm.TextBox = e.Form.Controls("TextBox7")

Dim txt11 As WinForm.TextBox = e.Form.Controls("TextBox11")

If txt7.text Is Nothing Then

Dim r1 = e.Form.controls("Table1").Table.Current

DataTables("案卷级目录").DeleteFor("[档号] Is Null")

Else

Return

End If

如果将上面这段代码中的”If txt7.text Is Nothing Then “这一行分别改为注一、注二，则结果如下：

注一：改为" if txt7.text = " " then “，整段代码未起作用。

注二：改为：if val(txt7.text) = 0 ，则能正确执行。我没懂是什么原因。请大神启发一下。

主题：请教一下：这段代码未起作用，是什么原因？