请问怎样在VB6里用win98里的画笔调用一指定文件?

angeltoday 2000-06-26 12:54:00
请问在VB6里怎样用win98里的画笔调用一指定图象文件,并在关闭时用一指定的缺省名保存?谢谢!
...全文
153 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
Janven 2000-07-05
  • 打赏
  • 举报
回复

这种方法我经常用,可以的

Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long 'Declare Function ListView1_ItemClick Lib "MsComctlLib" (ByVal Item As MsComctlLib.ListItem)

ShellExecute 0, "open", "pbrush.EXE", "c:\windows\forest.bmp", "", 3
wgtech 2000-07-05
  • 打赏
  • 举报
回复
最简单的办法:
Shell "start c:\windows\forest.bmp", vbNormalFocus

START.EXE会自动根据文件类型关联调用相关的程序打开。

musicbug 2000-07-02
  • 打赏
  • 举报
回复
可以用WinExec,和ShellExecute函数
ret=WinExec("start c:\windows\forest.bmp",0)
和Shell是一样的
Shell "start c:\windows\forest.bmp",0
ShellExecute(handle, "open", "c:\windows\forest.bmp",0,0, SW_SHOWNORMAL);
handle是调用者的窗口句柄

mafangsan 2000-06-29
  • 打赏
  • 举报
回复
Private Sub Command1_Click()
Shell "C:\Program Files\Accessories\MSPAINT.EXE c:\windows\forest.bmp", vbNormalFocus
End Sub
但你必须确定再不同机器上画图的路径
yokel 2000-06-28
  • 打赏
  • 举报
回复
OLE嵌入自然可行.但如是只要实现在VB6里用win98里的画笔调用一指定文件(当然文件必须是画笔可识别的),就不必这么麻烦了!用shell命令就可以了!
Un1 2000-06-26
  • 打赏
  • 举报
回复
使用OLE嵌入。
1,cdrecorder.ZIP 一个用API函数编写的CD抓轨程序(5KB)2,mci.ZIP MCI的应用示例,包括播放WAV、MIDI文件和播放CD及将CD中的曲目转录为WAV文件等(5KB)3,wavplay.ZIP 播放WAV文件的演示(23KB)4,vbpiano.ZIP 一个模拟钢琴的源程序,(需要Threed32.ocx)(75KB)5,videocap.ZIP 一个视频捕捉程序,安装了视频捕捉设备的朋友可以下载来看一看(12KB)6,mixer.ZIP 一个非常完全的waveOut程序,包括了一个waveOut类和使用类的范例,这个范例获得Windows下所有的wave输入输出设备的名称以及属性(22KB)7,agent1.ZIP Microsoft Agent范例程序,你的系统中必须已经安装了Agent2.0以上版本(2KB)8,sound_cap.ZIP 利用DirectSound和MS Agent建立的一个语音复读机。读音的捕捉和回放由DirectSound实现,MS Agent实现标准朗读(5KB)9,mmfile_play.ZIP 利用Windows API函数实现多媒体文件得播放,可以播放MPG、AVI、MDI、WAV等文件以及文件信息(128KB)10,midi_drum.ZIP VB鼓机的音序器(26KB)11,flashsamp.ZIP 这是一个介绍如何控制Flash控件显示Flash文件的程序(62KB)12,m032.ZIP 定时计时器(530KB)13,m031_plmaker.ZIP 播放列表生成器(4KB)14,m029_speech.ZIP 程序会朗读(2KB)15,m028_mp3.ZIP 简单的mp3播放器(10KB)16,m027_mp3test.ZIP MP3播放器(3KB)17,m025_zm016.ZIP 一个音量控制小程序(6KB)18,m024_videocap.ZIP 视频捕捉程序(12KB)19,m023_mcd.ZIP CD播放器(23KB)20,m022_mmedia.ZIP 多媒体播放器(3KB)21,m021_Play33.ZIP 电子琴(9KB)22,m020_vbamp.ZIP WINAMP(141KB) 23,m019_testsc.ZIP 声卡测试程序(3KB)24,m018_cdaudio.ZIP CD播放机(4KB)25,m016_aviplay.ZIP 利用Windows API 播放AVI文件(3KB)26,m015.ZIP 一个音量控制小程序(7KB)27,m014.ZIP 播放.mid格式的背景音乐,你可以在此基础上增加其它功能(13KB) 28,m013.ZIP 播放.WAV文件,并显示其波形(6KB)29,m012.ZIP 可同时8个Wave文件混音(338KB) 30,m011.ZIP 能混合很多种声音的好程序(14KB)31,m010.ZIP 播放Wave, Midi和Avi文件(7KB)32,m004.ZIP 多媒体控件的使用,自带EXE(8KB)33,m003.ZIP MULTIMEDIA MCI 多媒体控件的应用,自带EXE(3KB)34,m002.ZIP 可以播放mp3的dll,并附有一个完整的示例程序(可以显示播放时间等,功能强大),自带现成的EXE文件,非常Cool(82KB)35,m001.ZIP 使用API函数播放wav文件(350KB)36,anidemo.ZIP 使用windows api演示动画的例子(288KB) 37,anic.ZIP 动画光标的例子(4KB)38,waveplay.ZIP 播放wave的例子(350KB) 39,jpegvu.ZIP 显示jpeg文件的例子(116KB)40,g

7,759

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧