一、获取输入框的值： 代码如下：1MsgBox "自动补血输入框里的值=" & Form1.InputBox1.textQUI界面如下：二、输入框改变事件代码如下：123Event Form1.InputBox1.ChangeMsg