填空题
下列程序的功能是找出被5和7除余数为1的最小的5个正整数。请在程序空白处填入适当的语句,使程序可以完成指定的功能。 Private Sub Form_Click() Dim Ncount%,n% Ncount=0 n=0 Do n=n+1 If______Then Debug.Print n Ncount=Ncount+1 End If Loop Until Ncont=5 End Sub
【参考答案】
n Mod 5=1 And n Mod 7=1
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
在窗体文本框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
点击查看答案&解析
填空题
使用向导创建数据访问页时,在确定分组级别步骤中最多可设置______个分组字段。
点击查看答案&解析
相关试题
在窗体上有一个命令按钮Command1,编写事...
数据库中有工资表,包括“姓名”、“工资”...
以下程序的功能是在立即窗口中输出100~...