参考答案：

第一步：启动VB，打开考生文件夹下的工程文件sjt3.vbp。

第二步：双击窗体中的任何位置，进入代码编辑窗口，填写代码如下：

1 Private Sub Image1_MouseUp(Button As Integer，Shift As Integer，X As Single，Y As Single)

2 If Button=1 Then

3 If Image1.Height＜3500 Or Image1.Width＜3500 Then

4 Image1.Height=Image1.Height+300

5 Image1.Width=Image1.Width+300

6 End If

7 End If

8 If Button=2 Then

9 If Image1.Height＞500 Or Image1.Width＞500 Then

10 Image1.Height=Image1.Height-300

11 Image1.Width=Image1 Width-300

12 End If

13 End If

14 End Sub

第三步：填写完毕，调试成功后，以原文件名保存。

解析：

根据题意，本题可以使用MouseUp事件也可以使用MouseDown事件。“Button=1”表示按下鼠标左键，“Button=2”表示按下鼠标右键。“Image1.Height＜3500 Or Image1.Width＜3500”表示条件Image1.Height＜3500与条件Image1.Width＜3500只要任一为True时就执行Then后面的语句。下面的程序代码与此类似。