VB程式設計教程 第四版 龔沛曾 實驗8 3

2021-09-21 17:32:06 字數 1085 閱讀 3318

實驗8-3

vb程式題:設計乙個如圖2.8.4所示的應用程式,要求如下:

(1.)單擊「開啟檔案」按鈕彈出乙個通用對話方塊,選擇檔案後顯示在文字框中

(2).單擊「儲存檔案」按鈕後彈出通用對話方塊,確定檔名後儲存。

(3) 單擊「查詢下乙個」按鈕後在文字檔案中查詢單詞「vb」,找到後以高亮度顯示。

private sub command1_click()

commondialog1.action = 1

text1.text = ""

open commondialog1.filename for input as #1

do while not eof(1)

line input #1, inputdata

text1.text = text1.text & inputdata & vbcrlf

loop

close #1

end sub

private sub command2_click()

commondialog1.filename = "default.txt"

commondialog1.defaultext = "txt"

commondialog1.action = 2

open commondialog1.filename for output as #1

print #1, text1.text

close #1

end sub

private sub command3_click()

static j%

text1.setfocus

j = instr(j + 1, text1, "vb")

if j > 0 then

text1.selstart = j - 1

text1.sellength = 2

j = j + 1

else:

msgbox "找不到!"

end if

end sub

private sub command4_click()

endend sub

VB程式設計教程 第四版 龔沛曾 實驗8 5

實驗8 5 編寫乙個能將任意兩個檔案的內容合併的程式,程式介面由讀者由自由設計。解題,在窗體建立乙個按鈕控制項,假定c盤已經有兩個要合併的檔案text1.dat和text2.dat,如下 private sub command1 click dim char as byte open c text1...

《C 高階程式設計》第四版

c 經典名著!也是wrox紅皮書中最暢銷的品種之一,從第一版開始就名滿天下 其第3版被中華讀書報 csdn 程式設計師 等機構評選為2005年最權威的十大it圖書之一 第2名 在中國版協 中國出版科學研究所 出版參考 雜誌組織的 2005年度輸出版 引進版優秀圖書 評選活動中獲得 2005年度引進版...

iOS 學習筆記 iOS程式設計 第四版

1.objective c中通過類來描述,例項變數定義前需加下劃線。如 name,date 2.通過向方法傳送訊息來呼叫方法。3.向某個類傳送alloc命令來建立該類的物件,然後傳送init訊息來初始化,如 party pa party alloc init 4.addattende 來向addat...