用VB设计一个查找程序:要求显示查找的个数和内容

1 假设你查找的数字，那么就先把这些数字放在数组里面。然后用下面的程序代码来实现：

dim a (100) as double
dim b,c,d,i,j as double

b=100 假设100这个值是要找的话。
c=0 用C来计数
for i=1 to 100

if a(i)=b then
msgbox a(i)
c=c+1
endif
next i

你要查找什么样的数据呀?说的清楚一些.
还有要说明要查找的东东是怎么放置的.这样别人好回答的