[填空題] 下面程序的功能是從輸入的一串?dāng)?shù)字中找出全部由該數(shù)字串中連續(xù)數(shù)字組成的素?cái)?shù)。Option ExplicitPrivate Sub CmdRun_Cli
2021-07-20
[填空題] 下面程序的功能是從輸入的一串?dāng)?shù)字中找出全部由該數(shù)字串中連續(xù)數(shù)字組成的素?cái)?shù)。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 j Next iEnd SubPrivate Function prime(___(20)___)As BooleanDim i As IntegerFor i=2 To Sqr(n) If n Mod i=0 Then Exit FunctionNext i___(21)___End Function
正確答案：Mid(s,i,j)N as LongPrime=true
詞條內(nèi)容僅供參考，如果您需要解決具體問(wèn)題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。