以文本方式查看主题

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

--  作者:zcgmxf
--  发布时间:2016/1/17 11:22:00
--  [求助]窗口问题

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20160117.png
图片点击可在新窗口打开查看
老师,快速访问栏在发布后程序的窗口中可以消除或隐藏吗?如何实现?谢谢!
--  作者:大红袍
--  发布时间:2016/1/17 11:34:00
--  

afterOpenProject

 

QAT.Visible = False


--  作者:zcgmxf
--  发布时间:2016/1/17 11:42:00
--  
谢谢!
--  作者:zcgmxf
--  发布时间:2016/1/17 11:56:00
--  
红袍老师。是我没讲清楚,我是说是否可以快速访问栏所在的那个窗删除或隐藏?请指教。
--  作者:大红袍
--  发布时间:2016/1/17 11:58:00
--  
弄一个模式窗口,在afterOpenproject事件打开,就不会显示foxtable的主窗口了。
--  作者:zcgmxf
--  发布时间:2016/1/17 18:40:00
--  [求助]直接打印


图片点击可在新窗口打开查看此主题相关图片如下:qq图片20160117.png
图片点击可在新窗口打开查看

老师,用下面这段代码打印出现上面的错误提示,打印还是完成了。请指点,谢谢!


    Dim tm As String  = ProjectPath & "Attachments\\打印出库单.doc" \'指定模板文件
    Dim fl As String = ProjectPath & "Reports\\打印出库单.doc" \'指定目标文件
    Dim wrt As New WordReport(Tables("疫苗药品出库单"),tm,fl) \'定义一个WordReport
    wrt.Build() \'逐行生成报表
    Dim Proc As New Process 

    Proc.File = fl
    Proc.Verb = "Print" \'指定动作
    Proc.Start()
    wrt.quit()

[此贴子已经被作者于2016/1/17 19:33:17编辑过]

--  作者:大红袍
--  发布时间:2016/1/17 20:03:00
--  

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=80167&skin=0