填空题

某人编写如下函数来判断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

<上一题目录下一题>

热门试题

填空题

设有如下程序：Private Sub Form_Click()Dim n As Integer, s As Integer n = 8s = 0 Do s = s + n n = n - 1Loop While n > 0Print sEnd Sub以上程序的功能是 _________。程序运行后，单击窗体，输出结果为 _________。

填空题

在窗体上加上一个文本控件PCSTextBox，画一个命令按钮，当单击命令按钮的时候将显示 “打开文件”对话框，设置该对话框只用于打开文本文件，然后在文本控件中显示打开的文件名。请填空。Private Sub Command1_Click()CommonDialog1．Filter=【】 CommonDialog1．ShowOpenPCSTextBox．Text=【】 End Sub

相关试题