用MiDocView控件实现编辑.tif格式的文件,请问该如何操作呢?最好有代码,谢谢。
解决方案 »
- 关闭重复的窗口??例如有三个名为aaaaa的窗口,如何关闭两个留一个?
- 求老板键实例
- 太奇怪了~~还有这样的问题,求教!!
- 想做一个语音聊天的软件,必须要具备哪些知识
- 跪谢cctv
- 用VB编了一个访问数据库的小程序,在2K下运行正常,但在XP运行时报告:run-time error '399': Component 'actskn43.ocx' 报错,请大家帮助!
- Win2000里面怎么无法为打印机设定自定义纸张大小?而98却可以,98里打印机属性里有一个“纸张”选项,一点就有自定义,而2000却没有了
- 如何将从文件中取得的二进制数据转为BASE64编码
- 怎么让TAB键触发键盘事件?
- 状态栏的问题!
- 关于WebBrowser状态的问题
- 寻求VB高手帮助
代码一: 只在miDocviewer中显示tif文件
Private Sub Form_Load()
Dim miDoc As MODI.Document
Set miDoc = New MODI.DocumentmiDoc.Create "c:\fileName.tif"
miDocviewer.Document = miDoc
End Sub代码二:旋转tif文件90度,并保存为文件
Private Sub Form_Load()
Dim miDoc As MODI.Document
Set miDoc = New MODI.Document
Dim myImg As MODI.ImagemiDoc.Create "c:\chahua.tif"
miDocviewer.Document = miDoc
Set myImg = miDoc.Images(0)
myImg.Rotate 90
miDoc.SaveAs "C:\fileName.tif", miFILE_FORMAT_TIFF
End Submy Email:fs87123#163.com
会提示改成MODIctl
而且 就算 没错误 到后来 也输不出来