考生文件夹下有一个工程文件sjt4.vbp。该程序的功能是:程序运行时,向文本框控件数组Text1(有5个文本框)中任意输入5个数,单击名称为Command1的命令按钮,则找出其中最小数并显示在标签lblResult中。 窗体文件中已经给出了全部控件,但程序不完整,其中函数FindMin返回两个数中的较小数。 要求:在程序中的横线处填写正确的内容,使其能正确运行,但不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。 [题目提供的源程序] Private SubCommand1_Click() Dim xAs Integer, kAs Integer x=Val(Text1(1).Text) For k=2 To (1) x=FindMin(Val(Text1(k).Text), (2) ) Next lblResultCaption= (3) End Sub Public Function FindMin(xAs Integer, yAs Integer) If x (4) y Then FindMin=y Else FindMin=x End If End Function