【正确答案】正确答案： 【操作步骤】 步骤l：打开本题对应工程文件sjt5．vbp。 步骤2：双击窗体Forml上的“计算”按钮，打开代码编辑窗口，在其Click事件过程中输入如下代码： 参考代码： PriVate Sub Cormmand2_Click() a％=CInt(Textl．Text) Do a％=a％+l Loop Until isprime(a％) Text2．Text=a％ End Sub 步骤3：编写判断素数的函数过程isprime，参考代码为： Functioff isprime(a As Ingeger) Dim flag As B00lean k％=2 flag=True ffhile k％＜=Int(a／2) And flag If a／k％=Int(a／k％) Then flag=False End If k％=k％+1 Wend isprime=flag End Function 步骤4：按＜F5＞键运行程序，先单击“读数”按钮，接着单击“计算”按钮，最后单击“存盘”按钮。 步骤5：按要求将文件保存至考生文件夹中。

【答案解析】解析： ①过程是构成程序的一个模块，常用来完成一个相对独立的功能。Function过程也叫函数过程，一般用于调用后不仅要执行一组代码完成相应操作，还需返回一个有用值的情况。Function函数的参数有两种传递方式：按值传递(Byval)和按址传递(Byref)，默认为按址传递。调用Function函数常放在赋值符右端。 ②For循环通常用于知道次数的循环，在不知道明确的循环次数的情况下，我们可以用条件来控制循环，While循环和Do循环就是用条件来控制的循环。 ③素数的判断准则就是看该数除了l和其本身外是否别无其他约数。 程序设计思路：要找出大于给定数的最小素数，可以首先将给定数加1赋值给变量a，通过调用函数isprime(a)，以其返回值不是素数作为Do循环语句的循环条件，在循环体中加入语句：a=a+l实现每执行循环体一次变量a的值加1，当循环结束时a的值即为所求。