[求助]Select Case语句怎么表达包含 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

dim xx as string

if e.link.name.Contains("xm") then

xx="xm"

elseif e.link.name.Contains("yd") then

xx="yd"

elseif e.link.name.Contains("删除") then

xx="删除"

elseif e.link.name.Contains("主页") then

xx="主页"

else

xx="出错"

end if

Select Case xx

    Case "xm"

    Case "yd"
        '在此加入相应的代码
    Case "删除"
        '在此加入相应的代码
    Case "主页"
        '在此加入相应的代码
End Select

[此贴子已经被作者于2021/3/16 17:43:48编辑过]

主题：[求助]Select Case语句怎么表达包含