VB6如何在word2003左侧装订线位置打印条形码? VB6如何在word2003左侧装订线位置打印条形码?要在VB6中设置条形码控件BarcodeCtrl的类型和值,然后调出Word在装订线位置竖向打印条形码!解决后就给分! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 BarcodeCtrl是Office自带的控件,如何利用VB6在Word中生成条形码,我没研究明白,请各位前辈指导! 生成条形码:BarCodeCtrl1.Value = Text3.Text VB6要生成条形码 一般是横式的打印在PctureBox上面 你要立式的话 可以旋转图片方式来解决所产生的图片再应用到excell或word 顶了~~以前都是在Report里用这个东西的~~ “调出Word在装订线位置竖向打印条形码”这个需要知道在Word里面怎么调用,然后用宏实现VB里赋值谁不会 “调出Word在装订线位置竖向打印条形码”这个需要知道在Word里面怎么调用,然后用宏实现VB里赋值谁不会你光会写这个,答案呢? dbcontrols (泰山) 要多做,少说。 这是vba中的一段,参考。Set myCB = ActiveDocument.Shapes.AddOLEControl(ClassType:="BARCODE.BarCodeCtrl.1") With myCB.OLEFormat.Object .Value = "S-102909211000001-12" .Style = 7 End With cxy5636917 许久未见啦这年头啊 聪明的人都是 多说少做, 像你我等 多做少说的人 都是天下第一号大傻蛋!! 泰山:你真是有辱我们山东泰山的名声啊。泰山,应是顶天立地也。真君子也。我和cbm66都没得罪你。并且我一向不和人斗嘴。可你也太没礼貌了。我不得不说两句。告诉你,cbm666在vb吧那绝对是老大。他的技术和水平,不是你我所能及的。慢慢学吧。别太不谦虚了。 瞧瞧,泰山什么时候是你们的了?你和和cbm66都没得罪我不错,可是我得罪你们了哦,耽误某些人在这里挣钱了!你们的帖子有礼貌么?“绝对是老大”是你捧得吧?就凭是一个撤职了的吧主?“他的水平不是你我能所及”,我的水平就是你他所能及?凭什么?就凭你一张嘴? http://hiphotos.baidu.com/cxy5636917/pic/item/2c77d42bdb4727b1e6cd409e.jpg.jpg 感谢各位捧场!本题关键两点:1,如何利用VB6在Word打印Barcodectrl? 2,如何打印在Word的装订线位置? 条形码控件的赋值不是讨论重点!CBM666的办法是图片,如果用你的办法,请问如何添加到装订线位置?大家继续探讨! 你可以先把结果放在剪切版里,在装订线的位置设置标签,然后用下列代码粘贴过去 WDApp.ActiveDocument.Books("Barcodectrl").Select WDApp.Selection.Paste 左侧边距框中的内容是在页眉中添加的,lz可以录制vba宏获得代码不过17楼的想法不错,我没试过,看似很简单应该可行。还是倾向于cmb666所说生成图片后,粘贴到左侧边距中。 各位前辈,我换个问法,希望有经验的不但能说还能写出具体代码(另开帖加分) 在Word左侧装订线位置添加图片,比较可行,办法是:在页眉页脚编辑状态下,在页眉添加图片,然后将图片拖动到页面左侧位置即可!但是在录制宏时,鼠标无法拖动图片,以至于我无法获取VBA代码!请各位亲自操作下,研究录制办法,谢谢! NormalTemplate.AutoTextEntries("第 X 页 共 Y 页").Insert Where:=Selection. _ Range, RichText:=True Selection.InlineShapes.AddPicture FileName:= _ "C:\Documents and Settings\Administrator\My Documents\My Pictures\001.jpg" _ , LinkToFile:=False, SaveWithDocument:=True 不知道lz有没有认真看帖子,我都告诉你怎么做了,难道连动手试试的力气都没有,或者被打击得一点斗志都没了?或者根本就没有相信过我告诉你的方法?难道还真要到lz的电脑上演示一番才可以? 这个是直接在word中操作模板文件,可是在vb6中,又是如何引用这个模板对象?另外,图片是要输出到word页面左侧位置,由于是调用了页眉/页脚视图,所以还需要删除页眉的下划线。 在录制宏时,表格是无法用鼠标拖动的,但是可以使用键盘操作菜单,一步一步完成。现在要说的是,页眉的宏录制,无法用鼠标。希望大家亲自操作一下,不要光说不做,你不经过实践,怎么会明白困难呢?还在那里说我“动手试试的力气都没有”我相信csdn的朋友们,都是实干家,不是“理论家”。 引用WORD后是可以直接使用宏的 代码从VB6.0转化为VS2008的问题 关于手动输入和条码枪输入的互换问题 谢谢大家对我的帮助:对于时间文件的读入,已经有了一点自己的编程,可是这怎么看程序对不对啊? 双喜,散分。 用ASP写一个*.htm文件 可以发信件和附件的 关于语言重的:与! 在网络连接里有“宽带连接”和“虚拟专用网络”二种拨号,用VB如何区分? 如何用vb把足彩中的复式全部展开变成单式,并投入到一个文本框里 关于打印比较 从Html文件中提取图片文件名 给(江南春)大哥加分了 如何使用 insert into 语句在指定位置插入记录?
以前都是在Report里用这个东西的~~
这个需要知道在Word里面怎么调用,然后用宏实现
VB里赋值谁不会
这个需要知道在Word里面怎么调用,然后用宏实现
VB里赋值谁不会你光会写这个,答案呢?
(泰山) 要多做,少说。
With myCB.OLEFormat.Object
.Value = "S-102909211000001-12"
.Style = 7
End With
你和和cbm66都没得罪我不错,可是我得罪你们了哦,耽误某些人在这里挣钱了!
你们的帖子有礼貌么?
“绝对是老大”是你捧得吧?就凭是一个撤职了的吧主?
“他的水平不是你我能所及”,我的水平就是你他所能及?凭什么?就凭你一张嘴?
WDApp.ActiveDocument.Books("Barcodectrl").Select WDApp.Selection.Paste
在Word左侧装订线位置添加图片,比较可行,办法是:在页眉页脚编辑状态下,在页眉添加图片,然后将图片拖动到页面左侧位置即可!但是在录制宏时,鼠标无法拖动图片,以至于我无法获取VBA代码!请各位亲自操作下,研究录制办法,谢谢!
Range, RichText:=True
Selection.InlineShapes.AddPicture FileName:= _
"C:\Documents and Settings\Administrator\My Documents\My Pictures\001.jpg" _
, LinkToFile:=False, SaveWithDocument:=True
不知道lz有没有认真看帖子,我都告诉你怎么做了,难道连动手试试的力气都没有,或者被打击得一点斗志都没了?或者根本就没有相信过我告诉你的方法?难道还真要到lz的电脑上演示一番才可以?
这个是直接在word中操作模板文件,可是在vb6中,又是如何引用这个模板对象?另外,图片是要输出到word页面左侧位置,由于是调用了页眉/页脚视图,所以还需要删除页眉的下划线。
在录制宏时,表格是无法用鼠标拖动的,但是可以使用键盘操作菜单,一步一步完成。
现在要说的是,页眉的宏录制,无法用鼠标。希望大家亲自操作一下,不要光说不做,你不经过实践,怎么会明白困难呢?还在那里说我“动手试试的力气都没有”我相信csdn的朋友们,都是实干家,不是“理论家”。