国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁(yè) > 學(xué)院 > 開(kāi)發(fā)設(shè)計(jì) > 正文

如何訪問(wèn)文本文件(3)----用MicrosoftJet訪問(wèn)桌面數(shù)據(jù)庫(kù)(五)

2019-11-18 17:48:19
字體：大 中 小
來(lái)源：轉(zhuǎn)載
供稿：網(wǎng)友
三、程序舉例

例：用MicrosonJet打開(kāi)一個(gè)文本文件，并輸出該文件的內(nèi)容。假定有一個(gè)文本文件，名為txttest.txt，存放在d:/dbtest目錄下，內(nèi)容如下：

a，b,C，d

”采蓮詞”，”蘭溪掉歌”，”詠繡障”，”山中”

朝出沙頭日正紅，涼月如眉掛柳灣，日暮堂前花芯橋，荊溪白石出

晚來(lái)云起半江中,越中山色鏡中看，爭(zhēng)拈小筆上床描，天寒紅葉稀

賴逢鄰女曾相識(shí)，蘭溪三日桃花雨，繡成安向春園里，山路元無(wú)雨

并著蓮舟不畏風(fēng)，半夜鯉魚(yú)來(lái)上灘，引得黃營(yíng)下柳條，空翠濕人衣

該文件包括4首古詩(shī)，第一行的a，b，c，d是字段名。為了用MicrosoftJet打開(kāi)該文件并顯示其內(nèi)容，可按如下步驟操作。首先，建立方案描述信息文件。內(nèi)容如下：

[txttest．txt]

ColNameHeader＝True

Format＝FixedLength

MaxSCanRows＝0

CharacterSet＝OEM

Col1＝ColUmnnameCharWidth24

Col2＝ColUmnname2CharWidth24

Col3＝ColUmnname7CharWidth24

Col4＝ColUmnname8CharWidth24

將文件存放在d:/dbtest目錄下，名為txttest.ini。4個(gè)字段均為字符(Char)型，其長(zhǎng)度為24，可以使顯示的各字段之間留有空隙。其次，編寫(xiě)代碼。在窗體上畫(huà)一個(gè)命令按鈕，然后編寫(xiě)如下事件過(guò)程：

a$＝a$ rstAwards.a

rstAwards.MoveNext

Loop

Text1.Text＝a$

EndSub

運(yùn)行程序，單擊命令按鈕，將在文本框中顯示文本文件的內(nèi)容。

->

發(fā)表評(píng)論 共有條評(píng)論
用戶名: 密碼:
驗(yàn)證碼: 匿名發(fā)表
主站蜘蛛池模板： 无极县| 宝山区| 固安县| 颍上县| 曲松县| 陵水| 江安县| 监利县| 石家庄市| 铁岭市| 新宁县| 汉寿县| 慈利县| 万盛区| 阜宁县| 客服| 渭源县| 宣武区| 茶陵县| 绥棱县| 阜平县| 油尖旺区| 岳池县| 新宾| 兰考县| 靖江市| 瑞丽市| 彰武县| 五莲县| 吴桥县| 横峰县| 岑巩县| 富阳市| 石楼县| 克拉玛依市| 通化市| 祁阳县| 萨迦县| 鄯善县| 天津市| 望谟县|