VB编程题目 急求答案！！在线等！！ 在文本框1中输入一个正整数，在文本框1中按回车键表示结束输入

Private Sub Command1_Click() '调用实例 Dim str As String MsgBox return_str(5) End Sub Private Function return_str(number As Integer) As String '通用函数 Dim str As String For i = 1 To number Dim str_temp As String str_temp = ""