91超碰碰碰碰久久久久久综合_超碰av人澡人澡人澡人澡人掠_国产黄大片在线观看画质优化_txt小说免费全本

溫馨提示×

溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務條款》

VB.NET中怎么對文件進行合并

發布時間:2021-07-22 15:01:49 來源:億速云 閱讀:355 作者:Leah 欄目:編程語言

本篇文章給大家分享的是有關VB.NET中怎么對文件進行合并,小編覺得挺實用的,因此分享給大家學習,希望大家閱讀完這篇文章后可以有所收獲,話不多說,跟著小編一起來看看吧。

VB.NET文件合并代碼實現示例:

  1. Private Sub MergeFiles(ByVal 
    inputDir As String, ByVal 
    inputMask As String, ByVal 
    outputPath As String)  

  2. 'store files in datatable 
    with their created times 
    to sort by later  

  3. Dim files As New DataTable  

  4. files.Columns.Add("filepath",
     GetType(String))  

  5. files.Columns.Add("creationtime",
     GetType(Date))  

  6. 'find partial files  

  7. For Each f As String In IO.
    Directory.GetFiles(inputDir, inputMask)  

  8. files.Rows.Add(New Object() 
    {f, IO.File.GetCreationTime(f)})  

  9. Next  

  10. 'make sure output file does
     not exist before writing  

  11. If IO.File.Exists(outputPath) Then  

  12. IO.File.Delete(outputPath)  

  13. End If  

  14. 'loop through file in order, 
    and append contents to output file  

  15. For Each dr As DataRow In 
    files.Select("", "creationtime")  

  16. Dim contents As String = 
    My.Computer.FileSystem.ReadAllText
    (CStr(dr("filepath")))  

  17. My.Computer.FileSystem.WriteAllText
    (outputPath, contents, True)  

  18. Next  

  19. End Su 

以上就是VB.NET中怎么對文件進行合并,小編相信有部分知識點可能是我們日常工作會見到或用到的。希望你能通過這篇文章學到更多知識。更多詳情敬請關注億速云行業資訊頻道。

向AI問一下細節

免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。

AI

开远市| 左云县| 尉氏县| 桃江县| 洞口县| 伊春市| 武强县| 万盛区| 卓资县| 廉江市| 翁牛特旗| 锦屏县| 苗栗市| 民权县| 隆德县| 上饶市| 南江县| 酉阳| 安图县| 古丈县| 富宁县| 固原市| 施甸县| 三原县| 府谷县| 东方市| 宁陕县| 宣威市| 黄石市| 临城县| 天祝| 民勤县| 芦山县| 东明县| 凉城县| 资阳市| 怀宁县| 威远县| 白山市| 攀枝花市| 大丰市|