单选题 有下面程序代码：Private Sub Commandl_Click() Dim aAs String a="COMPUTER"n=search(a，"T")：Print IIf(n=0，"未找到"，n) End Sub Private Function search(str As String，ch As String)As Integer For k=1 To Len(str) c=Mid(str，k，1) Ifc=ch Then search=k：Exit Function End If Next k search=0End Function程序运行后，单击命令按钮Commandl，输出结果是