永发信息网

Private Sub Timer1_Timer()这段代码什么意思

答案:3  悬赏:40  手机版
解决时间 2021-11-29 18:28
Private Sub Timer1_Timer()这段代码什么意思
最佳答案
要创建一个控件数组,首先需要在窗体窗口将picturebox控件的index属性改为0,这样相当于已经有了控件picture1.(0) 需要加载的控件需要从index=1开始。另外一个问题是需要将代码中的n变量设为静态变量,这样每次调用timer事件时,n都保留了上一次执行timer事件时赋给n的值,即通过n=n+1赋给n的值。还有一个问题是,要给timer1控件的interval属性赋一个值,以便确定多长时间间隔后执行一次timer事件
Private Sub Timer1_Timer()
Static n As Integer
If n = 0 Then n = 1
Randomize
x = Int((Form1.Width - 300 + 1) * Rnd + 300)
y = Int((Form1.Height - 1800 + 1) * Rnd + 1000)
Load Picture1(n)
Picture1(n).Left = x
Picture1(n).Top = y
Picture1(n).Visible = True
n = n + 1
If n >= 200 Then
Timer1.Enabled = False
End If
End Sub
另外想问一下,x的表达式中,+1和+300分别表示什么意思
全部回答
Timer1.enable = False 改成: timer1.Enabled =False
在窗体内随机位置产生Picture1的图片控件数组,数量到200个时停止,有点错误,修改如下;

If n >= 200 Then '应该是n,不是nn
Timer1.Enabled = False 'Enabled错写成enable
''执行语句
End If
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
リプしイコンテナ 是什么意思?
谁用过海尔青春小蓝这个平板电脑?用着怎么样
质量相同的两金属块,在沸水中煮足够长时间,
永源350cc发动机质量
民勤特产专营店地址在哪,我要去那里办事,
2017年九月低保发了吗
1717gounet17游戏网是骗子,大家不要上啊,竟
工作时,情绪暴躁,容易对下属发火。做的不好
火是我放的,我为什么要救你
什么是RS485
目前上线运行的个人征信报告的发布时间是
萨尔图区大庆西门子地址在哪里啊
顺德容桂海尾桂龙工业区文建路都有什么厂
我有两手机
如何培育坚果种子,种植和管理
推荐资讯
上句有梦字,下句有楠字的新年祝福语
打印机oki310显示563:DRUM UNIT LIFE
她问我国外我去过那
5.商品X、Y价格与消费者收入以相同比例下降
我公司的对公账户因担保贷款冻结,拿到承兑汇
在深圳工作了6年,交了6年社保,那么现在准备
单选题机动灵活,能够“从门口到门口”的交通
理财产品年收益是百分之4天数是三十五天 五万
英国MMU大学电子工程专业留学值得吗?
跪求王者荣耀现版本明世隐登陆界面背景音乐—
如何做广东快乐10分数据分析的有效性 ?
浩姹厍捕10任务怎么样
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?