进度条 图标

Question

问题一:现有一个变量i,i会随着程序的执行从1变化到28,但是i的变化与时间没有固定关系.
现在要实现:进度条控件的显示随着变量的变化而变化,即当i=28,进度条显示100%问题二:如何改变应用程序的图标为自己想要的图标

Answer 1

'1
pb.Max = 28
for i = 1 to 28
pb.value = i
next
'2
'窗体的icon属性

Answer 2

第一:Option Explicit
Dim I As Integer
Private Sub Form_Load()
Timer1.Interval = 100
ProgressBar1.Max = 28
ProgressBar1.Min = 0
End SubPrivate Sub Timer1_Timer()
Dim L As Double
L = Format(I / 28, "00%")
ProgressBar1.Value = 100 * L
End Sub第二:
在启动窗体的icon属性里改动

Answer 3

如何改变应用程序的图标为自己想要的图标?
如果是已经编译好的到网上找更换图标的软件iconmaster之类

Answer 4

1  问题一
   我对窗口属性里的ICON进行修改,选中自己的图片,但是提示" 无效的属性值"是什么意思
2  问题二
   我要修改父窗体的背景图片,图片充满整个窗口,而且随着窗口大小的改变,突变也跟着改变,如何实现

Answer 5

1  icon元素用来指定GIF格式或JPEG格式的小图标(16×16)或大图标(32×32)的文件名，并不是所有的图片都能放进去2  关于调整图片大小，看下这个帖子：    http://topic.csdn.net/u/20081212/18/d32c58f5-1f09-43b5-a9a6-f783dd734b2d.html
   先看一下。