怎样在form中随机位置print星星

[复制链接]
查看11 | 回复1 | 2009-7-4 13:32:13 | 显示全部楼层 |阅读模式
这是VB的MSDN里的示例Sub Form_Click () Dim CX, CY, Msg, XPos, YPos ' Declare variables. ScaleMode = 3 ' 设置 ScaleMode 为像素。 DrawWidth = 5 ' 设置 DrawWidth. ForeColor = QBColor(4) ' 设置前景为红色。 FontSize = 24 ' 设置点的大小。 CX = ScaleWidth / 2 ' 得到水平中点。 CY = ScaleHeight / 2 ' 得到垂直中点。 Cls ' 清窗体。 ...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行