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

萬(wàn)能百科  > 計(jì)算機(jī)?  > 

[填空題] 在窗體上畫(huà)一個(gè)名稱為CD1的通用對(duì)話框,一個(gè)名稱為T(mén)ext1的文本框和一個(gè)名稱為 C1的命令按鈕。程序運(yùn)行后,如果單擊C1命令按鈕,則彈出打開(kāi)文件對(duì)

2021-07-20   

[填空題] 在窗體上畫(huà)一個(gè)名稱為CD1的通用對(duì)話框,一個(gè)名稱為T(mén)ext1的文本框和一個(gè)名稱為 C1的命令按鈕。程序運(yùn)行后,如果單擊C1命令按鈕,則彈出打開(kāi)文件對(duì)話框,該對(duì)話框的標(biāo)題是“打開(kāi)文件”,此時(shí)如果單擊對(duì)話框上的“打開(kāi)”按鈕,則把選中的文件讀到內(nèi)存,并在Text1中顯示出來(lái)。下面給出了C1的Click事件過(guò)程。請(qǐng)?zhí)羁铡?Private Sub C1_ Click() Dim n As Long CD1 ______=“打開(kāi)文件” CD1. FileName = "" CD1 ______= “所有文件|*.* |文本文件|*.txt |Word 文檔|*.doc" CD1. FilterIndex = 2 CD1. If CD1. FileName <> " " ThenOpen ______ For ______ As #1n = LOF(1)Text1. Text = Input (n, #1)Close ______ End If End Sub

正確答案:

DialogTitle Filter Showopen FileName Input #1或1

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

標(biāo)簽

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