TextBox de solo enteros con decimales

"Richard Villalón" preguntó:

Como podemos formatear un textbox para que el usuario solo
ingrese numeros y cuando pulse el . decimal el cursor se
desplace hacia los decimales.

Hola, Richard:

No entiendo muy bien lo que quieres decir que "el cursor se desplace hacia
los decimales cuando se pulse el punto decimal".

Si deseas que el cuadro de texto sólo te permita números y las teclas de
retroceso y punto decimal, alinea a la derecha el texto del control TextBox
y prueba el siguiente ejemplo:

Private Sub TextBox1_KeyPress(ByVal sender As Object, _
ByVal e As System.Windows.Forms.KeyPressEventArgs) _
Handles TextBox1.KeyPress

' Habilitamos el parámetro «KeyAccii» del antiguo VB
'
Dim KeyAscii As Short = CShort(Asc(e.KeyChar))

Select Case KeyAscii
Case 8 ' Tecla de retroceso

Case 46 ' Punto decimal

Case Else
If Not e.KeyChar.IsDigit(e.KeyChar) Then
' Se ha especificado una letra
e.Handled = True
End If
End Select

End Sub

Un saludo

Enrique Martínez
[MS MVP - VB]

Nota informativa: La información contenida en este mensaje, así como el
código fuente incluido en el mismo, se proporciona «COMO ESTÁ», sin
garantías de ninguna clase, y no otorga derecho alguno. Usted asume
cualquier riesgo al poner en práctica, utilizar o ejecutar lo recomendado o
sugerido en el presente mensaje.