VBA for each control in controls 疑义

fieldset{padding:10px;}

VBA for each control in controls 疑问我调试的是VBA,应该VB也一样吧。界面上有个MultiPage1容器,容器内有textbox控件点击按钮btnReset时把所有textbox控件值设为””。PrivateSubbtnReset_Click()DimtxtAsControl’Settxt=txtTempC’怎么txt等于txtTempC.Text值???ForEachtxtInMultiPage1.SelectedItem.ControlsIfTypeOftxtIsTextBoxThen’为什么就跳不到这一步?txt.Text=””EndIfNextEndSub哪位老师帮帮我,谢谢。——最佳解决方案——————————————————–将IfTypeOftxtIsTextBoxThen改成IfTypeOftxtIsMSForms.TextBoxThen即可——其他解决方案——————————————————–

引用:

我调试的是VBA,应该VB也一样吧。界面上有个MultiPage1容器,容器内有textbox控件点击按钮btnReset时把所有textbox控件值设为””。PrivateSubbtnReset_Click()DimtxtAsControl’Settxt=txtTempC’怎么txt等于txtTempC.Text值???ForEach……

容器上的控件不能通过容器来遍历,其上的控件不是从属于容器,而是从属于parentPrivateSubbtnReset_Click()DimtxtAsControl’Settxt=txtTempC’怎么txt等于txtTempC.Text值???ForEachtxtInControlsiftxt.containerisMultiPage1.SelectedItemthen’此处,不知道是用这样还是应该使用iftxt.containerisMultiPage1then’IfTypeOftxtIsTextBoxThentxt.Text=””EndIfendifNextEndSub——其他解决方案——————————————————–谢谢,lyserver。蚁穴虽小,溃之千里。

VBA for each control in controls 疑义

相关文章:

你感兴趣的文章:

标签云: