サラケータイに保存の時にエラー？『（16進数数値 0x1F）は無効の文字です』行 XXXXX 位置YY

非表示文字・特殊文字？コピペで変なスペースが含まれるときに発生するようです。
原因をすぐ調べることができますので、上記エラーが出たら、すぐご連絡いただけますでしょうか。

Dim input As String = File.ReadAllText(“input.txt”)
Dim cleanText As String = String.Concat(input.Where(Function(c) Not Char.IsControl(c)))
File.WriteAllText(“output.txt”, cleanText)