Private Sub Timer1_Timer()这段代码什么意思
答案:3 悬赏:40 手机版
解决时间 2021-11-29 18:28
- 提问者网友：人生佛魔见
- 2021-11-29 14:55
Private Sub Timer1_Timer()这段代码什么意思
最佳答案
- 五星知识达人网友：舊物识亽
- 2021-11-29 16:26
要创建一个控件数组，首先需要在窗体窗口将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分别表示什么意思
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分别表示什么意思
全部回答
- 1楼网友：毛毛
- 2021-11-29 18:48
Timer1.enable = False 改成: timer1.Enabled =False
- 2楼网友：渊鱼
- 2021-11-29 17:38
在窗体内随机位置产生Picture1的图片控件数组，数量到200个时停止，有点错误，修改如下；
If n >= 200 Then '应该是n，不是nn
Timer1.Enabled = False 'Enabled错写成enable
''执行语句
End If
If n >= 200 Then '应该是n，不是nn
Timer1.Enabled = False 'Enabled错写成enable
''执行语句
End If
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯