您所在位置：网站首页 > 办公文档 > 工作计划二维码控件QRMarker

二维码控件QRMarker

3页

卖家[上传人]：大米

文档编号：482354257

上传时间：2023-07-14

文档格式：DOCX

文档大小：221.16KB

文档加载中……请稍候！
如果长时间未打开，您也可以点击刷新试试。

下载文档到电脑，查找使用更方便

10 金贝

/ 3 举报版权申诉马上下载

文本预览

下载提示

常见问题

细心整理这类似条形码，就是增加一些第三方控件控件在这下载 (149.45 KB, 下载次数: 27) 2011-11-12 14:18 上传下载次数: 27 下载后在VBE中引用运用附件时假如没有引用，会报错，所以必需要先下载！2011-11-12 14:02 上传下载附件 (77.35 KB) 2011-11-12 14:02 上传下载附件 (112.07 KB) 然后在EXCEL中选择QRmaker Control，在工作表中用鼠标拉出一个控件2011-11-12 14:10 上传下载附件 (21.89 KB) 启动VBE，添加模块，将以下代码粘贴进去Public Sub QRCodeTest() 定义QRString变量，存储要生成二维码的字符串 Dim QRString As String 给QRString赋值，依据实际状况赋值 QRString = Sheet1.Range(A1) & Sheet1.Range(B1) & ; & Sheet1.Range(A2) & Sheet1.Range(B2) & ; & Sheet1.Range(A3) & Sheet1.Range(B3) & _ & Sheet1.Range(C3) & _ & Sheet1.Range(B4) & _ & Sheet1.Range(C4) Sheet1.Select 设置QRmaker的AutoRedraw属性为ArOn Sheet1.QRmaker1.AutoRedraw = ArOn 将字符串传递给QRmaker控件 Sheet1.QRmaker1.InputData = QRString 刷新QRmaker的内容，假如AutoRedraw属性为On，那么无需此句 Sheet1.QRmaker1.Refresh End Sub(此时可以添加一个按钮，便利以后的刷新)2011-11-12 14:16 上传下载次数: 10 附加该控件的一些介绍(E文)1240c844769eaeed4.html

《二维码控件QRMarker》由会员大米分享，可在线阅读，更多相关《二维码控件QRMarker》请在金锄头文库上搜索。

点击阅读更多内容

TA的资源