Dim str As String If InputValue(str, "注释内容","请输注释内容,如: '合格,不合格,通过,不通过'") Then str = str.Trim() If str Is Nothing Then messagebox.show("请输入内容") Else Output.Show(str)
end if
出现输入框后什么都没输入,上述代码提示“未将对象引用设置到对象的实例” 将“str = str.Trim()”去掉后就没事了
请教,我是想既要判断是否输入内容又要避免只输入空格键。
请指导