vb ScriptControl带数组执行问题_vb吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
关注：102,478贴子：
vb ScriptControl带数组执行问题收藏
需要在程序中执行 IF语句，而 IF语句中带有数组变量（即要根据选择情况生成不同的 IF条件），因此用到ScriptControl，但是实际编程中无法将数组变量正确赋值，请高手解答，十分感谢！原先是这么写的：Dim a(0 To 6) , j As IntegerDim
ss As String
For j = 0 To 6
a(j) =Text1(j).text
'数组a(j)是用来记录用户输入值的
ss = &a(j) & 1&
'ss作为 IF的条件语句
For j = 0 To 6
If ScriptControl1.Eval(ss) Then MsgBox ss
Next j运行结果显示“类型不匹配”，问题出在 If ScriptControl1.Eval(ss) Then 语句上，也就是说在语句执行的时候 ScriptControl1.Eval执行的 a(j) & 1 语句并未因 j 的值变化（a(0)、a(1)……）而变化，也用AddCode、ExecuteStatement试过都没成功，请问如何正确地执行这个语句？（希望能试过再解答）
亚马逊AWS-云创计划.最高可达10万元免费云资源!
楼上+1建议将你传进去的字符串所代表的真正的值算出来再传进去
谢谢楼上的，a(j)是 IF语句里的一个条件，事先是无法预知a(j)的值的。其实程序是要实现：窗口上有复选框7个（表示7个条件），a(j)是用来记录是否被选中并增加1个条件，每个复选框被选中就相当于在IF语句里增加1个and 的条件，这样就有127种可能，用固定的IF语句无法实现，因此想放在SS字符串里，但是目前没成功。。。
虽然不知道为何出错，但第一个next就写错了吧
登录百度帐号推荐应用君，已阅读到文档的结尾了呢~~
[VB60]ScriptControl控件用法1[VB6
扫扫二维码，随身浏览文档
手机或平板扫扫即可继续访问
[VB60]ScriptControl控件用法1
举报该文档为侵权文档。
举报该文档含有违规或不良信息。
反馈该文档无法正常浏览。
举报该文档为重复文档。
推荐理由：
将文档分享至：
分享完整地址
文档地址：
粘贴到BBS或博客
flash地址：
支持嵌入FLASH地址的网站使用
html代码：
&embed src='/DocinViewer-4.swf' width='100%' height='600' type=application/x-shockwave-flash ALLOWFULLSCREEN='true' ALLOWSCRIPTACCESS='always'&&/embed&
450px*300px480px*400px650px*490px
支持嵌入HTML代码的网站使用
您的内容已经提交成功
您所提交的内容需要审核后才能发布，请您等待！
3秒自动关闭窗口}