我是初学者,现在做毕业设计,是一个网上花店
有很多图片,要把图片放在哪,才能使当我换台电脑时,图片依然存在?
有很多图片,要把图片放在哪,才能使当我换台电脑时,图片依然存在?
解决方案 »
- 聊聊用VB6写面向对象的编程和多线程编程
- vb中关于取余函数mod的问题
- sfilename = Appbbb_.Path & "\" & CStr(sfilename) & ".xls"生成exe竟然没报错,只是在运行exe后才说运行时错误424 需要对象
- 调试DLL的问题,请高手指教,解决一定给分。
- 【问】如何将MSHTML.HTMLImg(IMG)对象复制到内存中?
- 希望那些通过软件设计师的朋友给我一些建议 送100分 ^_^
- excel中的简单问题?
- 如何访问远程access数据库??用WINSOCK?????
- ADO.COMMAND调用SYBASE存储过程为什么很慢很慢很慢?服务器的CPU使用率是100%!
- 关于id字段类型:
- 如何检测指定文件的版本号?用API,还是其他
- 在XP下怎么截取Windows Media Player的图?这段代码不行啊~
所谓资源文件,就是指将在程序运行时用到的资源集中在一起的一个文件。一个资源文件可以包括文字(TEXT)、位图(BITMAP)。图标(ICON)等。并且在程序中调用时不用指明路径,这就简化了程序的编写并减少了发生错误的可能。现在我就以一个小程序为例讲述资源文件的一些使用方法。 这个工程运行后,当点击【未来】按钮时中间图像将依次变换为夏、秋、冬、春……点击【从前】按钮则以相反顺序转动图片(源程序附后)。 首先建立春、夏、秋、冬四幅位图,均以.BMP格式保存在C:\TEST\下。然后打开记事本编写资源文件,内容如下:100 bitmap spring.bmp200 bitmap summer.bmp300 bitmap autumn.bmp400 bitmap winter.bmp其中数字表示此项的ID号码,此号码很重要,它直接影响调用!BITMAP表示以位图方式保存而最后的部分为文件名。将此文件保存为TEST.RC。 接下来编译此资源文件。在C:\Visual Basic\Wizards目录下找到RC.EXE文件。在MS-DOS方式下键人C:\rc /r c:\test.test.rc(键入rc /?将会得到帮助),在编译成功后在C:\TEST\中将发现增加了一个名为TEST.RES的文件。 完成了上面的工作,接下来就可以编写工程了。首先建立一个image控件img和两个Command控件cmdc、cmdw。然后建立一个时钟控件,设其Interval属性为1000。最后在[通用]中声明一个名为iid的整形变量:Dim iid As Integer并初始化img和iid:img.Picture=LoadResPicture(100,vbResBitmap)iid=100其中LoadResPicture(id,model)为从资源文件中调用图像的函数,100表示ID号为100的项,vbResBitmap为一常量,值为0,表示以位图方式打开。然后在两个Command控件中加入源程序代码。 最后在工程资源管理器中用鼠标右键单击选择【添加】-->【添加文件】,加入TEST.RES。 至此工程可谓大功告成,按F5运行一下,希望你会喜欢。还有一点要强调的是一个工程只能有一个工程文件!附源程序:Option ExplicitDim iid As IntegerPrivate Sub comc_Click() iid = iid - 100 If iid < 100 Then iid = 400 img.Picture = LoadRespicture(iid.vbResBitmap) End IfEnd SubPrivate Sub comw_Click() iid = 100 + iid If iid > 400 Then iid = 100 img.Picture = LoadResPicture(iid,vbResBitmap) End IfEnd SubPrivate Sub Form_Load() img.Picture = LoadResPicture(10O,vbResBitmap) iid = 100End SubPrivate Sub Timer1_Timer() iid = 100 + iid If iid > 400 Then iid = 100 img.Picture = LoadResPicture(iid,vbResBitmap) End IfEnd Sub
║ 免费的源码、工具网站,欢迎大家访问!║
║ http://www.j2soft.cn/ ║
╰═══════════════════╯