请教，逻辑值代入问题！ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

代码如下，“门型花”和“门头花”两列为逻辑列，代入值时提示如图！怎么更改？注释红色区域的代码就不会报错！

此主题相关图片如下：20200421164626.png

Select_Name="TableControl_591"

Dim f As new foxtools.form("SL_通用选择")

f.mytext="木门下单选择"

f.showdialog '模式窗口

Dim r As Row=Foxtools.Tools.Rows(eform)

If Select_List.count>0 Then

r("产品编号")=Select_List(0)("产品编号")

r("门型花")=Select_List(0)("门型花")

r("门头花")=Select_List(0)("门头花")

Else

If vars("Select_Null")=True Then '清除

r("产品名称") = Nothing

r("客户")=Nothing

vars("Select_Null")=False

End If

[此贴子已经被作者于2020/4/21 18:39:10编辑过]

主题：请教，逻辑值代入问题！