Olá João,
Obrigado por responder, no entanto, infelizmente a sua função não funcionou para trocar os acentos UTF8.
A função HB_UTF8TOSTR() também não funciona.
Não sei mais o que fazer para converter UTF8 em ASC para depois tirar os acentos.
DataObject As New DataObject
Dim file As String = "C:\TESTE.PDF"
DataObject.SetData(DataFormats.FileDrop, True, file)
Clipboard.SetDataObject(DataObject)
HB_Serialize()
e
HB_DeSerialize()