Ensured position works correctly in Calculator dialog

instat/ucrInputComboBox.vb

@@ -18,6 +18,7 @@ Imports System.ComponentModel
 
 Public Class ucrInputComboBox
     Private _strRObjectItemsTypeLabel As String = ""
+    Public bKeyPress As Boolean = True
 
     Public Sub New()
 
@@ -225,7 +226,7 @@ Public Class ucrInputComboBox
     End Sub
 
     Private Sub cboInput_KeyPress(sender As Object, e As KeyPressEventArgs) Handles cboInput.KeyPress
-        bUserTyped = True
+        bUserTyped = False
     End Sub
 
     'Public Sub SetEditable(bEditable As Boolean)

instat/ucrInputTextBox.vb

@@ -31,7 +31,7 @@ Public Class ucrInputTextBox
     End Sub
 
     Private Sub txtInput_KeyPress(sender As Object, e As KeyPressEventArgs) Handles txtInput.KeyPress
-        bUserTyped = True
+        bUserTyped = False
     End Sub
 
     Private Sub txtInput_Validating(sender As Object, e As CancelEventArgs) Handles txtInput.Validating

instat/ucrVariablename.vb

@@ -24,7 +24,7 @@ Public Class ucrVariableName
     Public Event NameChanged()
     'TODO this has a bug if using for setting default values in textbox if user does not use keyboard
     Private Sub txtValidation_KeyPress(sender As Object, e As KeyPressEventArgs) Handles txtValidation.KeyPress
-        bUserTyped = True
+        bUserTyped = False
     End Sub