日韩无码专区无码一级三级片|91人人爱网站中日韩无码电影|厨房大战丰满熟妇|AV高清无码在线免费观看|另类AV日韩少妇熟女|中文日本大黄一级黄色片|色情在线视频免费|亚洲成人特黄a片|黄片wwwav色图欧美|欧亚乱色一区二区三区

RELATEED CONSULTING
相關(guān)咨詢
選擇下列產(chǎn)品馬上在線溝通
服務(wù)時(shí)間：8:30-17:00
你可能遇到了下面的問(wèn)題
關(guān)閉右側(cè)工具欄

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營(yíng)銷(xiāo)解決方案
快速學(xué)習(xí)VB.NET追加文件

學(xué)習(xí)VB.NET時(shí)，你可能會(huì)遇到VB.NET追加文件問(wèn)題，這里將介紹VB.NET追加文件 問(wèn)題的解決方法，在這里拿出來(lái)和大家分享一下。

#T#VB讀寫(xiě)文件要用到以下語(yǔ)句：
1、Open語(yǔ)句打開(kāi)文件。
2、讀文件使用LineInput、Input#，（以上為文本方式）和Get（以上為二進(jìn)制方式）。
3、寫(xiě)文件使用Print#、Write（以上為文本方式）和Put（以上為二進(jìn)制方式）。
4、Close語(yǔ)句關(guān)閉文件
5、二進(jìn)制方式下移動(dòng)文件位置使用Seek語(yǔ)句。
所有這些語(yǔ)句在VB的幫助中都有詳細(xì)說(shuō)明和例子。

文本文件的示例：

 
 
    
  
  
  1. Open"TESTFILE"ForOutputAs#1'打開(kāi)輸出文件。  
    2.   
  
  2. Print#1,"Thisisatest"'將文本數(shù)據(jù)寫(xiě)入文件。  
    3.   
  
  3. Print#1,'將空白行寫(xiě)入文件。  
    4.   
  
  4. Print#1,"Zone1"；Tab；"Zone2"'數(shù)據(jù)寫(xiě)入兩個(gè)區(qū)（printzones）。  
    5.   
  
  5. Print#1,"Hello"；""；"World"'以空格隔開(kāi)兩個(gè)字符串。  
    6.   
  
  6. Print#1,Spc(5)；"5leadingspaces"'在字符串之前寫(xiě)入五個(gè)空格。  
    7.   
  
  7. Print#1,Tab(10)；"Hello"'將數(shù)據(jù)寫(xiě)在第十列。  
    8.   
  
  8. '賦值Boolean、Date、Null及Error等。  
    9.   
  
  9. DimMyBool,MyDate,MyNull,MyError  
    10.   
  
  10. MyBool=False:MyDate=#February12,1969#:MyNull=Null  
    11.   
  
  11. MyError=CVErr(32767)  
    12.   
  
  12. 'True、False、Null及Error會(huì)根據(jù)系統(tǒng)的地區(qū)設(shè)置自動(dòng)轉(zhuǎn)換格式。  
    13.   
  
  13. '日期將以標(biāo)準(zhǔn)的短式日期的格式顯示。  
    14.   
  
  14. Print#1,MyBool；"isaBooleanvalue"  
    15.   
  
  15. Print#1,MyDate；"isadate"  
    16.   
  
  16. Print#1,MyNull；"isanullvalue"  
    17.   
  
  17. Print#1,MyError；"isanerrorvalue"  
    18.   
  
  18. Close#1'關(guān)閉文件。 
    19.

讀文件示例

使用LineInput#語(yǔ)句從順序文件中讀入一行數(shù)據(jù)，并將該行數(shù)據(jù)賦予一個(gè)變量。本示例假設(shè)TESTFILE文件內(nèi)含數(shù)行文本數(shù)據(jù)。

 
 
    
  
  
  1. DimTextLine  
    2.   
  
  2. Open"TESTFILE"ForInputAs#1'打開(kāi)文件。  
    3.   
  
  3. DoWhileNotEOF(1)'循環(huán)至文件尾。  
    4.   
  
  4. LineInput#1,TextLine'讀入一行數(shù)據(jù)并將其賦予某變量。  
    5.   
  
  5. Debug.PrintTextLine'在調(diào)試窗口中顯示數(shù)據(jù)。  
    6.   
  
  6. Loop  
    7.   
  
  7. Close#1'關(guān)閉文件。 
    8.

VB.NET追加文件示例

 
 
    
  
  
  1. Open"A.txt"ForappendAs#1  
    2.   
  
  2. Print#1,"303(吳志坤)是個(gè)大笨蛋！，居然不知道append是追加。"  
    3.   
  
  3. Print#1,"從QBASIC時(shí)代就有這個(gè)語(yǔ)句了。"  
    4.   
  
  4. Print#1,"Output是從頭寫(xiě)，Input是讀，Append是追加。"  
    5.   
  
  5. Print#1,"Print#文件號(hào)，是寫(xiě)文件。"  
    6.   
  
  6. Print#1,"LineInput#文件號(hào)，是成行讀文件。"  
    7.   
  
  7. Print#1,"你地明白否？"  
    8.   
  
  8. Close#1  
    9.

標(biāo)題名稱：快速學(xué)習(xí)VB.NET追加文件
文章分享：http://www.5511xx.com/article/dhoidii.html