最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
获取特定的字符串
时间:2022-06-30 11:21:52 编辑:袖梨 来源:一聚教程网
为了建立一个通用的投票调查系统,往往不能确定有多少选项,普通的作法就是建立多个字段,比如10个字段,但要是多余10个选项就不行了。所以基于这种考虑,我设计了只需一个字段(当然长度够长或是备注型)就可以实现。
aaadfgfga||bfgbbb||ccdfgsgcc||dsfdfdsf||...||
为了实现读取"||"之间的内容,我编写了如下代码
'SStr:表示分隔字符串,LStr:表示要搜索的字符串,i:表示要取第几段字符串
Function GetStr(SStr,LStr,i)
dim ks,js,cd,wz,j'ks:表示开始,JS:计数,cd:长度,wz:位置,j:循环变量
cd=Len(LStr)
ks=1
For j=1 to i
wz=InStr(ks,LStr,SStr)
If wz=0 then
StrLen=""
else
StrLen=Mid(LStr,ks,wz-ks)
ks=wz+2
end if
Next
End Function
这是我编写的函数,彼此共享。
aaadfgfga||bfgbbb||ccdfgsgcc||dsfdfdsf||...||
为了实现读取"||"之间的内容,我编写了如下代码
'SStr:表示分隔字符串,LStr:表示要搜索的字符串,i:表示要取第几段字符串
Function GetStr(SStr,LStr,i)
dim ks,js,cd,wz,j'ks:表示开始,JS:计数,cd:长度,wz:位置,j:循环变量
cd=Len(LStr)
ks=1
For j=1 to i
wz=InStr(ks,LStr,SStr)
If wz=0 then
StrLen=""
else
StrLen=Mid(LStr,ks,wz-ks)
ks=wz+2
end if
Next
End Function
这是我编写的函数,彼此共享。
相关文章
- 夸克如何屏蔽网页小广告-夸克网页小广告屏蔽技巧 02-09
- 四级成绩查询-中国教育考试网四六级查分入口 02-09
- 拼多多先用后付最迟多久付款-拼多多先用后付额度如何查看 02-09
- 喵呜漫画app下载安卓版安装包-喵呜漫画App官方正版入口免费下载 02-09
- 四六级成绩查询-中国教育考试网查分入口 02-09
- 女神漫画免费下载最新版本动漫入口页面-女神漫画在线观看安装包动漫入口 02-08