Excel 2003中VBA工程

PrivateSubTextBox_shiyong_KeyUp(ByValKeyCodeAsMSForms.ReturnInteger,ByValShiftAsInteg... Private Sub TextBox_shiyong_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If VBA.Val(TextBox_shiyong.Text) > Val(TextBox_xianzi.Text) Then
TextBox_shiyong.Text = 10
MsgBox "使用列数不可以大于最大限制使用列数!", 64, "(只为提高效率)提示:"
End If
If TextBox_shiyong.Text = 0 Then TextBox_shiyong.Text = 10
End Sub

Private Sub TextBox_shiyong_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode > 47 And KeyCode < 58 Or KeyCode > 95 And KeyCode < 104 Or KeyCode = 8 Then Else KeyCode = 0

End Sub

求翻译 这段代码什么意思
展开
 我来答
mzz9060
2017-05-19 · TA获得超过1321个赞
知道小有建树答主
回答量:773
采纳率:84%
帮助的人:193万
展开全部

答:上面一部分代码表示在用户窗体里有2个自定义文本框,一个名叫"TextBox_shiyong",另一个叫"TextBox_xianzi",程序是"TextBox_shiyong"文本框的按键松开事件代码,在松开键盘输入的按键时作出一个判断,确保"TextBox_shiyong"里值不大于"TextBox_xianzi"里的限制值10,如果大于10则改为10,如为0则改为0.

2、下面代码代表,只识别数字按键和空格键,对于其他键不做反应。

追问
第二段IF语句你就没翻译完呀
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式