14 个解决方案
#1
要用什么打印,用Datareport吗,里面的图片框支持插入wmf格式的图片。
#2
呵呵,VsPrinter控件也可以打印wmf哟。打印预览也摩门台。
#3
上面的两位兄弟,有例子吗?能不能具体一点,只要能打印就行!
#4
帮帮我啊!
#5
help me!!!
#6
www.componentone.com下载VsPrinter7安装包,所有的说明都有!
太简单了。
然后找注册码。
太简单了。
然后找注册码。
#7
你的*.wmf是否是一幅图片,在工程中加上一个datareport,在中间加上一个rptimage控件,在picture属性里选择你的wmf图片。
在窗口中加上一个button。例:
Private cnDB As New ADODB.Connection
Private Rs As New ADODB.Recordset
Private Sub cmdShowReport_Click()
cnDB.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DBPath & ";Persist Security Info=False" 'DBPath是数据库的路径
cnDB.CommandTimeout = 15
cnDB.Open
StrSQL = "Select * From TempTable" '随便建一个表,里面有一条记录。
Rs.Open StrSQL, cnDB, adOpenStatic, adLockReadOnly
set Report1.datasoure=rs
report1.show
end sub
在窗口中加上一个button。例:
Private cnDB As New ADODB.Connection
Private Rs As New ADODB.Recordset
Private Sub cmdShowReport_Click()
cnDB.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DBPath & ";Persist Security Info=False" 'DBPath是数据库的路径
cnDB.CommandTimeout = 15
cnDB.Open
StrSQL = "Select * From TempTable" '随便建一个表,里面有一条记录。
Rs.Open StrSQL, cnDB, adOpenStatic, adLockReadOnly
set Report1.datasoure=rs
report1.show
end sub
#8
还有其它的方法吗?
#9
上面的方法可以用啊
#10
那如何把在VB里画的图形保存为wmf格式呢?
#11
To: DragonCity(自己发工资)
你有例子吗,VsPrinter7控制我已经有!你给我的那网站我进不去!
你有例子吗,VsPrinter7控制我已经有!你给我的那网站我进不去!
#12
1。你是仅有控件本身,还是整个安装包?内部有Help呀!程序组里有个挺好的Demo.
2。官方网站你都进不去?!
3。简单例子:
with VsPrinter1
.StartDoc
.Picture=.....
.EndDoc
End With
即可。
2。官方网站你都进不去?!
3。简单例子:
with VsPrinter1
.StartDoc
.Picture=.....
.EndDoc
End With
即可。
#13
To:dragoncity(自己发工资)
我只有控件本身!你能不能发一个安装包给我!
wxfeng2002@yahoo.com.cn
谢谢!!!
我只有控件本身!你能不能发一个安装包给我!
wxfeng2002@yahoo.com.cn
谢谢!!!
#14
.Picture=.....
是什么?
.Picture=“c:\temp.wmf”
错误!
是什么?
.Picture=“c:\temp.wmf”
错误!
#1
要用什么打印,用Datareport吗,里面的图片框支持插入wmf格式的图片。
#2
呵呵,VsPrinter控件也可以打印wmf哟。打印预览也摩门台。
#3
上面的两位兄弟,有例子吗?能不能具体一点,只要能打印就行!
#4
帮帮我啊!
#5
help me!!!
#6
www.componentone.com下载VsPrinter7安装包,所有的说明都有!
太简单了。
然后找注册码。
太简单了。
然后找注册码。
#7
你的*.wmf是否是一幅图片,在工程中加上一个datareport,在中间加上一个rptimage控件,在picture属性里选择你的wmf图片。
在窗口中加上一个button。例:
Private cnDB As New ADODB.Connection
Private Rs As New ADODB.Recordset
Private Sub cmdShowReport_Click()
cnDB.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DBPath & ";Persist Security Info=False" 'DBPath是数据库的路径
cnDB.CommandTimeout = 15
cnDB.Open
StrSQL = "Select * From TempTable" '随便建一个表,里面有一条记录。
Rs.Open StrSQL, cnDB, adOpenStatic, adLockReadOnly
set Report1.datasoure=rs
report1.show
end sub
在窗口中加上一个button。例:
Private cnDB As New ADODB.Connection
Private Rs As New ADODB.Recordset
Private Sub cmdShowReport_Click()
cnDB.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DBPath & ";Persist Security Info=False" 'DBPath是数据库的路径
cnDB.CommandTimeout = 15
cnDB.Open
StrSQL = "Select * From TempTable" '随便建一个表,里面有一条记录。
Rs.Open StrSQL, cnDB, adOpenStatic, adLockReadOnly
set Report1.datasoure=rs
report1.show
end sub
#8
还有其它的方法吗?
#9
上面的方法可以用啊
#10
那如何把在VB里画的图形保存为wmf格式呢?
#11
To: DragonCity(自己发工资)
你有例子吗,VsPrinter7控制我已经有!你给我的那网站我进不去!
你有例子吗,VsPrinter7控制我已经有!你给我的那网站我进不去!
#12
1。你是仅有控件本身,还是整个安装包?内部有Help呀!程序组里有个挺好的Demo.
2。官方网站你都进不去?!
3。简单例子:
with VsPrinter1
.StartDoc
.Picture=.....
.EndDoc
End With
即可。
2。官方网站你都进不去?!
3。简单例子:
with VsPrinter1
.StartDoc
.Picture=.....
.EndDoc
End With
即可。
#13
To:dragoncity(自己发工资)
我只有控件本身!你能不能发一个安装包给我!
wxfeng2002@yahoo.com.cn
谢谢!!!
我只有控件本身!你能不能发一个安装包给我!
wxfeng2002@yahoo.com.cn
谢谢!!!
#14
.Picture=.....
是什么?
.Picture=“c:\temp.wmf”
错误!
是什么?
.Picture=“c:\temp.wmf”
错误!