分享一个东西，刚刚网上搜了半天也没找到，无奈就自己写了一个( - vb吧

level 5

分享一个东西，刚刚网上搜了半天也没找到，无奈就自己写了一个(难为我个菜鸡了)
已知数组一个元素的值，求数组的下标
一维数组d(i)
已知d(i)的值为x，求下标j，d(i)的下界为1
For i=1 to N
if d(i)=x then
list1.additem i
end if
next i
(N为上界，当d(i)的下界为0时，i从0开始取)
多维数组类似
[哈哈]

2020年05月26日 14点05分 1

level 11

璐村惂鐢ㄦ埛_0748V5Z馃惥

写的可以，赞一个先
改进建议：
①使用listbox仅仅输出一个数据，有一点过于浪费，而且不方便
②在本题样例中，list添加数据项之前，应该先清空，不然结果会混淆
③推荐使用标签或者msgbox输出，并且输出内容应完整：
s=x & “在队列中的位置是第” & i & “个。”
label1=s
或者
msgbox s
就好了

2020年05月27日 00点05分 2

陈狗蛋😄😄

由于当时我的作业是用listbox，于是我写这个就没有想到msgbox。关于清空，重复用的话确实可以应该一个。我忘记加了。。

2020年05月29日 09点05分

level 1

林槿MAX

我想请教你一个问题可以私信吗

2020年05月27日 01点05分 3