寫入檔案並附加在原本內容後面
Public Function log_fun(ByVal msg As String) As Integer
Dim fileName As String = "A" + ImgTest.cmb_algo.Text + "_C" + ImgTest.txt_clusterNum.Text + "_I" + ImgTest.txt_iter.Text + ImgTest.txt_threshold.Text + "_V" + ImgTest.txt_velocity.Text + ".txt" '這是我自己記錄每次執行的檔名,方便歸類
Public Function log_fun(ByVal msg As String) As Integer
Dim fileName As String = "A" + ImgTest.cmb_algo.Text + "_C" + ImgTest.txt_clusterNum.Text + "_I" + ImgTest.txt_iter.Text + ImgTest.txt_threshold.Text + "_V" + ImgTest.txt_velocity.Text + ".txt" '這是我自己記錄每次執行的檔名,方便歸類
