Question

创建一个过程作为窗体的一部分，它接受一个字串符并输出另一个字串符。在文本框的TextChanged()事件中加入

创建一个过程作为窗体的一部分，它接受一个字串符并输出另一个字串符。在文本框的TextChanged()事件中加入代码来调用该过程，并将文本框的内容作为参数传递给它。该过程反回的是传入的字符串的大写版本（提示：使用Visual Basic 函数UCase() ）
题目如上，怎么做嗯，向各位大虾求助嗯

Answer 1

Private Sub Text1_Change()
Text1.Text = dx(Text1.Text)
Text1.SelStart = Len(Text1.Text)
End Sub

Private Function dx(s As String) As String
dx = UCase(s)
End Function

追问

谢谢，text1前面要指定窗体应用吧，就是比如 from1.text1.text=dx(form1.text1.text)请问要查看返回值 加消息盒子的代码应该是 message.show(?)还是message.show=？加在那里 问号里面是填写s as string吗？

追答

如果你的代码就在Form1，就不需要指定了，如果是别的窗体的代码，就需要加form1.
消息盒子的代码是 msgbox(?) ，？是字符串变量，或直接一个字符串。

Answer 2

Private Sub Text1_Change()
Uc Text1

End Sub

Private Sub Uc(ByVal s As String)
Text1 = UCase(s)
Text1.SelStart = Len(Text1)

End Sub

追问

SelStart不是textbox成员

还有如何查看返回表达呢？messageshow？？？