VB中如何让InputBox限时10秒内输入，否则对话框自动消失

如题：VB中如何实现让InputBox限时10秒内输入数值，否则对话框自动消失。谢谢

InputBox弹出的对话框是由操作系统提供的，而且其显示方式是模态的，所以VB无法直接控制它。
你可以自己用窗体来模拟一个带输入框的对话框，这样你要怎么控制都行了。
要想定时关闭InputBox也可以实现的，要用到API函数，但是你会觉得得不偿失的，我不建议这么做。

你好！ 加一个timer 控件。 仅代表个人观点，不喜勿喷，谢谢。