填空题

某人编写如下函数来判断a是否为素数,若是,则函数返回True；否则返回False。 Function prime(a As Integer)As Boolean Dim k As Integer,isprime As Boolean If a<2 Then isprime=False E1se isprime=True k=2 Do While k
【参考答案】

D

<上一题 目录 下一题>
热门 试题

填空题
在名称为Form1的窗体上画一个文本框，其名称为Text1，在属性窗口中把该文本框的MultiLine属性设置为True，然后编写如下的事件过程：Private Sub Form_Click() 5Open d: test smtext1.txt For Input As #1Do While Not _________Line Input #1, aspect$whole$ = whole$ + aspect$ + Chr$(13) + Chr$(10) Loop Text1.Text = whole$Close #1 Open d: test smtext2.txt For Output As #1Print #1, _________Close #1 End Sub 上述程序的功能是，把磁盘文件smtext1.txt的内容读到内存并在文本框中显示出来，然后把 该文本框中的内容存入磁盘文件smtext2.txt。请填空。
单项选择题
单击命令按钮时，下列程序的执行结果是( )。Private Sub Command1_Click()Dim a As Integer，b As Integer，C As Integera=3b=4c=5Print SecProc(c，b，a)End SubFunction FirProc (x As Integer，y As Integer，z As Integer)FirProc=2 * x + y + 3 * z+2End FunctionFunction SecProc (x As Integer，y As hteger，z As Integer)SecProc=FirProc(z，x，y)+x+7End Function
A．13
B．16
C．36
D．33
相关试题