| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 933 人关注过本帖
标题:帮解释: 红色字体的意思
取消只看楼主 加入收藏
598156412
Rank: 1
等 级:新手上路
帖 子:43
专家分:0
注 册:2007-12-16
收藏
 问题点数:0 回复次数:2 
帮解释: 红色字体的意思
Private Sub Form_Click()
Timer1.Enabled = True
End Sub

Private Sub Form_Load()
Image1.Visible = False                  '图象框不可见
Timer1.Enabled = False                  '计时器禁用
End Sub

Private Sub Timer1_Timer()
If Shape1.Height > 50 Then
Shape1.Top = Shape1.Top - 100                '小球向上移动100
Shape1.Left = Shape1.Left + 200              '小球向右移动200
Shape1.Height = Shape1.Height - 50           '小球的长度减少50
Shape1.Width = Shape1.Width - 50             '小球的宽度减少50
Line1.X1 = Line1.X1 + 200                    '托板向右移动200
Line1.X2 = Line1.X2 + 200
Else
Timer1.Enabled = False                       '计时器停止工作
Shape1.Visible = False                       '小球隐藏
Image1.Visible = True                        '显示图像,图像的位置是当前小球的位置
Image1.Top = Image1.Top - Image1.Height / 2
Image1.Left = Image1.Left - Image1.Width / 2
End If
End Sub
帮解释一下红色字体的意思.
搜索更多相关主题的帖子: 字体 解释 
2008-03-27 22:08
598156412
Rank: 1
等 级:新手上路
帖 子:43
专家分:0
注 册:2007-12-16
收藏
得分:0 
我应该问Line1.X1 中,为什么用X1.
2008-03-28 13:01
598156412
Rank: 1
等 级:新手上路
帖 子:43
专家分:0
注 册:2007-12-16
收藏
得分:0 
[bo]以下是引用 [un]星天紫龙[/un] 在 2008-3-28 22:52 的发言:[/bo]

就是画的那条线的第一端点的横坐标啦...

谢谢~~~
2008-03-31 22:30
快速回复:帮解释: 红色字体的意思
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.012089 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved