1187
社区成员
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
xtuwz 2006-03-04
一个最簡單的方法，安裝个这样的打印机就行，如果沒有的话，在WINDOWS中加个虚似的打印机，不过要有A3的就可以了
数据结构与算法学习、智能算法 2006-02-27
引用Excel（"工程"/"引用"/Microsoft Excel Object X.0 Library）
Private Sub Command1_Click()
Dim AdoCon As New ADODB.Connection
Dim AdoRec As New ADODB.Recordset
Dim ctl As Object
AdoCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\test.xls;Extended Properties=""Excel 8.0;HDR=YES;IMEX=1"""
'根据用户输入的姓名，查找对应的记录
AdoRec.Open "select 姓名,年龄,学历,性别 from [Sheet1$] where 姓名='" & Text1.Text & "' ", AdoCon, adOpenDynamic, adLockReadOnly
With DataReport1
Set .DataSource = AdoRec
For Each ctl In .Sections.Item("Section1").Controls
If TypeName(ctl) = "RptTextBox" Then
Select Case ctl.Name
Case "Text1"
ctl.DataField = AdoRec.Fields("姓名").Name
Case "Text2"
ctl.DataField = AdoRec.Fields("年龄").Name
Case "Text3"
ctl.DataField = AdoRec.Fields("学历").Name
Case "Text4"
ctl.DataField = AdoRec.Fields("性别").Name
End Select
End If
Next
End With
DataReport1.Show
End Sub
Private Sub Command1_Click()
Dim AdoCon As New ADODB.Connection
Dim AdoRec As New ADODB.Recordset
Dim ctl As Object
AdoCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\test.xls;Extended Properties=""Excel 8.0;HDR=YES;IMEX=1"""
'根据用户输入的姓名，查找对应的记录
AdoRec.Open "select 姓名,年龄,学历,性别 from [Sheet1$] where 姓名='" & Text1.Text & "' ", AdoCon, adOpenDynamic, adLockReadOnly
With DataReport1
Set .DataSource = AdoRec
For Each ctl In .Sections.Item("Section1").Controls
If TypeName(ctl) = "RptTextBox" Then
Select Case ctl.Name
Case "Text1"
ctl.DataField = AdoRec.Fields("姓名").Name
Case "Text2"
ctl.DataField = AdoRec.Fields("年龄").Name
Case "Text3"
ctl.DataField = AdoRec.Fields("学历").Name
Case "Text4"
ctl.DataField = AdoRec.Fields("性别").Name
End Select
End If
Next
End With
DataReport1.Show
End Sub
Web浏览器页面打印控件(ocx) 即同一台电脑，在设置好打印参数后 A用户可以保存方案 "A3打印发票"(方案名称) 保存方案 "A5套打信封",......等 B用户可以保存方案 "李四A3打印发票"(方案名称) 保存方案 "李四A3套打",......等 保存后，下次...
华中科技大学计算机组成原理慕课答案 数符与尾数小数点后第一位数字相同 23、在定点运算器中，为判断运算结果是否发生错误，无论采用双符号位还是单符号位，均需要设置（ A ），它一般用异或门来实现 A.溢出判断电路 B.编码电路 C.译码电路 D.移位电路 ...
史上最全面Java面试汇总（面试题+答案） setDaemon(boolean on)方法可以方便的设置线程的Daemon模式，true为守护模式，false为用户模式。 36.Java线程池技术及原理 参考文章： http://www.cnblogs.com/dolphin0520/p/3932921.html 37.java并发包concurrent...
微软 Windows Server 2016 简体中文 MSDN 官方原版 ISO 镜像下载 Windows Server 2016，它可以理解为服务器版的 Windows 10，宣告整个核心架构定型稳定。Windows Server 2016 是微软推出的第六个 Windows server 版本，也是 Windows 10 的服务器版本。据了解，与前代不同的是，...
『Python学习笔记』np.random.rand()函数和np.random.randn()函数 1、np.random.rand()函数 语法： np.random.rand(d0,d1,d2……dn) 注：使用方法与np.random.randn()函数相同 ...应用：在深度学习的Dropout正则化方法中，可以用于生成dropout随机向量（dl）， 例如（keep_...
试写一算法，实现顺序表的就地逆置，即利用原表的存储空间将线性表(a1, a2,..., an)逆置为(an, an-1, ..., a1) 试写一算法，实现顺序表的就地逆置，即利用原表的存储空间将线性表(a1, a2,..., an)逆置为(an, an-1, ..., a1) 分析： 该题有两个点必须注意：1.是顺序表不是单链表；2.利用原表的存储空间实现逆置 利用原表的...
软件测试_笔记（完整版） 狭义的软件测试定义：为发现软件缺陷而执行程序或系统的过程 广义的软件测试定义：人工或自动地运行或测定某系统的过程，目的在于检验它是否满足规定的需求或弄清预期结果和实际结果间的差别 为什么要做软件测试 ...
C#基础教程-c#实例教程，适合初学者 本章介绍C#语言的基础知识，希望具有C语言的读者能够基本掌握C#语言，并以此为基础，能够进一步学习用C#语言编写window应用程序和Web应用程序。当然仅靠一章的内容就完全掌握C#语言是不可能的，如需进一步学习C#语言...
stata 线性回归分析基本操作 regress y x1 x2 （红色表示该命令可简写为红色部分） 以 Nerlove 数据为例（数据附后文） regress lntc lnq lnpf lnpk lnpl 表上半部分为方差分析表，包括回归平方和，残差平方和，均方，F检验等。上半部分...
Visual Studio 2013 + Intel(R) Visual Fortran 安装教程 安装了好几遍，ivf都不能加载到vs中，中途放弃了vs，又改用codeblocks编译器，依然在写fortran的时候出现了各种问题，于是又放弃了codeblocks改回vs，总之是折腾了好久，终于装明白了ivf并且将fortran模板成功加载到...
基于MATLAB的指纹识别与匹配 先进行均值滤波，然后对图像的每一个像素，为确定在该像素处的脊线方向，在以该像素为中心的 9 9 窗口内，分别计算 8 个方向上的经过处理后的灰度值，即将图中数字 1 到 8 的位置的像素灰度值去除其中最大 summax和...
Python xlwings模块简单使用 """ app = xw.App(visible=True, add_book=False) wb = app.books.open('./a.xlsx') wb2 = app.books.open("./b.xlsx") # 打印当前活跃的books- print(app.books.active) # 打印当前的book-Books([, ]) print(app....
定义一个表示学生信息的类Student，要求如下： （1）类Student的成员变量： sNO 表示学号；sName表示姓名；sSex表示性别；sAge表示年龄；sJava：表示Java课程成绩。 /*定义一个表示学生信息的类Student，要求如下： （1）类Student的成员变量： ...在构造方法中通过形参完成对成员变量的赋值操作。 （3）类Student的方法成员： getNo（）：获得学号； getName（）：获得
ASCII 码对照表 于是想到要是把 ASCII 码对照表打印出来贴墙上，需要的时候直接抬头看就好了。可是墙内墙外粗略看了一遍，都没有找到真正合心意的图片，只找到一张版面分类比较合心意的。于是就以这一张图为灵感，自己动手在 Excel ...
在Word中将A3大小的卷子拆成A4大小来打印的方法 相信很多家长朋友用A4幅面的打印机给孩子打印Word格式A3...首先我们打开要打印的A3幅面卷子的Word文档，找到“页面设置”并进入对话框，各个Word版本的“页面设置”怎么进入这里不再赘述，如果找不到请大家自行百度一下
京瓷5501i A3小册子打印设置 京瓷5501i A3小册子打印设置：目的：4张A4纸的内容要打印在一张A3纸上，并且中间折叠（像小册子）设置：1.选择“版面”、小册子（左边装订）2.选择“基本”，打印尺寸（A3），页面尺寸（A4）3.然后打印就可以了 转载...
Word文档A4如何打印成A3 1、打开word文档，点击“布局”，点击“页面设置”。 如下图： 2、点击“纸张”，纸张大小选“A3” 3、点击“页边距”、纸张方向选“横向”，页码范围选...最后就生成了A3格式的PDF文档了。可以去打印了. ...
