2009-11-06から1日間の記事一覧
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress If Not (e.KeyChar >= "0"c And e.KeyChar <= "9"c Or e.KeyChar = "."c) Then e.Handled = True End If End Sub