三、綜合應用
    在考生目錄下有一個工程文件djks002.vbp，其窗體上有一個文本框，名稱為Text1；還有一個命令按鈕，名稱為C1，標題為“計算”，如圖所示。有一個函數(shù)isprime()可以在程序中直接調用，其功能是判斷參數(shù)a是否為素數(shù)，如果是素數(shù)，則返回True，否則返回False。請編寫適當?shù)氖录^程，使得在運行時，單擊“計算”按鈕，則找出小于2000的最大素數(shù)，并顯示在Text1中。
    注意：
    考生不得修改isprime()函數(shù)過程和控件的屬性。
    程序代碼如下：

【答案】
Private Sub C1_Click()
    Static a As Integer
    Dim i As Integer
    For i = 1 To 2000
      Call isprime(i)
      If isprime(i) = True Then
         a = i
      End If
    Next i
    Text1.Text = a
End Sub
【解析】 
    在窗體上雙擊C1，進入程序代碼編寫窗口。根據(jù)題意，主要是使2000以內的最大素數(shù)顯示在文本框中。故可以使用For循環(huán)語句，令變量i在1～2000之間取值，逐一作為實參調用isprime()函數(shù)過程，當遇到isprime()函數(shù)過程返回True值時（此時i值為素數(shù)），把i的值賦給a。這樣便可求出2000以內的最大素數(shù)。