数据库表单设计

5．设计一个圆球跳动表单。要求：球的宽和高为40，球的填充颜色为咖啡色，表单的标题为“圆球跳动”，球每隔0.5秒在表单的上下边之间跳动。按开始按钮球跳动，按停止按钮球停止... 5．设计一个圆球跳动表单。要求：球的宽和高为40，球的填充颜色为咖啡色，表单的标题为“圆球跳动”，球每隔0.5秒在表单的上下边之间跳动。按开始按钮球跳动，按停止按钮球停止。设计界面和运行界面见下图所示。展开





 我来答

1个回答

#热议# 空调使用不当可能引发哪些疾病？

y799562009
推荐于2018-05-09 · 超过15用户采纳过TA的回答

知道答主

回答量：48

采纳率：0%

帮助的人：24.5万

我也去答题访问个人页

关注

展开全部

答案：（属性curvature设置为99  backcolor）
(1)命令按扭Command1的事件代码:
Thisform.Timer1.Enabled=.T.
 
(2)命令按扭Command2的事件代码:
Thisform.Timer1.Enabled=.F.
 
(3)    表单Form1的Init事件：
Thisform.Timer1.Interval=500
Thisform.Timer1.Enabled=.F.
 
(4)    计时器Timer1的Timer事件：
IF Thisform.Shape1.Top=0
  Thisform.Shape1.Top=Thisform.Height-Thisform.Shape1.Height
ELSE
  Thisform.Shape1.Top=0
ENDIF
Thisform.Refresh


本回答被提问者和网友采纳






已赞过已踩过<

你对这个回答的评价是？
评论收起