- A.#2012—1—23#一#2011—2—3#
- B.year(#2011—2—3#)
- C.DateValue(”2011—2—3”)
- D.Len(“2011—2—3”)
- A.宏名
- B.操作
- C.条件
- D.备注
- A.自然连接
- B.交
- C.投影
- D.并
- A.Abs([成绩])
- B.Int([成绩])
- C.Spr([成绩])
- D.Sgn(E成绩])
- A.标题
- B.查询条件
- C.控件来源
- D.记录源
- A.文本
- B.超级链接
- C.备注
- D.OLE对象
下列程序的功能是:输出10到100之间的所有回文素数。所谓回文素数是指,如果一个数是素数,则该数反序后形成的数也是素数。例如,13是素数,13反序形成得到数为31,31也是素数,则称13为回文素数。
Private Sub Command1 2_Click( )
Dim k As Integer,m As Integer,n AsInteger
For k=10 T0 100
If prim(k)Then
m=__________
n=0
Do While m>0
N=n*10+Im Mod l0
M=m/10
Loop
If prim(n)Then
MsgBox k&“,”&n
End If
End If
Next k
End Sub
Public Function prim(n As Integer)As Boolean
Dim j As Integer
For j=2 To n/2
If n Mod J=0 Then
prim=__________
Exit Function
End If
Next j
prim=True
Exit Function
End Function
横线处应填写的内容是( )。
订单号:
遇到问题请联系在线客服
订单号:
遇到问题请联系在线客服