我现在用textbox在一个excel中用循环语句查找到了多个结果并进行显示了，怎么将textbox里查找的第一个数据进行msgbox输出呢？
以下是我的代码，if后面是我用的条件，可以不用研究
For j = 1 To RCOUNT Step 1
If Cells(j, 2) >= Lane And Cells(j, 2) <= Lane + 8 And Cells(j, 4) >= P And Cells(j, 5) >= HPHR Then
aaA = aaA + "   " + xlSheet.Cells(j, 1).Value & vbCrLf
End If
Me.Text1.Text = aaA

啊！各位大神是不是最近都在加班

最后实现了，谢谢各位大神
实现链接见下
https://zhidao.baidu.com/question/65131615.html?qbl=relate_question_1&word=VB6%D4%F5%C3%B4%B6%C1%C8%A1textbox%CF%D4%CA%BE%B5%C4%B5%DA%D2%BB%D0%D0%C4%DA%C8%DD