窗口，e.Form.Controls("cmbszshi") = ""出错 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 窗口，e.Form.Controls("cmbszshi") = ""出错

共有1341人关注过本帖树形打印复制链接主题：窗口，e.Form.Controls("cmbszshi") = ""出错

zhangjian222200

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：七尾狐帖子：1536 积分：10849 威望：0 精华：0 注册：2016/9/12 11:18:00

窗口，e.Form.Controls("cmbszshi") = ""出错 发帖心情

Post By：2017/1/10 15:47:00 [只看该作者]

窗口，修改所在省,如果所在省不为空，则所在市\所在区县,为空。

代码写在控件：“所在省"的textchanged事件,代码如下，提示错误见图：

'如果修改所在省,所在市\所在区县,为空

If Tables("男生资料主窗口_Tablenanszl").Current("所在省") <> "" Then

Dim suozs As String = Tables("男生资料主窗口_Tablenanszl").Current("所在省")

If e.Sender.Text <> "suozs" Then

'Tables("男生资料主窗口_Tablenanszl").Current("所在市") = "" '注:这里改了表,但是不能直接改框内容,所以暂时屏蔽处理

'Tables("男生资料主窗口_Tablenanszl").Current("所在区县") = ""

e.Form.Controls("cmbszshi") = ""

e.Form.Controls("cmbszquxian") = ""

End If

此主题相关图片如下：未命名011.jpg

fjlclxj

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：321 积分：2468 威望：0 精华：2 注册：2013/1/16 19:33:00

Post By：2017/1/10 15:56:00 [只看该作者]

e.Form.Controls("cmbszshi").value = nothing

e.Form.Controls("cmbszquxian").value = nothing

有点色

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/1/10 16:09:00 [只看该作者]

e.Form.Controls("cmbszshi").Text = nothing

e.Form.Controls("cmbszquxian").Text = nothing

zhangjian222200

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：七尾狐帖子：1536 积分：10849 威望：0 精华：0 注册：2016/9/12 11:18:00

Post By：2017/1/11 12:16:00 [只看该作者]

按3楼改了，没有错误提示，但是控件"cmbszshi"、"cmbszquxian"，值没有改变为空，原来显示什么，还是显示什么，咋回事？

有点色

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/1/11 12:35:00 [只看该作者]

1、你绑定什么表？

2、代码改成

msgbox(111)

Tables("绑定的表").Current("所在市") = nothing '注:这里改了表,但是不能直接改框内容,所以暂时屏蔽处理

Tables("绑定的表").Current("所在区县") = nothing

3、必须弹出111，才说明代码执行了。

zhangjian222200

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：七尾狐帖子：1536 积分：10849 威望：0 精华：0 注册：2016/9/12 11:18:00

Post By：2017/1/11 15:54:00 [只看该作者]

这是项目文件，窗口：男生资料主窗口，代码写在控件：“所在省"的textchanged事件

还有，标题栏：连云港双联网+用户组+用户名，该怎么做？

[此贴子已经被作者于2017/1/11 16:36:03编辑过]

有点色

小大 7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/1/11 16:35:00 [只看该作者]

代码写在 selectedIndexChanged 事件

'如果修改所在省,所在市\所在区县,为空(代码好像有问题,暂屏蔽)
If e.sender.Focused AndAlso e.sender.text <> "" Then
Tables("男生资料主窗口_Tablenanszl").Current("所在市") = Nothing '注:这里改了表,但是不能直接改框内容,所以暂时屏蔽处理
Tables("男生资料主窗口_Tablenanszl").Current("所在区县") = Nothing
End If

下一主题 >> << 上一主题

主题：窗口，e.Form.Controls("cmbszshi") = ""出错