2020年5月15日 星期五

vb.net append到記事本 [Append text file]


 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
Imports System.IO

Imports System


    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim path As String = Application.StartupPath & "\search.txt"

        Dim sw As StreamWriter

        sw = File.AppendText(path)

        sw.WriteLine(cboYouTubeList.Text)

        sw.Flush()

        sw.Close()

    End Sub

沒有留言:

張貼留言