11.素數(shù)只能被 1 和它本身整除,不能被其他自然數(shù)整除。編寫 VB 程序實現(xiàn)如下功能:單擊“產(chǎn) 生奇數(shù)并判斷”按鈕 Command1,隨機產(chǎn)生一個三位正奇數(shù)顯示在文本框 Text1 中,并在文本框 Text2 中顯示其是否為素數(shù)的判斷結果。例如,當隨機產(chǎn)生的三位正奇數(shù)為 953 時,程序運行界面如圖 a 所示。 (1)在設計程序界面時,應使用第 11 題圖 b 所示“控件工具箱”中的
(填寫相應編號)添加文 本框 Text1。 (2)實現(xiàn)上述功能的 VB 程序如下,請在橫線處填寫合適的代碼。 Private Sub Command1Click( ?。?br />Dim n As Integer,i As Integer Dim flag As Boolean‘用于標記是否為素數(shù) Randomize n=①
‘n 為三位正奇數(shù) Text1.Text=Str(n):flag=True:i=3 Do While i<=n-1 And flag=True Ifn Mod i=0Then flag=False End If i=i+2 Loop If ②
Then Text2.Text=Str(n)+“是素數(shù)” Else Text2.Text=Str(n)+“不是素數(shù)” End If End Sub (3)以下選項中,與加框處表達式“n Mod i=0”等價的是