| vodoo 于 2009-01-27 00:20 AM 发表评论： |
|
| 查看所评论的日志：田草CAD工具箱(VBA)安装程序（2009.04.13） |
| tiancao1001 于 2009-01-25 03:53 PM 发表评论： |
emule会过滤搜索关键词，
我们只有清空config文件夹下面得wordfilter.txt，就可以了。 |
|
| 查看所评论的日志：田草日志 |
| tiancao1001 于 2009-01-23 10:22 AM 发表评论： |
winXP SP2 IIS 出现 “服务没有及时响应启动或控制请求” 错误解决方
是删除系统自动更新 KB939373。OK
|
|
| 查看所评论的日志：田草日志 |
| ahhfsy 于 2009-01-20 10:36 AM 发表评论： |
真是个好办法。
请问一下：
使用CAD的VBA 创建一个打印程序，打印图纸空间（图纸空间比较多），使用上一次打印设置怎么搞？谢谢
这是我的代码：
Private Sub CommandButton2_Click()
'
' 建立要打印的图纸空间布局
Dim strLayouts(0 To 999) As String
Dim varLayouts As Variant
Dim n As Integer
Dim m As Integer
For m = 0 To ListBox1.ListCount - 1
strLayouts(m) = ListBox1.List(m)
'MsgBox (ListBox1.List(m))
Next m
varLayouts = strLayouts
ThisDrawing.Plot.SetLayoutsToPlot varLayouts
' 将打印份数设置为 1
ThisDrawing.Plot.NumberOfCopies = 1
' 初始化打印
'ThisDrawing.Plot.PlotToDevice ThisDrawing.ModelSpace.Layout.ConfigName
ThisDrawing.Plot.PlotToDevice
---------------------------------------------------------------------------
我用他打印listbox里显示的图纸空间，可我不晓得怎么使用“上一次打印”的样式，请帮帮忙，谢谢
|
|
| 查看所评论的日志：田草CAD工具箱(VBA)安装程序（2009.04.13） |
| hshh 于 2009-01-12 04:52 PM 发表评论： |
|
| 查看所评论的日志：CAD致命错误处理办法【转帖】 |
| tiancao1001 于 2009-01-12 03:32 PM 发表评论： |
看这几年的CCTV半小时新闻联播的总结：
前10分钟，领导们都很忙；
中间10分钟，全国人民都很幸福；
后10分钟，国外生活在水深火热中 |
|
| 查看所评论的日志：田草日志 |
| dfgd 于 2009-01-10 03:30 PM 发表评论： |
|
| 查看所评论的日志：Auto CAD vba 怎样 创建匿名块 |
| tiancao1001 于 2009-01-09 03:02 PM 发表评论： |
|
| 查看所评论的日志：田草日志 |
[84] [85] [86] [87] [88] [89] [90] [91] [92] [93] ... [144] 