请问：想把程序运行次数输出到当前页面上该怎么做呢？

比如想把文本框中输入的数字不断的加1，然后输出到一个框中，框里的的数字实时更新

有点象记数器一样，如何实现呢？

我这样写，可是无法实现。。。。。。。。。。

Private Sub Command1_Click()
k = Text1.Text
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
k = k + 1
pricture1.Print k
End Sub

谁能告诉我个好办法？

感谢，成功通过，我定义的不是全局变量

还可以输出到什么里面呢？