The SIPChanged event fires when the SIP (Soft Input Panel) state changes.
Example:
Sub hardware_SIPChanged 'Changes the TextBox height to fit the whole
available screen.
If hardware.SIPEnabled Then
TextBox1.Height = Form1.Height - hardware.SIPHeight
Else
TextBox1.Height = Form1.Height
End If
End Sub