Function CharInput( _
   ByVal inputKey As Integer, _
   ByVal inputChar As Char, _
   ByVal currText As String, _
   ByVal selStart As Integer, _
   ByVal selLength As Integer, _
   ByRef resultText As String, _
   ByRef resultCaretPos As Integer, _
   ByVal overwriteMode As Boolean _
) As Boolean

Dim instance As IManageFmtInput
Dim inputKey As Integer
Dim inputChar As Char
Dim currText As String
Dim selStart As Integer
Dim selLength As Integer
Dim resultText As String
Dim resultCaretPos As Integer
Dim overwriteMode As Boolean
Dim value As Boolean
 
value = instance.CharInput(inputKey, inputChar, currText, selStart, selLength, resultText, resultCaretPos, overwriteMode)

bool CharInput( 
   int inputKey,
   char inputChar,
   string currText,
   int selStart,
   int selLength,
   out string resultText,
   out int resultCaretPos,
   bool overwriteMode
)