problems with keyboard input - incharqq

I have just modified my settings to compile a  programme in x64 (Visual Studio 2008, professional; compiler v11.0.075.) and run it on Windows 10.

I have changed no code but now I can no longer interact with the program using the keyboard.

I have used incharqq() to test where the problem arrives and I have keyboard input until I create a dialog

retint = DlgModal( dlg )

Within the dialog, I can use the keyboard to enter data but when I exit using the following command

CALL dlgexit (dlg)

I lose the keyboard.

Icharqq() immediately after the DlgModal command no longer works.