99问答网
所有问题
关于VB截取第一个遇到的某个(比如"\")前所有的字符
比如C:\AAA\BBB\CCC\文件名
文件名随时可能变动 我要取得除文件名以外的路径 我想是否可以截取从右边开始遇到的第一个"\"开始左边的所有字符串 是否有这样的函数 或者有什么更好的方法.谢谢!
举报该问题
推荐答案 2007-01-07
instrrev,得到从右边起第一个特定字符的位置,然后再用mid把这个字符前面的字符取出来
和instr的用法一样,
温馨提示:答案为网友推荐,仅供参考
当前网址:
http://99.wendadaohang.com/zd/WXjBveWz.html
其他回答
第1个回答 2019-09-18
private
sub
command1_click()
a
=
"sdasd\dsad\fefwe\fefew\fefwe\sadas\fegre\ds?cs"
b
=
mid(a,
len(a)
-
instr(1,
strreverse(a),
"\")
+
2)
msgbox
b
end
sub
相似回答
vb
中,这句话strPath = Left(Filepath, InStrRev(Filepath, "\...
答:
即:在
字符串
Filepath里,从右开始搜索子字符串"2"的位置,注意这个位置是从字符串Filepath里左起计算的.
VB
还有一个函数与InStrRev对应,即:InStr InStr函数是从主字符串的左边开始搜索子字符串,而InStrRev是从主字符串的右边开始搜索子字符串,所以上面的例子里尽管主串里有2个"2",如果用Instr...
VB字符串截取
,截取路径最后
一个
"\"后
的字符
?
答:
可使用Split函数来实现截取路径最后一个"\"后
的字符
。Split函数,返回一个下标从零开始的一维数组,它包含指定数目的子字符串。具体代码如下:Private Sub Form_Click() Dim ljStr As String ljStr = "C:\Program Files\Microsoft Visual Studio\
VB
98\ado" Debug.Print Split(ljStr, "\"...
VB
如何取
某个
路径最后
一个
"\"之后的文本?
答:
Debug.Print Right(Form1.Caption,Len(Form1.Caption)-InStrRev (Form1.Caption,"\"))
VB
InStr
(1
, inputfilename, "\",
1)
第三个参数是什么意思啊?望各位...
答:
InStr([start, ]string1, string2[, compare]) InStr 函数的语法有以下参数:参数描述start可选。数值表达式,用于设置每次搜索的开始位置。如果省略,将从
第一个
字符的位置开始搜索。如果 start 包含 Null,则会出现错误。如果已指定 compare,则必须要有 start 参数。string1必选。接受搜索
的字符串
...
vb
6.0如何判断
一个
文件名是否合法,如果判断是否含有非法
字符
,这样的...
答:
"\")mypos += InStr(1, nfm, ":")mypos += InStr(1, nfm, "*")mypos += InStr(1, nfm, """)mypos += InStr(1, nfm, ">")mypos += InStr(1, nfm, "<")mypos += InStr(1, nfm, "|")If mypos >= 1 Or lenn > 30 Then MsgBox "对不起文件长度超过30或含有非法字符"
vb
中if right$(strpath,
1)
<>"\" then strpath=strpath&"\"是什么意...
答:
right(string,length)是
VB的
内部函数,是返回string字符串右边的length个字符,其中string是
一个字符串
或字符串变量,length是个数(整数)if right$(strpath,1)<>"\" then 的意思是如果strpath字符串的最右边的一个字符不等于'\',是真,strpath=strpath&"\"在字符串strpath的后面加字符'\'。
求目前
所有vb
用语
答:
1、 Int(x):求不大于自变量x的最大整数 2、 Fix(x):去掉一个浮点数的小数部分,保留其整数部分 3、 Hex$(x):把一个十进制数转换为十六进制数 4、 Oct$(x):把一个十进制数转换为八进制数 5、 Asc(x$):返回
字符串
x$中
第一个字符
的ASCII字符 6、 CHR$(x):把x的值转换为相应的ASCII...
VB
正则表达式("
((
-)?\d+(.)?\d*)")是表示什么意思?只匹配数字吗?其中的...
答:
("((-)?\d+(.)?\d*)")'最外层 首先是引号引着的 ((-)?\d+(.)?\d*) 直接去
括号
(
-)?\d+(.)?\d (-)? 代表 0-1 个 - 号 \d+ 代表 1个以上数字 (.)? 代表 0-1个 除换行号以处的任意字符 \d* 代表 0-N 多次的数字 给你一个小工具 自己写的 学习...
" & Replace(username,"'","''"
)
&
"
答:
vbTextCompare 1 执行文字比较。
vb
DatabaseCompare 2 仅用于Microsoft Access。基于您的数据库的信息执行比较。返回值 Replace的返回值如下:如果 Replace返回值 expression长度为零 零长度
字符串(
"")。expression为Null 一个错误。find长度为零 expression的复本。replacewith长度为零 expression的复本,其中删除...
大家正在搜