窗体控件自动计算
请教高手如何使窗体自动计算合计项并填充到表中,谢谢!
我的代码中用了, textbox6_exit()事件。 还好,只有三个,如果很多,那是不现实,每个textbox都要写一个这样的事件。 这个可以变通一下。 textbox9_enter() Private Sub TextBox9_Enter() s = Val(TextBox6。
Value) + Val(TextBox7。Value) + Val(TextBox8。Value) TextBox9。Value = IIf(s = 0, "", s) End Sub(这个符合我们输数字的习惯,输完一个,按一下回车键) 或者用 'Private Sub UserForm_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) 's = Val(TextBox6。
Value) + Val(TextBox7。Value) + Val(TextBox8。Value) 'TextBox9。Value = IIf(s = 0, "", s) 'End Sub 你输完了,textbox8后,要移动mouse到保存按钮上。
这个移动过程就会自动合计。 Private Sub UserForm_KeyPress(ByVal KeyAscii As MSForms。ReturnInteger) End Sub 这个事件在这种情况下,不发生作用,不知道为什么。 为了保证"合计"正确性,textbox9不能手动输数。
用了textbox9。enabled=false。
问:excelVBA用户窗体 在一个用户窗体中我放置了很多控件,窗体不想显示的太大,能不能在运行窗体时加个垂直滚动条,通过上下滚动来实现显示全部控件。谢谢。
答:在窗体中插入了一个叫做“复合框”的控件,书上说的是选择userform的initialize事件,就能够设置“复合框”的下拉列表详情>>
问:谁知道成都微恒网络技术有限公司推出的微恒MEM教务管理系统是怎么收费的啊
答:这个应该是 暂时不收费的 切记 。详情>>
问:windows98与windows2000怎样设置才能网络共享?
答:在网上邻居中设置,就能解决。详情>>