[多項(xiàng)選擇題] 注意：下面出現(xiàn)的“考生文件夾”均為C：wexam25160002。

(1) 在考生文件夾下有一個(gè)工程文件sjt3.vbp，相應(yīng)的窗體文件為sjt3.frm。其功能是產(chǎn)生30個(gè)0～1000的隨機(jī)整數(shù)，放入一個(gè)數(shù)組中，然后輸出其中的最大值。程序運(yùn)行后，單擊命令按鈕(名稱為 Command1，標(biāo)題為“輸出最大值”，如圖24-4所示)，即可求出其最大值，并在窗體上顯示出來。這個(gè)程序不完整，請(qǐng)把它補(bǔ)充完整，并能正確運(yùn)行。

要求：去掉程序中的注釋符，把程序中的改為正確的內(nèi)容，使其實(shí)現(xiàn)上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盤。

(2) 在考生文件夾下有一個(gè)工程文件sjt4.vbp，相應(yīng)的窗體文件為sjt4.frm，在窗體上有一個(gè)命令按鈕和一個(gè)文本框。程序運(yùn)行后，單擊命令按鈕，即可計(jì)算出0～1000范圍內(nèi)能被5整除或能被7整除的整數(shù)的個(gè)數(shù)，并在文本框中顯示出來。在窗體的代碼窗口中，已給出了部分程序，其中計(jì)算能被5整除或能被 7整除的整數(shù)的個(gè)數(shù)的操作在通用過程Fun中實(shí)現(xiàn)，請(qǐng)編寫該過程的代碼。

要求：請(qǐng)勿改動(dòng)程序中的任何內(nèi)容，只在Function Fun()和End Function之間填入你編寫的若干語句。最后把修改后的文件按原文件名存盤。

首先在循環(huán)語句中對(duì)數(shù)組賦值，使用Rnd函數(shù)和Int函數(shù)生成0～A000隨機(jī)整數(shù)。在數(shù)組求最大值中，定義一個(gè)變量，用來存放數(shù)組中的最大值，在數(shù)組比較開始前，對(duì)變量進(jìn)行賦初始值。在比較中，使用循環(huán)讓變量和數(shù)組中的每個(gè)元素進(jìn)行逐個(gè)比較，每次比較后變量中保存兩個(gè)數(shù)中最大的數(shù)，循環(huán)結(jié)束后，變量中存放的數(shù)即為最大值。 Int函數(shù)是將參數(shù)轉(zhuǎn)換成整數(shù)。 Rnd函數(shù)返回小于A，但大于或等于0的值，其語法格式為： Rnd[(number)] 可選的number參數(shù)是Single或任何有效的數(shù)值表達(dá)式。 numbe