Public R As Variant

Private Sub Timer4_Timer()
    q = 1
    R = q
End Sub

Private Sub Form_Load()
label1.caption = R
end sub

这样执行后label里面不显示，只有将label1.caption=R移到timer事件里面才行，为什么？

执行的顺序问题。

针对你这二个过程，首先执行的是 Form_Load 过程，
这里，R没初始化，就是 0

然后定时器到时间到了后，然后就 执行 Timer4_Timer 过程。
这时，R 的值修改了，但你没显示，所以看不到结果。

只有将label1.caption=R移到timer事件里面才行
就是增加了显示部分，自然就看到了结果。