以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 如何在二维码中加入Tab 控制符 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=147065) |
-- 作者:lanbor -- 发布时间:2020/3/9 8:48:00 -- 如何在二维码中加入Tab 控制符 我制作一个二维码,里面有多栏位 如何在二维码的栏位中加入Tab 控制符?如下样本 Dim txt1 As WinForm.TextBox = e.Form.Controls("TextBox1") Dim txt2 As WinForm.TextBox = e.Form.Controls("TextBox2") Dim txt3 As WinForm.TextBox = e.Form.Controls("TextBox3") Dim s1 As String If txt1.Value IsNot Nothing Then s1 += txt1.Value + vbcrlf \'+ "@" If txt2.Value IsNot Nothing Then s1 += txt2.Value + vbcrlf \' + "@" If txt3.Value IsNot Nothing Then s1 += txt3.Value + vbcrlf \' + "@" s1 += Date.Today lab1.Code = s1 lab1.SaveImage("D:\\syt_SCM\\Bar-cord\\" & txt1.Value & txt2.Value & ".jpg") 请教:如何将字符串中的 vbcrlf 回车符换成代表 tab 的控制符, 我的目的是希望: 在扫描二维码后,软件能自动在表格列中,每列放一个值;
[此贴子已经被作者于2020/3/9 8:49:01编辑过]
|
-- 作者:有点蓝 -- 发布时间:2020/3/9 10:21:00 -- txt1.Value + vbtab\'+ "@"
|