题目内容

下列过程的功能是:将输入的整数分解为质数的乘积。例如,输入24,则输出2,2,2,3,,输入100,则输出2,2,5,5,。 Private Sub Command1_Click() x=Val(InputBox("请输入一个整数")) out$="" Y=2 Do While y<=x If x Mod y=0 Then out$=out$&Y&"," x=x/Y Else [] End If Loop MsgBox out$ End Sub 为实现指定功能,程序[]处应填写的语句是______。

A. y=y+1
B. x=x+1
C. x=x-y
D. y=x-y

查看答案
更多问题

函数Sgn(3.1415)的返回值是______。

A. -1
B. 0
C. 1
D. 3

在程序中要统计职称(duty)为“研究员”或“副研究员”的记录数量,使用IF语句进行判断并计数,下列选项中,错误的IF语句是______。

A. If InStr(duty, "研究员")>0 Then n=n+1
B. If InStr(duty="研究员" or duty="副研究员")>0 Then n=n+1
C. If Right(duty, 3)="研究员" Then n=n+1
D. If duty="研究员" Or duty="副研究员" Then n=n+1

若在被调用过程中改变形式参数变量的值,其结果同时也会影响到实参变量的值,这种参数传递方式是______。

A. ByVa
B. 按值传递
C. ByRef
D. 按形参传递

窗体上有命令按钮“command1”,Click事件过程如下:______。 Private Sub Command1_Click() Dim x As Integer x=InputBox("请输入x的值") Select Case x Case 1, 2, 4, 6 Debug. Print "A" Case 5, 7 To 9 Debug. Print "B" Case Is=10 Debug. Print "C" Case Else Debug. Print "D" End Select End Sub 打开窗体后,单击命令按钮,在弹出的输入框中输入11,则立即窗口上显示的内容是______。

A
B
C
D

答案查题题库