完成下列问题：
考生文件夹下有一个工程文件sjt4.vbp。该程序的功能是：程序运行时，向文本框控件数组Text1(有5个文本框)中任意输入5个数，单击名称为Command1的命令按钮，则找出其中最小数并显示在标签lblResult中。
窗体文件中已经给出了全部控件，但程序不完整，其中函数FindMin返回两个数中的较小数。
要求：在程序中的横线处填写正确的内容，使其能正确运行，但不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
[题目提供的源程序]
Private Sub Command1_Click()
Dim x As Integer, k As Integer
x=Val(Text1(1).Text)
For k=2 To (1)
x=FindMin(Val(Text1(k).Text), (2) )
Next
lblResult Caption= (3)
End Sub
Public Function FindMin(x As Integer, y As Integer)
If x (4) y Then
FindMin=y
Else
FindMin=x
End If
End Function
参考答案：[操作步骤]
第1步：打开工程sjt3.vbp。
第2步：修改源程序。
第3步：调试、运行并保存程序。
[1]5 [2]x [3]x [4]＞或＞=
解析： 程序首先取出第一个文本框中的内容并将其转换为数值型数据存储在变量x中，然后通过调用函数FindMin()让x与其余文本框中的内容作比较，如果其他文本框中的内容小于x，则用该文本框的内容替换掉x的值，再用x与剩余文本框中的内容做比较，以此类推，直到比较完所有的文本框中的内容，则变量x中的值就是所求的最小值。
[1]处用于控制比较的次数，目的是从第二个文本框到最后一个文本框逐一与x的值比较，而最后一个文本框的下标为5，所以[1]处应填5。调用函数FindMin时，是用一个文本框中的内容与当前所找到的最小值x相比较，所以第二个参数应该是x。[3]处是为了显示最小值，根据前面的分析，这里应该显示x的值。FindMin函数通过比较两个形参的大小来决定函数的返回值，只有当x＞=y或x＞y时，返回y的值，否则返回x。