易语言教程_易语言源码_易语言写挂_易语言论坛_看流星社区

 找回密码
 注册
零基础辅助入门教学 原创 高清 专业课程售后(每日解答)
零基础辅助入门教学 原创 高清 专业课程售后(每日解答)
零基础辅助入门教学 原创 高清 专业课程售后(每日解答)
零基础辅助入门教学 原创 高清 专业课程售后(每日解答)
零基础辅助入门教学 原创 高清 专业课程售后(每日解答)
零基础辅助入门教学 原创 高清 专业课程售后(每日解答)
赞助广告位 请点击这里联系站长 QQ20209081
赞助广告位 请点击这里联系站长 QQ20209081
赞助广告位 请点击这里联系站长 QQ20209081
查看: 1078|回复: 2

vb中if elseif语句不向下执行

[复制链接]
发表于 2014-7-30 09:05:44 | 显示全部楼层 |阅读模式
If nnn <> 0 Then
                          stry = Mid(a(X1 + 1), 1, nnn - 1)         
                          strb = Mid(a(X1 + 1), nnn + 1, n1 - nnn)  
                          nnn = 0
                       End If

'---------------查找-------------------------------
                         If InStr(stry, "18") <> 0 Then
                 
                             wy18(t) = "18"               
                  
                         ElseIf InStr(stry, "17") <> 0 Then
                 
                             wy17(t) = "17"                                      
                         ElseIf InStr(stry, "15") <> 0 Then
                 
                             wy15(t) = "15"               
                         ElseIf InStr(stry, "89") <> 0 Then
                 
                             wy89(t) = "89"                                         
                         ElseIf InStr(stry, "13") <> 0 Then
                 
                             wy13(t) = "13"               
                         End If
为什么只执行前两段,后面的筛选都不执行呢?
输出wy18(t) wy17(t)都没问题 可是wy15(t)后面几个就不输出
发表于 2014-7-30 09:05:56 | 显示全部楼层
If nnn <> 0 Then
    stry = Mid(a(X1 + 1), 1, nnn - 1)
    strb = Mid(a(X1 + 1), nnn + 1, n1 - nnn)
    nnn = 0
End If
'---------------查找-------------------------------
If InStr(stry, "18") <> 0 Then
    wy18(t) = "18"
ElseIf InStr(stry, "17") <> 0 Then
    wy17(t) = "17"
ElseIf InStr(stry, "15") <> 0 Then
    wy15(t) = "15"
ElseIf InStr(stry, "89") <> 0 Then
    wy89(t) = "89"
ElseIf InStr(stry, "13") <> 0 Then
    wy13(t) = "13"
End If
'stry = Mid(a(X1 + 1), 1, nnn - 1)执行后,stry的值是唯一的
当查找到stry=18或17,15,89,13后或都没有查找到,就跳到ENDIF后面去了
发表于 2018-6-30 11:55:08 | 显示全部楼层
名爵国际 娱 乐 城 900868.com
六 合 彩9:28依然可以投注,特别号码48倍。百 家 乐 ,龙 虎 斗, 骰宝, 轮盘, 全国各地的时 时 彩 都可以投注。即时入款出款,大数目无忧,各方面都有安全保障!
点击按钮快速添加回复内容: 支持 高兴 激动 给力 加油 苦寻 生气 回帖 路过 感恩
*滑动验证:
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|看流星社区  |网站地图

GMT+8, 2018-11-21 15:37 易语言论坛 易语言导航

Powered by 看流星社区 X3.2

©2011-2016 最好的辅助编程技术论坛

快速回复 返回顶部 返回列表