以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]窗口  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=142131)

--  作者:江南小镇
--  发布时间:2019/10/19 10:09:00
--  [求助]窗口
老师好,下面代码是论坛上抄来的想把标出的地方去掉并修改。谢谢老师。


e.Sender.Cursor = System.Windows.Forms.Cursors.WaitCursor
Dim cmd As New SQLCommand
Dim dr As DataRow
Dim dt As DataTable
cmd.C
cmd.CommandText = "SEL ECT * From {劳动合同} where 劳动合同_到期 = false and [劳动合同_结束时间] <= #" & DateAdd("d",30,Functions.Execute("服务器时间"))  & "#"
dt = cmd.ExecuteReader()
forms("窗口1").controls("人事档案Label8").text = dt.Compute("count([_Identify])")


--  作者:y2287958
--  发布时间:2019/10/19 10:13:00
--  
黄色部分表示窗口控件,想改成啥
--  作者:江南小镇
--  发布时间:2019/10/19 10:41:00
--  
直接改掉
--  作者:有点蓝
--  发布时间:2019/10/19 10:46:00
--  
需要做什么功能?改成什么东西?汽车?飞毯?
--  作者:江南小镇
--  发布时间:2019/10/19 11:50:00
--  
老师,主窗口动态添加独立或模式窗口后在代码设置中应该用主窗口的名称吗?

窗口1是主窗口的名称、整个代码在另一个独立窗口中,我把窗口1改成独立窗口名称(不添加到主窗口中)。

forms("窗口1").controls("人事档案Label8").text = dt.Compute("count([_Identify])")

--  作者:有点蓝
--  发布时间:2019/10/19 11:58:00
--  
forms("要使用哪个窗口的控件就直接写在这里即可").controls
--  作者:江南小镇
--  发布时间:2019/10/19 22:02:00
--  
老师,文件上传不了,文件在D:\\中
图片点击可在新窗口打开查看此主题相关图片如下:2345截图20191019215828.png
图片点击可在新窗口打开查看
添加后就变成下面的地址了。

图片点击可在新窗口打开查看 C:\\fakepath\\2345截图20191019215828.png 
--  作者:江南小镇
--  发布时间:2019/10/19 22:05:00
--  
老师好,项目上传不了。
[此贴子已经被作者于2019/10/19 22:15:01编辑过]

--  作者:有点蓝
--  发布时间:2019/10/20 21:33:00
--  
换个浏览器。比如ie,chorme
--  作者:江南小镇
--  发布时间:2019/10/20 21:39:00
--  
老师,没有用,换了两个谷歌、火狐。