以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]piao据数量与单位打印问题。  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=55010)
--  作者：syzsyk
--  发布时间：2014/8/8 17:29:00
--  [求助]piao据数量与单位打印问题。
票据窗口中有2个Label，一个是数量，一个是单位，数量位数是变化的，单位可能是公斤或箱。打印时怎么做可以实现“1234公斤”，而不是“1234  公斤”，或者两个内容重合了？
--  作者：有点甜
--  发布时间：2014/8/8 17:32:00
--  
 你可以把label1(数字)设置成向右停靠。
--  作者：lsy
--  发布时间：2014/8/8 17:36:00
--  
用一个Label，拼接数量和单位。
--  作者：syzsyk
--  发布时间：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
--  发布时间：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