When using io.FileInfo.name Files with Japanese characters are ignored

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
 
        Dim StrFiles As String
        StrFiles = TextBox1.Text
 
        SaveFileDialog1.Title = "Please Select a File"
        SaveFileDialog1.InitialDirectory = "C:\"
        SaveFileDialog1.Filter = "txt files (*.txt)|*.txt|All files (*.*)|*.*"
        SaveFileDialog1.ShowDialog()
 
        Dim f, d
        
        Using sw As StreamWriter = New StreamWriter(SaveFileDialog1.FileName)
            sw.WriteLine("Directory Path" & vbTab & "File Name" & vbTab & "Date Modified")
            f = 0
            d = 0
            sw.WriteLine(StrFiles)
 
            For Each folder In Directory.GetDirectories(StrFiles)
                Dim SubDI As New DirectoryInfo(folder)
                Dim SubFI As FileInfo() = SubDI.GetFiles()
                Dim SubFItemp As FileInfo
                sw.WriteLine(folder)
                d = d + 1
                For Each SubFItemp In SubFI
                    
                    sw.WriteLine(vbTab & SubFItemp.Name & vbTab & SubFItemp.LastWriteTime)
                    f = f + 1
                Next
 
                For Each subdir In Directory.GetDirectories(folder)
                    Dim SubDi2 As New DirectoryInfo(subdir)
                    Dim SubFI2 As FileInfo() = SubDi2.GetFiles()
                    Dim SubFiTemp2 As FileInfo
                    sw.WriteLine(subdir)
                    d = d + 1
                    For Each SubFiTemp2 In SubFI2
                        
                        sw.WriteLine(vbTab & SubFiTemp2.Name & vbTab & SubFiTemp2.LastWriteTime)
                        f = f + 1
                       
                    Next
 
                Next
 
 
            Next
        End Using
        RichTextBox1.Text = ("Search has completed and outputed to: " & SaveFileDialog1.FileName & vbCrLf _
                             & "Number of Directories searched: " & d & vbCrLf _
                             & "Number of Files searched: " & f)
 
    End Sub

                                  

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53: