[問答題] 在名為Form1的窗體上建立一個(gè)文本框(名稱為Text1,MultiLine屬性為True,ScrolIBars屬性為2)和兩個(gè)命令按鈕(名稱分別為
[問答題] 在名為Form1的窗體上建立一個(gè)文本框(名稱為Text1,MultiLine屬性為True,ScrolIBars屬性為2)和兩個(gè)命令按鈕(名稱分別為Cmd1和Cmd2,標(biāo)題分別為Read和Save),如下圖所示。要求程序運(yùn)行后,如果單擊Read按鈕,則讀入in18.txt文件中的100個(gè)整數(shù),放入一個(gè)數(shù)組中(數(shù)組下界為1);如果單擊save按鈕,則挑出100個(gè)整數(shù)中的所有奇數(shù),在文本框Text1中顯示出來,并把所有奇數(shù)之和存入考生文件夾中的文件OUt18.txt中(在考生文件夾下有標(biāo)準(zhǔn)模塊mode1.bas,其中putdata過程可以把一個(gè)整型數(shù)存入OUt18.txt文件,考生可以把該模塊文件添加到自己的工程中)。注意:程序中對(duì)文件的操作統(tǒng)一使用相對(duì)路徑;文件必須存放在考生文件夾中,窗體文件名為sjt5.frm,工程文件名為sjt5.vbp;結(jié)果存入out18.txt文件,否則沒有成績(jī)。?
正確答案:第一步:新建一個(gè)名為Form1的窗體。第二步:?jiǎn)螕艄ぞ呦渲械腡extBox控件圖標(biāo),在窗體上拖拉出一個(gè)文本框,在屬性窗口設(shè)置該文本框名稱為Text1,將MultiLine屬性設(shè)置為True,ScrolIBars屬性設(shè)置為2。第三步:?jiǎn)螕艄ぞ呦渲械腃ommandButton控件圖標(biāo),在窗體上拖拉出兩個(gè)命令按鈕,在屬性窗口設(shè)置該命令按鈕名稱分別為Cmd1和Cmd2,Caption分別為Read和Save。第四步:打開代碼窗口輸入如下代碼:1 Private Sub Cmd1_Click()2 Open App
參考解析:本題主要考查數(shù)據(jù)的輸入輸出及Visual Basic的控制結(jié)構(gòu)及函數(shù)設(shè)計(jì)。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。