Question

VB6.0 设计一个带进度条的倒计时程序，以分输入，以秒显示，进度条随时间减少减少。 谢大神！

Answer 1

病情分析：
避免吃生冷食物，少吃白菜、白萝卜、绿茶等虚寒性的食物等。可以通过中医中药补肾温宫,补气养血治疗,效果很好的.温补性食物有羊肉,牛肉,鸡肉,狗肉,鹿茸等;益肾食品有腰果,芡实,山药熬粥,栗子炖肉,白果炖鸡,大骨头汤,核桃等.
指导意见：
建议你到正规医院进行相关检查,明确原因后对症治疗.平时多使用温性食物,如山药,红枣,姜等,少食寒凉.可以在医生指导下口服附子理中丸,艾附暖宫丸等每天晚上都坚持用热水泡脚半个小时左右，月经期用热水带敷肚子。

病情分析：
痛经是指经期前后或行经期间,出现下腹部痉挛性疼痛,并有全身不适,严重影响日常生活者.分原发性和继发性两种.经过详细妇科临床检查未能发现盆腔器官有明显异常者,称原发性痛经,也称功能性痛经.

指导意见：
继发性痛经则指生殖器官有明显病变者,如子宫内膜异位症,盆腔炎,肿瘤等.功能性痛经一般不需要治疗,可以服用红糖水缓解,建议去医院做详细的检查,明确引起痛经的原因

病情分析：
痛经是指经期前后或行经期间,出现下腹部痉挛性疼痛,并有全身不适,严重影响日常生活者.分原发性和继发性两种.经过详细妇科临床检查未能发现盆腔器官有明显异常者,称原发性痛经,也称功能性痛经.

指导意见：
继发性痛经则指生殖器官有明显病变者,如子宫内膜异位症,盆腔炎,肿瘤等.功能性痛经一般不需要治疗,可以服用红糖水缓解,建议去医院做详细的检查,明确引起痛经的原因、

Answer 2

弄一个图片框

追答

里面填充为绿色 ，边框类型是透明那种你自己找吧，宽度设为a，

for n=300to1
a=a-n
for y=1to 50000: next
上面这条是延时的
picture.width = a
next n

有疑问尽管问

最上面改成
for n= 300 to 1 step -1