Follow-up question: How you are planning to deal with Indian characters? Russian? Thai? Emojis? Are they all allowed to stay because you only want to filter away the chinese chars?
Sub Process_Globals
Private fx As JFX
Private MainForm As Form
End Sub
Sub AppStart (Form1 As Form, Args() As String)
MainForm = Form1
MainForm.Show
Dim t() As Byte
t="dé´údfd乾卦彖傳應作「大明終始」".GetBytes("UTF8")
For x=0 To t.Length-1
If t(x)>127 Or t(x)<0 Then t(x)=127
Next
Log(BytesToString(t,0,t.Length,"UTF8"))
End Sub