Foxtable(狐表)用户栏目专家坐堂 → [求助]CheckedComboBox 不能打印?


  共有5628人关注过本帖树形打印复制链接

主题:[求助]CheckedComboBox 不能打印?

帅哥哟,离线,有人找我吗?
bluesky
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:139 积分:946 威望:0 精华:0 注册:2015/1/9 15:08:00
[求助]CheckedComboBox 不能打印?  发帖心情 Post By:2015/3/4 14:31:00 [显示全部帖子]

随货单据  
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20150304142839.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20150304142855.png
图片点击可在新窗口打开查看
使用的是CheckedComboBox控件,  内容不能输出打印?请教老师。

 回到顶部
帅哥哟,离线,有人找我吗?
bluesky
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:139 积分:946 威望:0 精华:0 注册:2015/1/9 15:08:00
  发帖心情 Post By:2015/3/4 14:38:00 [显示全部帖子]

我可以试一下。不过,这个问题可否从根上解决一下?这个控件输出打印有难度吗?

 回到顶部
帅哥哟,离线,有人找我吗?
bluesky
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:139 积分:946 威望:0 精华:0 注册:2015/1/9 15:08:00
  发帖心情 Post By:2015/3/4 14:48:00 [显示全部帖子]

增加了一个TextBox控件

Dim shdj As String
With Tables("订单") 
    If .Current.Isnull("随货单据")  Then
        shdj = ""
    Else
        shdj = .Current("随货单据")
    End If
End With

e.Form.Controls("TextBox_shdj").Value = shdj

问题解决,谢谢甜版主。

 回到顶部