3. 综合应用（1小题，计30分）

　　注意：下面出现的“考生文件夹”均为%USER%

　　解题思路：

　　启动Visual Basic系统，打开考生文件夹下需编辑的工程文件sjt5.vbp，相应的窗体文件名为sjt5.frm。

　　由于所提供的窗体程序不完整，需添加事件过程。

　　单击“确定”按钮（即运行Click事件过程），在该Click事件过程中加入语句：

　　Private Sub Command1_Click()

　　n = 0

　　For i = 1 To 60

　　For j = 1 To 60

　　For k = 1 To 60

　　x = k * k

　　If (x = i * i + j * j) And j > i Then

　　Print i; j; k

　　n = n + 1

　　End If

　　Next k

　　Next j

　　Next i

　　Label1.Caption = n

　　save Label1

　　End Sub

　　参考文件：c:/wexam/26990001/hlpsys/参考答案/sjt5.vbp、sjt5.frm、sjt5.vbw、out5.dat

　　请把这些文件复制到c:/wexam/26990001中，然后打开sjt5.vbp文件并运行。