11.素?cái)?shù)只能被 1 和它本身整除,不能被其他自然數(shù)整除。編寫 VB 程序?qū)崿F(xiàn)如下功能:單擊“產(chǎn) 生奇數(shù)并判斷”按鈕 Command1,隨機(jī)產(chǎn)生一個(gè)三位正奇數(shù)顯示在文本框 Text1 中,并在文本框 Text2 中顯示其是否為素?cái)?shù)的判斷結(jié)果。例如,當(dāng)隨機(jī)產(chǎn)生的三位正奇數(shù)為 953 時(shí),程序運(yùn)行界面如圖 a 所示。 (1)在設(shè)計(jì)程序界面時(shí),應(yīng)使用第 11 題圖 b 所示“控件工具箱”中的
(填寫相應(yīng)編號(hào))添加文 本框 Text1。 (2)實(shí)現(xiàn)上述功能的 VB 程序如下,請?jiān)跈M線處填寫合適的代碼。 Private Sub Command1Click( ) Dim n As Integer,i As Integer Dim flag As Boolean‘用于標(biāo)記是否為素?cái)?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)+“是素?cái)?shù)” Else Text2.Text=Str(n)+“不是素?cái)?shù)” End If End Sub (3)以下選項(xiàng)中,與加框處表達(dá)式“n Mod i=0”等價(jià)的是