欢迎光临:
非常感谢您光临枕善居。本站是一个免费的基于VB，VB.NET源代码交流的平台，为大家提供优质的专业的源代码，如果您有需要，本站可以帮助在业余时间里给您寻找代码。当然，如果您有好的代码也可以在本站发布，共享给大家。
专业VB和.NET源码、编程开发教程、图标资源、USB电脑遥控器、智能家电控制开关....更多东东请进入我的淘宝小店--->
VB及.NET新源码2011(3DVD,控件+资源)
智能多路控制(串口编程开关) 带源码!
上一篇
下一篇
05-02
25
用PNG图片制作的启动界面!
作者:枕善居主 / 查看次数: 24623 / 评论: 11
使用用PNG格式的图片制作的Splash启动界面!
支持透明格式．
编程开发 网站美化专业精美图标(PNG,BMP,ICO格式，16x16到256x256全尺寸) 盒装4DVD,全国包快递
【VB和.NET专业源码+解决方案+数据字典DVD(全国包快递)】 代码清单 购买后可以享受认证VIP会员及免费获取破解控件补丁
相关日志:
文章来自: 
引用通告: 
Tags: 
评论: 11 | 
回复
zdnet
[2011-09-29 18:12:03 | 
]不知道为什么，编译后生成的程序会报毒。
找了一百多页，可找到了啊
这个程序如果稍加修改，不断地加载显示PNG图片，做个有动画效果的启动效果很好，但是我发现内存也在蹭蹭的往上窜啊，不知道有哪位大哥能给优化优化一下，每次加载重画后，删除上一次的内容（彻底从内存条里删除，节约资源，不然时间长了就蓝屏了）
回复mirage
[2006-08-01 09:31:47 | 
| ]本程序不错
但我希望那位改进下
我想 放几个Label上去 模仿PhotoShop 的读取中...
但是怎么也显示不出来
请问这个问题怎么解决
但我希望那位改进下
我想 放几个Label上去 模仿PhotoShop 的读取中...
但是怎么也显示不出来
请问这个问题怎么解决
回复mirage
[2006-08-01 09:25:17 | | ]编译好后没反应 请确定调用的Png图片的路径正确
谢谢!
谢谢!
[wink]可找到了。[heart]
不错，支持的说！
回复yhd0411
[2006-04-26 15:44:51 | | ]系统出现错误一点弹出信息也没有，在在事件查看器中出现的错误如下：
错误应用程序 管理系统.exe,版本1.0.0.0，错误模块 unknown，版本0.0.0.0，错误地址0x00154f3c。
错误应用程序 管理系统.exe,版本1.0.0.0，错误模块 unknown，版本0.0.0.0，错误地址0x00154f3c。
回复yhd0411
[2006-04-26 15:43:43 | | ]在form_load中注释下面代码后，编译运行没事，可以加载控件，难道下面这段跟系统有冲突？
Me.Label1.Caption = "EyeDropper " & Me.EyeDropper1.Version & " Alpha Example"
'-- This MUST Be Called First
Me.EyeDropper1.Initialise
'-- Set The Redraw To False For Faster Drawing
Me.EyeDropper1.Redraw = False
'-- Clear The control
Me.EyeDropper1.Clear
'-- Add 7 Items - Its That Simple
Set xItem = Me.EyeDropper1.EyeDropperItems.Add("Mail", "Mail", Me.ImageList2.ListImages(1).ExtractIcon, Me.Picture1(1))
Set xItem = Me.EyeDropper1.EyeDropperItems.Add("Calender", "Calender", Me.ImageList2.ListImages(2).ExtractIcon, Me.Picture2)
Set xItem = Me.EyeDropper1.EyeDropperItems.Add("Contacts", "Contacts", Me.ImageList2.ListImages(3).ExtractIcon, Me.Picture1(3))
Set xItem = Me.EyeDropper1.EyeDropperItems.Add("Journal", "Journal", Me.ImageList2.ListImages(4).ExtractIcon, Me.Picture1(4))
Set xItem = Me.EyeDropper1.EyeDropperItems.Add("Notes", "Notes", Me.ImageList2.ListImages(5).ExtractIcon, Me.Picture1(5))
Set xItem = Me.EyeDropper1.EyeDropperItems.Add("Tasks", "Tasks", Me.ImageList2.ListImages(6).ExtractIcon, Me.Picture1(6))
Set xItem = Me.EyeDropper1.EyeDropperItems.Add("Folder List", "Folder List", Me.ImageList2.ListImages(7).ExtractIcon, EyeDropperContainer1)
'-- Set Hom Many Visible Items You Want To see
Me.EyeDropper1.VisibleItems = 4
'-- Redraw The Control
Me.EyeDropper1.Redraw = True
Me.Label1.Caption = "EyeDropper " & Me.EyeDropper1.Version & " Alpha Example"
'-- This MUST Be Called First
Me.EyeDropper1.Initialise
'-- Set The Redraw To False For Faster Drawing
Me.EyeDropper1.Redraw = False
'-- Clear The control
Me.EyeDropper1.Clear
'-- Add 7 Items - Its That Simple
Set xItem = Me.EyeDropper1.EyeDropperItems.Add("Mail", "Mail", Me.ImageList2.ListImages(1).ExtractIcon, Me.Picture1(1))
Set xItem = Me.EyeDropper1.EyeDropperItems.Add("Calender", "Calender", Me.ImageList2.ListImages(2).ExtractIcon, Me.Picture2)
Set xItem = Me.EyeDropper1.EyeDropperItems.Add("Contacts", "Contacts", Me.ImageList2.ListImages(3).ExtractIcon, Me.Picture1(3))
Set xItem = Me.EyeDropper1.EyeDropperItems.Add("Journal", "Journal", Me.ImageList2.ListImages(4).ExtractIcon, Me.Picture1(4))
Set xItem = Me.EyeDropper1.EyeDropperItems.Add("Notes", "Notes", Me.ImageList2.ListImages(5).ExtractIcon, Me.Picture1(5))
Set xItem = Me.EyeDropper1.EyeDropperItems.Add("Tasks", "Tasks", Me.ImageList2.ListImages(6).ExtractIcon, Me.Picture1(6))
Set xItem = Me.EyeDropper1.EyeDropperItems.Add("Folder List", "Folder List", Me.ImageList2.ListImages(7).ExtractIcon, EyeDropperContainer1)
'-- Set Hom Many Visible Items You Want To see
Me.EyeDropper1.VisibleItems = 4
'-- Redraw The Control
Me.EyeDropper1.Redraw = True
回复yhd0411
[2006-04-26 15:18:11 | | ]我现在发现在Windows2003server系统上发现，直接在开发环境中运行没有问题，为何编译好以后运行一点反应也没有？？请站长能否尽快解决一下是为何？
发表评论
您没有权限发表评论！
