您的位置：程序门 -> vb -> 非技术类



菜鸟问题 ...识别字符串..在线等


[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]


菜鸟问题 ...识别字符串..在线等[已结贴,结贴人:hanzhicai]
发表于：2007-06-12 10:46:33 楼主
我想实现的是用一个函数识别combo控件的text属性中是否存在某一个字符串，请问该怎么做？不知道我的问题问清楚了没有？谢谢
发表于：2007-06-12 11:02:111楼 得分:20
private   sub   command1_click（)
    dim   strxx   as   string
    strxx   =   "hello "

    '晄嬫暘戝彫幨
    if   instr（1,   ucase（me.combo1.text),   ucase（strxx))   <>   0   then
          msgbox   "yeye,exist "
    else
          msgbox   "oh!,not   exist "
    end   if
   
end   sub

private   sub   form_load（)
    me.combo1.additem   "kkkhello "
    me.combo1.additem   "lllhelly "
    me.combo1.additem   "lllhellokkk "
end   sub

相关文章
其他资讯

快速检索
分类导航标签a

最新资讯
热门点击