Question

vb:编一循环程序，用LINE方法，在屏幕上随机产生20条长度、颜色、宽度各异的直线。 谢谢了！1

Answer 1

在屏幕上，指的是在本程序窗体上的话就是
dim
i
as
long
for
i
=
1
to
2
me.line
(1000
*
rnd,
1000
*
rnd)
-
(1000
*
rnd,
1000
*
rnd),
&hffffff
*
rnd
next
若在屏幕上指的是在整个电脑的屏幕（可以跨出本窗体）的话就要调用api
先获得句柄为0（即桌面）的图形设备，然后在图形设备上画线。这个实现起来比上个要困难的多。
要考虑的因素比较多。