怎么编程一个筛选系统

㈠ vba筛选编程

filter函数实现数组筛选:
数组的筛选就是根据一定的条件,从数组中筛选符合条件的值,组成一个新的数组，实现数组筛选的vba函数是：
filter函数
用法：filter(数组,
筛选的字符,
是否包含)
sub
dd()
arr1
=
vba.filter(arr,
"a",
true)
'筛选所有含a的数值组成一个新数组
arr2
=
vba.filter(arr,
"a",
false)
'筛选所有不含a的数值组成一个新数组
msgbox
join(arr2,
",")
'查看筛选的结果end
sub遗憾的是函数只能进行模糊筛选，不能精确匹配。

㈡ 我想用《同花顺》里的SAR做一个筛选工具，该如何编程要求圆圈在上面，下面的线条刚刚变红。

IF(CLOSE>OPEN)
RETURN"阳";
ELSEIF(CLOSE<OPEN)
RETURN"阴";
ELSE IF(CLOSE==OPENANDOPEN>=CLOSE[1])
RETURN"阳";
ELSE IF(CLOSE==OPENANDOPEN<=CLOSE[1])
RETURN"阴";

CLOSE==OPENANDOPEN>=CLOSE

哈哈，别忘给钱