[問答題] 在考生文件夾下有工程文件djks030.vbp及窗體文件djks030.frm。根據(jù)下文的描述，編寫相應(yīng)的程序。存盤時(shí)不得改變文件名和文件夾。本題描述如下：在窗體上有一個(gè)名為Image1的圖像框，要求程序運(yùn)行后，每用鼠標(biāo)左鍵點(diǎn)擊圖像框一次，則圖像框的高與寬都增加300；每用鼠標(biāo)右鍵點(diǎn)擊圖像框一次，圖像框的高與寬都減小300。窗體的高與寬為3500，圖像框最大化時(shí)不允許超過窗體的大小，最小化時(shí)圖像框的高與寬不小于500(高與寬的單位為twip)。程序運(yùn)行時(shí)的窗口界面如下圖所示。

第一步：啟動(dòng)VB，打開考生文件夾下的工程文件sjtC.vbp。第二步：雙擊窗體中的任何位置，進(jìn)入代碼編輯窗口，填寫代碼如下：A Private Sub ImageA_MouseUp(Button As Integer, Shift As Integer, X AsSingle，Y As Single)B If Button=A ThenC If ImageA.Height＜CE00 Or ImageA.Width＜CE00 ThenD ImageA.Height=ImageA.Height+C00E Im

根據(jù)題意，本題可以使用MouseUp事件也可以使用MouseDown事件?！癇utton=1”表示按下鼠標(biāo)左鍵，“Buttor=2”表示按下鼠標(biāo)右鍵?！癐mage1.Height＜3500 Or Image1.Width＜3500”表示條件Image1.Height＜3500與條件Image1.Width＜3500只要任一為True時(shí)就執(zhí)行Then后面的語句。下面的程序代碼與此類似。