自制一分钟计时器
@季利4709：怎样做一个简易的一分钟计时器 -
左政17267306880…… 方法如下: 按塑料杯的大小把塑料瓶的上部分剪掉,中间挖一个能放入塑料杯的大孔.塑料杯底部用剪刀尖钻一个小孔,将吸管斜剪下一段,插入小孔.铁皮弯成小夹子夹住吸管.把所料杯放入所料瓶口,塑料瓶中放入清水并及时,1分钟在下...
@季利4709：怎样制作一个一分钟计时器(五年级的科学)?
左政17267306880…… 重锤 加 悬挂线 加 变速齿轮组 加 阻尼器 阻尼器可以用风扇或者螺旋桨 或者干脆把变速齿轮组整个泡在油里当阻尼器 在变速齿轮组上找个减速轮,刻上两个突起,拨动一个铜簧片 实在懒得动手的话,到大街上买个便宜的机械音乐盒(许多儿童玩具里面都有,要持续时间能达到一分钟的那种,)拆了,找距离一分钟的两个音,把中间的声音点都拆了(磨掉突起或拆掉簧片)
@季利4709：如何做一分钟计时器 -
左政17267306880…… 代码如下: Dim time As Integer, mm As Integer, ss As Integer Private Sub command1_click() time = 60 Command1.Enabled = False mm = time \ 60 ss = time Mod 60 Label1.Caption = Str(mm) & ＂分＂ & Str(ss) & ＂秒＂ Timer1.Enabled = ...
@季利4709：现实生活中分钟计时器怎么做 - 作业帮
左政17267306880…… [答案] Public Declare Function RegQueryValueExString Lib ＂advapi32.dll＂ Alias ＂RegQueryValueExA＂ (ByVal hKey As Long,ByVal lpValueName As String,ByVal lpReserved As Long,lpType As Long,ByVal lpData As String,lpcbData As Long) As Long ...
@季利4709：如何制作简易钟摆 -
左政17267306880…… 重锤 加 悬挂线 加 变速齿轮组 加 阻尼器 阻尼器可以用风扇或者螺旋桨 或者干脆把变速齿轮组整个泡在油里当阻尼器 在变速齿轮组上找个减速轮,刻上两个突起,拨动一个铜簧片 或者 1.找一个塑料瓶子,从中间剪断. 2.在瓶盖上扎个眼儿,再把上半部分倒过来放在下半部分上. 3.往上半部分倒一定量的水. 4.让水流一分钟,在水面做个记号. 5.以后再计时把下面的水倒掉,上面再倒一定量的水就行了.
@季利4709：一分钟计时器的做法过程视频 -
左政17267306880…… Private Sub Command1_Click() Timer1.Enabled = Not Timer1.Enabled End Sub Private Sub Form_Load() Timer1.Enabled = False Timer1.Interval = 60000 End Sub Private Sub Timer1_Timer() MsgBox ＂1分钟到＂ End Sub
@季利4709：怎样制作简易机械定时器? -
左政17267306880…… 如果你有风扇的的定时器的话,你可以改装,让它的速度再慢到3、4倍就可以,你加装齿轮让它的速度变慢点(自己思考、实践,有挑战性)----愿你好运
@季利4709：设计一个一分钟的计时器,可以制成什么 -
左政17267306880…… 百米的计时器
@季利4709：我想制作一个计时器,要微妙的哦~易语言的啊!怎么编写代码啊? -
左政17267306880…… 设置几个画板,分别是分钟两个,秒两个,毫秒3个,面板上放上一个时钟,时钟的时钟周期为1,周期事件中设为毫秒的图0.01秒增加一,当后面的增加到9时,前一位数字增加一. 请采纳,谢谢!
@季利4709：怎样自制简单的定时器?不是神马定时器软件!是能连在插线板上定时的
左政17267306880…… 三五块钱买的小闹钟,拆开看看,里面有一个触点. 闹钟定时时间到后此触点断开,用这个触点控制一个继电器,继电器控制插线板. 触点处的线路很细的,小心一点弄.
左政17267306880…… 方法如下: 按塑料杯的大小把塑料瓶的上部分剪掉,中间挖一个能放入塑料杯的大孔.塑料杯底部用剪刀尖钻一个小孔,将吸管斜剪下一段,插入小孔.铁皮弯成小夹子夹住吸管.把所料杯放入所料瓶口,塑料瓶中放入清水并及时,1分钟在下...
@季利4709：怎样制作一个一分钟计时器(五年级的科学)?
左政17267306880…… 重锤 加 悬挂线 加 变速齿轮组 加 阻尼器 阻尼器可以用风扇或者螺旋桨 或者干脆把变速齿轮组整个泡在油里当阻尼器 在变速齿轮组上找个减速轮,刻上两个突起,拨动一个铜簧片 实在懒得动手的话,到大街上买个便宜的机械音乐盒(许多儿童玩具里面都有,要持续时间能达到一分钟的那种,)拆了,找距离一分钟的两个音,把中间的声音点都拆了(磨掉突起或拆掉簧片)
@季利4709：如何做一分钟计时器 -
左政17267306880…… 代码如下: Dim time As Integer, mm As Integer, ss As Integer Private Sub command1_click() time = 60 Command1.Enabled = False mm = time \ 60 ss = time Mod 60 Label1.Caption = Str(mm) & ＂分＂ & Str(ss) & ＂秒＂ Timer1.Enabled = ...
@季利4709：现实生活中分钟计时器怎么做 - 作业帮
左政17267306880…… [答案] Public Declare Function RegQueryValueExString Lib ＂advapi32.dll＂ Alias ＂RegQueryValueExA＂ (ByVal hKey As Long,ByVal lpValueName As String,ByVal lpReserved As Long,lpType As Long,ByVal lpData As String,lpcbData As Long) As Long ...
@季利4709：如何制作简易钟摆 -
左政17267306880…… 重锤 加 悬挂线 加 变速齿轮组 加 阻尼器 阻尼器可以用风扇或者螺旋桨 或者干脆把变速齿轮组整个泡在油里当阻尼器 在变速齿轮组上找个减速轮,刻上两个突起,拨动一个铜簧片 或者 1.找一个塑料瓶子,从中间剪断. 2.在瓶盖上扎个眼儿,再把上半部分倒过来放在下半部分上. 3.往上半部分倒一定量的水. 4.让水流一分钟,在水面做个记号. 5.以后再计时把下面的水倒掉,上面再倒一定量的水就行了.
@季利4709：一分钟计时器的做法过程视频 -
左政17267306880…… Private Sub Command1_Click() Timer1.Enabled = Not Timer1.Enabled End Sub Private Sub Form_Load() Timer1.Enabled = False Timer1.Interval = 60000 End Sub Private Sub Timer1_Timer() MsgBox ＂1分钟到＂ End Sub
@季利4709：怎样制作简易机械定时器? -
左政17267306880…… 如果你有风扇的的定时器的话,你可以改装,让它的速度再慢到3、4倍就可以,你加装齿轮让它的速度变慢点(自己思考、实践,有挑战性)----愿你好运
@季利4709：设计一个一分钟的计时器,可以制成什么 -
左政17267306880…… 百米的计时器
@季利4709：我想制作一个计时器,要微妙的哦~易语言的啊!怎么编写代码啊? -
左政17267306880…… 设置几个画板,分别是分钟两个,秒两个,毫秒3个,面板上放上一个时钟,时钟的时钟周期为1,周期事件中设为毫秒的图0.01秒增加一,当后面的增加到9时,前一位数字增加一. 请采纳,谢谢!
@季利4709：怎样自制简单的定时器?不是神马定时器软件!是能连在插线板上定时的
左政17267306880…… 三五块钱买的小闹钟,拆开看看,里面有一个触点. 闹钟定时时间到后此触点断开,用这个触点控制一个继电器,继电器控制插线板. 触点处的线路很细的,小心一点弄.
