当前位置:IT认证>BASIC题库

问题:[填空题]

[填空题] 下面程序的功能是从输入的一串数字中找出全部由该数字串中连续数字组成的素数。Option ExplicitPrivate Sub CmdRun_Click() Dim n As Long,s As String Dim i As Integer,j As Integer S=Text1.Text For i=1 To Len(s)For j=1 To Len(s)-i+1 n=___(19)___ If prime(n) Then List1.AddItem CStr(n)Next

  

参考答案:

Mid(s,i,j)NasLongPrime=true

  参考解析

微信端