Foxtable(狐表)用户栏目专家坐堂 → [求助]piao据数量与单位打印问题。


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

主题:[求助]piao据数量与单位打印问题。

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


加好友 发短信
等级:童狐 帖子:274 积分:2303 威望:0 精华:0 注册:2008/9/12 16:46:00
[求助]piao据数量与单位打印问题。  发帖心情 Post By:2014/8/8 17:29:00 [只看该作者]

piao据窗口中有2个Label,一个是数量,一个是单位,数量位数是变化的,单位可能是公斤或箱。打印时怎么做可以实现“1234公斤”,而不是“1234  公斤”,或者两个内容重合了?

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/8 17:32:00 [只看该作者]

 你可以把label1(数字)设置成向右停靠。

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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2014/8/8 17:36:00 [只看该作者]

用一个Label,拼接数量和单位。

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


加好友 发短信
等级:童狐 帖子:274 积分:2303 威望:0 精华:0 注册:2008/9/12 16:46:00
  发帖心情 Post By:2014/8/8 18:12:00 [只看该作者]

谢谢lsy老师的提醒,按下面代码可以实现:
Dim lbl As WinForm.Label
Dim s As   String = Tables("表A").Current("数量")
Dim t As  String = Tables("表A").Current("单位")
lbl = e.Form.Controls("Label1")
lbl.Text = s+t

我还想实现数量为大写,如壹公斤,而不是1公斤,该怎么做?


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


加好友 发短信
等级:童狐 帖子:274 积分:2303 威望:0 精华:0 注册:2008/9/12 16:46:00
  发帖心情 Post By:2014/8/8 18:19:00 [只看该作者]

好了,自己解决了:
Dim lbl As WinForm.Label
Dim s As   String = Tables("表A").Current("数量")
Dim t As  String = Tables("表A").Current("单位")
lbl = e.Form.Controls("Label1")
lbl.Text = CUNumber(s)+t

 回到顶部