VB中的问题

本文介绍了VB中的问题的处理方法，对大家解决问题具有一定的参考价值，需要的朋友们下面随着小编来一起学习吧！ 问题描述 Hi, 展开 | 选择 | Wrap | 行号 推荐答案 Dim objtmp作为控制 公共功能OnLoad（ByVal frmobj1作为表格） For each objtmp in frmobj1.Controls 如果TypeOf objtmp是TextBox那么 objtmp.Enabled = False 结束如果 下一页tmp 结束功能 我在项目中创建了这个功能。但它不起作用。上面的代码有什么问题？请尽快告诉我。 谢谢 Hi, Dim objtmp As Control Public Function OnLoad(ByVal frmobj1 As Form) For Each objtmp In frmobj1.Controls If TypeOf objtmp Is TextBox Then objtmp.Enabled = False End If Next tmpEnd Function I have created this function in my project. But it doesnt work. What is wrong with the above code? Please tell me as soon as possible. Thanks 只需一个额外的字 替换下一个tmp by next或next objtmp just one extra wordreplace next tmp by next or next objtmp 只需要一个额外的单词 用下一个或下一个objtmp替换下一个tmp just one extra wordreplace next tmp by next or next objtmp 仍然没有用。 Plz建议我如何以其他方式编写代码？ Still its not working. Plz suggest me how to code it in other way? 仍然无效。 Plz建议我如何用其他方式编写代码？ Still its not working. Plz suggest me how to code it in other way? 代码写入调用函数你必须写onload me这将解决问题 或 将此代码放入表单并调用formload evnt the code is write to call the function u have to write onload me this will solve the problem orput this code in form and call in formload evnt 展开 | 选择 | Wrap | 行号 这篇关于VB中的问题的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！