题目是从键盘输入十个姓名查找是否有，有返回序号没有返回查无此

level 1

沐辰🍒 楼主

题目是从键盘输入十个姓名查找是否有，有返回序号没有返回查无此人，大佬们我这样写可以吗？

2021年04月20日 14点04分 1

吧务

level 13

Luosen56

在【Next k】后面应该是：
a(0) = InputBox("请输入要查找人的姓名：")
For d = 1 To 10
If a(0) = a(d) Then
Print d, a(d)
Exit For
End If
Next d
If d >= 11 Then Print "查无此人！"

2021年04月20日 16点04分 2

沐辰🍒

谢谢！

2021年04月20日 22点04分

level 11

第二个for……next中的K是误用，应该改为循环变量d就好了
不过会输出9个“查无此人”

2021年04月21日 01点04分 3