编写一个VB循环程序用line方法或line控件对象在屏幕上随机产生20条长度、颜色、宽度各异的直线段

[复制链接]
查看11 | 回复1 | 2011-6-12 19:13:54 | 显示全部楼层 |阅读模式
在屏幕上,指的是在本程序窗体上的话就是 dim i as longfor i = 1 to 2
me.line (1000 * rnd, 1000 * rnd) - (1000 * rnd, 1000 * rnd), &Hffffff * rndnext若在屏幕上指的是在整个电脑的屏幕(可以跨出本窗体)的话就要调用API先获得句柄为0(即桌面)的图形设备,然后在图形设备上画线。这个实现起来比上个要困难的多。要考虑的因素比较多。...
回复

使用道具 举报

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

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行