Validating
If IsNumeric(e.Sender.Text) AndAlso Val(Left(e.Sender.Text,2)) > = 1 AndAlso Val(Left(e.Sender.Text,2)) < = 49 Then MessageBox.Show("好")Else
e.Sender.Text = "" MessageBox.Show("前两位数必须在01至49之间")End If