假设画圆的函数是round(坐标x,坐标y，半径）那么同心圆只要dim r,x,yx=**'(自己取)y=** '同上for r = 100 to 1000 step 100 '第一个数字是最小半径，第二个是最大，step就是每次跳多少（现在状态是每隔100画一个)round(x,y,r)next r倒计时 就要用到timer控件参数如下：i开头的那个是周期参数（英文背不出蛮长的）单位是毫秒,1000为一秒，enable为false（这个参数就是 timer是否工作 当然开始时别工作加载后双击，就进入代码段 输入t=t-1label1.caption=tif t<=0 then msgbox "时...
|
