以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  一个窗口中的控件,打印另一个窗口中的内容,打印不出内容?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=147965)

--  作者:fengwenliuyan
--  发布时间:2020/3/28 9:36:00
--  一个窗口中的控件,打印另一个窗口中的内容,打印不出内容?
如以下项目中:
一个窗口中的控件,打印另一个窗口中的内容,代码检查应该没错,但就是打印不出内容?
求帮助!?

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:值班表cs1.foxdb



--  作者:有点蓝
--  发布时间:2020/3/28 9:39:00
--  
如果要打印容器中的内容,参考:http://www.foxtable.com/webhelp/topics/2437.htm
--  作者:fengwenliuyan
--  发布时间:2020/3/28 9:42:00
--  回复:(有点蓝)如果要打印容器中的内容,参考:http...
???
我需要的是打印整个窗口啊?

--  作者:fengwenliuyan
--  发布时间:2020/3/28 9:43:00
--  
就是因为写了打印整个窗口的代码,结果打印不出内容,才提问的?


--  作者:有点蓝
--  发布时间:2020/3/28 9:45:00
--  
打印整个窗口,就不能把需要打印的内容放到容器里,把分区面板去掉,其他人要打印的控件都拿出来放到窗口里,不能放到其它面板、容器里
--  作者:fengwenliuyan
--  发布时间:2020/3/28 9:59:00
--  回复:(有点蓝)打印整个窗口,就不能把需要打印的内...
原来如此,谢谢!

还有个问题:
在上面的测试项目中的“经理值班表设计窗口”中的ComboBox3的自定义项目内容,怎么从现在的“1|2|3|4|5|6”,改成“张三|李四|王五|陈六|赵七|刘八”?
我尝试着直接改了后,发现不能用?

提示错误:
.NET Framework 版本:4.0.30319.1026
Foxtable 版本:2020.1.12.18
错误所在事件:窗口,经理值班表设计窗口,Button1,Click
详细错误信息:
Conversion from string "李四" to type \'Integer\' is not valid.
Input string was not in a correct format.

还有,狐表的运行错误提示内容,怎么才能改成中文版翻译?
经常看不懂!

--  作者:有点蓝
--  发布时间:2020/3/28 10:11:00
--  
什么年代了都。打开百度翻译:https://fanyi.baidu.com/?aldtype=16047#auto/zh,复制进去翻译

写了什么代码?能不能主动一点,把有问题的代码发上来!

--  作者:fengwenliuyan
--  发布时间:2020/3/28 13:01:00
--  回复:(有点蓝)什么年代了都。打开百度翻译:https:...
DataTables("经理值班表").DataRows.Clear()
Dim y As Integer = e.Form.Controls("ComboBox1").value
Dim m As Integer = e.Form.Controls("ComboBox2").value
Dim k As Integer = e.Form.Controls("ComboBox3").value
Dim days As Integer = Date.DaysInMonth(y,m)
Dim nms() As String = {"张三","李四","王五","陈六","赵七","刘八"}
Dim jh As New List(of String)
jh.AddRange(nms)
For n As Integer = 1 To k-1
    jh.Add(jh(0))
    jh.RemoveAt(0)
Next
Tables("经理值班表窗口_经理值班表").AddNew()
For d As Integer = 1 To days
    Dim v As Date = new Date(y,m,d)
    Dim w As Integer = v.DayOfWeek
    Tables("经理值班表窗口_经理值班表").Current(w) = Format(d,"00") & " " &  jh(((d - 1) Mod 6))
    If w = 6 Then
        Tables("经理值班表窗口_经理值班表").AddNew()
    End If
Next


“经理值班表设计窗口”中的ComboBox3的自定义项目内容,怎么从现在的“1|2|3|4|5|6”,改成“张三|李四|王五|陈六|赵七|刘八”

--  作者:fengwenliuyan
--  发布时间:2020/3/28 14:32:00
--  
求帮助
--  作者:有点蓝
--  发布时间:2020/3/28 15:55:00
--  
这个代码我放到1楼项目测试没有问题,按什么步骤测试会有问题?