请大家棒棒看看程序到底是哪里的问题!
--------------------编程问答-------------------- 我觉得 主要问题 就在 Private Sub Timer1_Timer() 时间按钮和 Private Sub Command1_Click()命令按钮 里面······希望各位高手帮帮忙 给点思路 谢谢 !!!--------------------编程问答-------------------- 当选中option时,在option的事件中修改Timer1的定时长度,即:
如:
Option1:Timer.Interval=500
Option2:Timer.Interval=300
Option3:Timer.Interval=100
等。 --------------------编程问答-------------------- 问题是你这样跳过很多东西,不是学习正道。一点点学过来,自己能写程序再说。总拿别人写的改,那除非你已经比别人学得更好才行。 --------------------编程问答-------------------- Private Sub Option1_Click()
Timer1.Interval = 500
End Sub
Private Sub Option2_Click()
Timer1.Interval = 300
End Sub
Private Sub Option3_Click()
Timer1.Interval = 100
End Sub
是这样子写的么???
···但是好像 还是不对啊····· --------------------编程问答--------------------
我知道 我只是想练习练习 毕竟多看看别人的代码 对自己也是有帮助的 虽然我还达不到立刻就能把这个程序写出来 但是大致的意思 我都理解的差不多了 还有我只是根据我的理解去给他加点功能 只是按自己的思路给他加个判断 如果选中 初级 也就是option1 他的速度是50 如果选中 中级 也就是option2 他的速度是150 从理论上来说 我这种判断应该是对 就是运行的时候 出现了一些问题 只是不知道出在了哪里 希望大家帮忙分析下 一起学习一起探讨嘛····· --------------------编程问答-------------------- 人要是不逼自己一把,就永远不知道自己的能力有多大! --------------------编程问答--------------------
那里不对?什么现象? --------------------编程问答-------------------- 在Timer1_Timer中应该加上DoEvents --------------------编程问答--------------------
把事件换换⋯⋯
--非要采用这种方式啊? --------------------编程问答--------------------
这样写 和我前面的一样 还是 不管选择 初级 还是中级 还是高级 他们向下移动的速度是一样 没有改变·····
--------------------编程问答-------------------- ··················求 高手 讲解下 把 谢谢了···························
····· --------------------编程问答-------------------- 你会哪步,不会哪步啊 --------------------编程问答--------------------
就是 里面的一个 时间控件 里面的IF 判断 If Option1.Value = True Then '如果选中初级
Label1.Top = Label1.Top + 50 '每过一段时间间隔,字符向下移动50
ElseIf Option2.Value = True Then '如果选中中级
Label1.Top = Label1.Top + 150 '每过一段时间间隔,字符向下移动150
ElseIf Option3.Value = True Then '如果选中高级
Label1.Top = Label1.Top + 300 '每过一段时间间隔,字符向下移动300
End If
这一段是我写的 但是运行的时候 不管我选择初级也好 还是高级也好 他的显示的速度还是 一样的······我想问一下 怎么才能让他实现 不一样的速度
补充:VB , 数据库(包含打印,安装,报表)