有关vfp的，题目是一个红色小球在两条水平线之间来回弹跳。我想知道这个程序要怎么写。

显示全部楼层 · 2011-10-13 04:03:31

步骤最好详细点。

千问 · 2011-10-13 04:03:31

这个肯定要用到表单。先添加两根线（line控件）到表单中，line1在上，line2在下，然后添加一个圆形控件（shape控件，并将shape控件的curvature值设为99），然后再添加一个计时器（timer控件）到表单中，设置其Interval属性为200（表示每五分之一秒就刷新1次），最后添加代码，分别为：先在表单的init事件中加上：publicaa=5然后在计时器的timer事件中加上：thisform.shape1.top=thisform.shape1.top-aifthisform.shape1.top=thisform.line1.toporthisform.shape1.topthisform.shape1.height=thisform.line2.topa=-aendif