老师,这样是可以的,代码能简化吗?
If e.KeyCode=Keys.NumPad0 OrElse e.KeyCode=Keys.D0 OrElse e.KeyCode=Keys.NumPad1 OrElse e.KeyCode=Keys.D1 OrElse e.KeyCode=Keys.NumPad2 OrElse e.KeyCode=Keys.D2 OrElse e.KeyCode=Keys.NumPad3 OrElse e.KeyCode=Keys.D3 OrElse e.KeyCode=Keys.NumPad4 OrElse e.KeyCode=Keys.D4 OrElse e.KeyCode=Keys.NumPad5 OrElse e.KeyCode=Keys.D5 OrElse e.KeyCode=Keys.NumPad6 OrElse e.KeyCode=Keys.D6 OrElse e.KeyCode=Keys.NumPad7 OrElse e.KeyCode=Keys.D7 OrElse e.KeyCode=Keys.NumPad8 OrElse e.KeyCode=Keys.D8 OrElse e.KeyCode=Keys.NumPad9 OrElse e.KeyCode=Keys.D9 Then
e.Form.Controls("民族").Text = e.Form.Controls("学生姓名").Text
End If