Question

vb中,我 需要定义与调用一个画直线的 子函数.

定义与调用的语句怎么写,本人刚学vb每几天, 尽量详细点,谢谢,谢谢.
假设 这个子函数要做的是line(A1,A2)-(A3,A4)
line(A3,A4)-(A5,A6)
......
line(A97,A98)-(A99,A100)
我想再补充点,我输入的是 三个数,分别为长,宽,高
A1,A2,A3...A100 这些数都是可以从长,宽,高中推算得到的

Answer 1

窗口 form直接调用

sub drawLine(byval a1 as integer, byval a2 as integer, byval a3 as integer, byval a4 as integer)

call line(A1,A2)-(A3,A4)
end sub