7,789
社区成员
发帖
与我相关
我的任务
分享求能够渐渐使图片变清楚然后又渐渐变清楚的vb代码！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！
我编写了一个小程序，并做了一个启动的封面，但是觉得比较单调了，手里有几个好的图片（比如叫123.bmp）想加到启动窗体之中，并且在启动的时候渐渐的由模糊变得清楚，再渐渐地变得模糊，然后启动窗体关闭，进入我的程序。可是不知道该如何编写这样改变图形的代码呀。？？？望大家能帮助我，能给出代码，如果有相关的网页也可以的。
谢谢大家了！
谢谢大家了！
...全文
请发表友善的回复…
发表回复
king198 2003-11-27
- 打赏
- 举报
我也要阿，给我一份阿，king198@21cn.com
Ocean222 2003-11-27
- 打赏
- 举报
TO：Rick110AAA！也给我发一份吧！谢谢！E-MAIL：222ocean@163.com
海牛 2003-11-27
- 打赏
- 举报
Email我：Rick110A@Yahoo.com.cn
我给你一个例子，处理速度很快的！
我给你一个例子，处理速度很快的！
lzhcsdn3 2003-11-27
- 打赏
- 举报
up
脆皮大雪糕 2003-11-26
- 打赏
- 举报
使用高斯模糊算法，具体实现方法去网上找找吧能找到的
海牛 2003-11-26
- 打赏
- 举报
使用API函数。
海牛 2003-11-26
- 打赏
- 举报
你说的是将一副图片由模糊变得清楚，再渐渐地变得模糊吗？
aiur2000 2003-11-26
- 打赏
- 举报
先设置interval为300（1000为1秒），将图片设置为1.jpg , 2.jpg ....设共有10张
Private Sub Timer1_Timer()
i = i + 1
If i = 10 Then
Timer1.Enabled = False
End If
Picture1.Picture = App.Path & "\" & i & ".jpg"
End Sub
Private Sub Timer1_Timer()
i = i + 1
If i = 10 Then
Timer1.Enabled = False
End If
Picture1.Picture = App.Path & "\" & i & ".jpg"
End Sub
aiur2000 2003-11-26
- 打赏
- 举报
先将图片转换成动画，直接使用flash播放。
aiur2000 2003-11-26
- 打赏
- 举报
在时间控件中写入，每过X秒，切换图片。
