主题：InputValue函数的问题

按那个“x”，等于点取消，不必纠结。

Dim Val As Integer = 5
If InputValue(Val, "增加行", "请输入要增加的行数:") Then
    e.Form.Controls("TextBox1").Value = val
    MessageBox.Show("确定")
Else
    MessageBox.Show("取消")
End If