black

登录

填空题

以下程序的功能是在立即窗口中输出100~200之间所有的素数,并统计输出素数的个数。请在程序空白处填入适当的语句,使程序可以完成指定的功能。 Private Sub Command2_Click() Dim i%,j%,k%,t% ’t为统计素数的个数 Dim b AS Boolean For i=100 T0 200 b=True k=2 J=Int(Sqr(i)) Do While k<=j And b If i Mod k=0 Then b= (12) End If k= (13) Loop If b=True Then t=t+1 Debug.Print i End If Next i Debug.Print"t=";t End Sub

【参考答案】

(12) False (13) k+1

相关考题

填空题 下列程序的功能是找出被5和7除余数为1的最小的5个正整数。请在程序空白处填入适当的语句,使程序可以完成指定的功能。Private Sub Form_Click()Dim Ncount%,n%Ncount=0n=0Don=n+1If______ThenDebug.Print nNcount=Ncount+1End IfLoop Until Ncont=5End Sub

填空题 在窗体文本框Text 1中输入“456AbC”后,立即窗口上输出的结果是______。Private Sub Text1_KeyPress(KeyAscii As Integer)Select Case Key KeyAsciiCase 97 To 122Debug.Print Ucase(Chr(KeyAscii));Case 65 To 90Debug.Print Lcase(Chr(KeyAscii));Case 48 To 57Debug.Print Chr(KeyAscii);Case ElseKeyrAscii=0End SelectEnd Sub

填空题 使用向导创建数据访问页时,在确定分组级别步骤中最多可设置______个分组字段。

All Rights Reserved 版权所有©PP题库网库(pptiku.com)

备案号:湘ICP备14005140号-5

经营许可证号:湘B2-20140064