高一信息技术我自己写了个，就是输入小明结果男，输入小红结果女。可调试没有反应。我是哪里错了

程序完全不对，你的name没有输入，它从哪里来的？后面判断也不对（少else)且最后的test1也没有定义。改好的参考下Private Sub Command1_Click()Dim name As Stringname = Text1.TextIf name = "小明" ThenText1.Text = "男"ElseIf name = "小红" ThenText1.Text = "女" ElseText1.Text = "小仙女、"End IfEnd Sub