Hello,
the text string below contains Greek (or Cyrillic) characters
when I copy the text to the windows clipboardCode:thе brοwn fοх ϳumрѕ οvеr а Ӏаzу bаg
and paste it (Ctrl+V) into the Forms 2.0 Textbox (Textbox1),
the Asc codes "116, 104, 1077" are shown.
This is the code:But when I use the code:Code:Private Sub Form_Load() ' TextBox1.Text = Clipboard.GetText Form1.AutoRedraw = True 'draw to form Form1.WindowState = 2 'show form1 maximized End Sub Private Sub TextBox1_Change() cb = Clipboard.GetText For r = 1 To Len(cb) x = Mid(TextBox1.Text, r, 1) y = AscW(x) Form1.Print " "; (y) Next End SubCode:Private Sub Form_Load() TextBox1.Text = Clipboard.GetText Form1.AutoRedraw = True 'draw to form Form1.WindowState = 2 'show form1 maximized End Sub
the (wrong) Asc codes "116, 104, 63" are shown.
How is it possible to display the Asc codes "116, 104, 1077"
when using the clipboard (without having a textbox on Form1)?
-Do I need the StrPtr() function?




Reply With Quote