影音先锋AⅤ天堂资源站,13小箩利洗澡无码视频APP,午夜理论片日本中文在线,最近新免费韩国日本电影

萬能百科  > 計算機?  > 

[問答題] 注意:下面出現(xiàn)的“考生文件夾”均為c:wexam25160001。 (1)在名稱為Form1的窗體上建立兩個主菜單,其標(biāo)題分別為“文件”和“幫助”,

2021-07-20   

[問答題] 注意:下面出現(xiàn)的“考生文件夾”均為c:wexam25160001。 (1)在名稱為Form1的窗體上建立兩個主菜單,其標(biāo)題分別為“文件”和“幫助”,名稱分別為vbFile和vbHelp,在“文件”菜單下有3個子菜單項,標(biāo)題分別為“新建”、“打開”和“存盤”,名稱分別為 vbNew、vbOpen和vbSave。要求程序運行后,如果選中“文件”下的某個菜單項,則通過MsgBox對話框顯示該菜單項的標(biāo)題,如圖3-3所示。 注意:保存時必須存放在考生文件夾下,窗體文件名為sjt3.frm,工程文件名為sjt3.vbp。 (2)在窗體上建立一個名稱為Text1的文本框,再建立一個名稱為Cmd1,標(biāo)題為“計算”的命令按鈕,如圖3-4所示。要求程序運行后,單擊命令按鈕,將計算100-200之間所有素數(shù)之和,在文本框中顯示結(jié)果,同時把結(jié)果存入文件out.txt中。 (在考生文件夾中有標(biāo)準(zhǔn)模塊mode.bas,其中的putdata過程可以把結(jié)果存入文件,而isprime函數(shù)可以判斷整數(shù)x是否為素數(shù),如果是素數(shù),則函數(shù)返回True,否則返回 False,考生可以把該模塊文件添加到自己的工程中。) 注意:保存時必須存放在考生文件夾下,窗體文件名為sjt4.frm,工程文件名為sjt4.vbp,結(jié)果存入out.txt文件。

正確答案:

第二步:編寫程序代碼。 參考代碼: Private Sub vbNew_Click() MsgBox“新建”,vbOKOnly End Sub Private Sub vbOpen_Click() MsgBox“打開”,vbOKOnly End Sub Private Sub vbSave_Click() MsgBox“存盤”,vbOKOnly End Sub 第三步:調(diào)試并運行程序。 第四步:按題目要求存盤。 (2)在窗體上建立好控件后,先設(shè)置控件的屬性值,再編寫事件過程。 文本框中顯示的內(nèi)

參考解析:

在Visual Basic中,菜單項通過菜單編輯器來建立;選擇菜單則是觸發(fā)其Click事件。 MsgBox函數(shù)在對話框中顯示消息,等待用戶單擊按鈕,并返回1個Integer告訴用戶單擊哪一個按鈕。 語法:MsgBox(prompt[,buttons][,title][,helpfile,context]) MsgBox函數(shù)的語法具有以下幾個命名參數(shù): Prompt必需的。字符串表達(dá)式,作為顯示在對話框中的消息。 Buttons可選的。數(shù)值表達(dá)式是值的總和,指定顯示按鈕的數(shù)目及形式。 Title可選的。在對話框標(biāo)題欄中顯示的字符串表達(dá)式。如果省略title,則將應(yīng)用程序名放在標(biāo)題欄中。 Helpfile可選的。字符串表達(dá)式,識別用來向?qū)υ捒蛱峁┥舷挛南嚓P(guān)幫助的幫助文件。 Context可選的。數(shù)值表達(dá)式,由幫助文件的作者指定給適當(dāng)?shù)膸椭黝}的幫助上下文編號。解題步驟: 第一步:建立菜單項。程序中用到的菜單項及其屬性見表3-2。

詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。

標(biāo)簽

<蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <文本链> <文本链> <文本链> <文本链> <文本链> <文本链>