能否把InputBox文本框改造为动态组合框或列表框？

谢谢版主，我要的不是这样的，我是希望象程序执行到InputBox对话框时程序挂起等待返回值再继续的办法。InputBox会自动挂起程序，返回输入值后继续执行后面的程序，类似这样：

     Public Function addNew()

     .........

    
     zgID = InputBox("请输入主管ID", "组织机构设置")  

         '起因是这里的主管ID需要事先检索后输入，希望对话框有查阅字段的功能改善客户体验，如果自己做的窗体如何让程序挂起等待返回值给变量zgID再继续下面的程序？

         '因为看到不少对InputBox升级改造的案例，所以一开始发帖问的是能否对文本框控件改造 

     If Len(zgID) = 0 Then

     Exit Function

     Else

     ...............

我查了一些资料，有人说MsgBox InputBox是封装在user32.dll里的，有对线程的挂起机制,但具体怎么回事就不知道了，也没百度到成功案例。只是探讨一个技术节点，实在不行就不强求了，先换别的办法解决了。