用VB6.0找出所有的勾股数

1、启动VB6.0，新建一个标准exe工程。

2、在窗体泰捕上绘制一个命令按耻耍钮，名称为Command1。

3、双击命令按钮进入代码窗口。

4、编写命令按钮的单击事件。（详细过趣爬获程请看代码中的绿色注释）

5、按F5运行测试。