s="张某-陕西西安-205房间"
s=strreplace(s, "-", "")
Dim aa As String
Dim t As Integer
aa = "张某-陕西西安-205房间"
t = InStr(1, aa, "-")
MsgBox Left(aa, t - 1)
t = InStr(t + 1, aa, "-")
MsgBox Right(aa, Len(aa) - t)本回答被提问者采纳
举例：
Dim S() as String
S = Split("张某-陕西西安-205房间", "-")
Debug.Print S(0) & S(2) '结果是 张某205房间
VB如何截取指定字符?
expression 必需的。字符串表达式，包含要替换的子字符串。find 必需的。要搜索到的子字符串。replacewith 必需的。用来替换的子字符串。start 可选的。在表达式中子字符串搜索的开始位置。如果忽略，假定从1开始。count 可选的。子字符串进行替换的次数。如果忽略，缺省值是 –1，它表明进行所有可能的...
vb如何截取字符串中的指定字符
理论上来说，使用VB的DHTML处理更简单，但是代码难理解，所以我设计以下代码。HTML文件（或者是XML文件，类似）中一般都是<String>ajhjahjsdh<\/String> 或者换行写 <String> ajhjahjsdh <\/String> 可以使用以下算法 定义状态 c 0-什么也没有 1-找到开头的〈2-找到开头的〉3-找到后面的〈4-找到后面...
VB 用MID截取指定字符
dim str1 as string,str2 as string str1="2" '可以用变量代替此字符串 str2=mid(str1,20,1) 'str2就是截取的字符,20代表位置，1代表截取的字符个数
VB程序设置问题:如何提取指定字符串之前的字符串
1、使用Left$(string, length)函数（Left$也可以用Left替换，string字符串、length截取的长度）和InStr([start,] string1, string2 [, compare])（start起始位置、string1字符串、string2要搜索字符串、compare：0使用二分搜索、1区分大小写）函数Left$("123456", Instr("123456", "56")) 2、VB...
VB截取指定的字符串
可以用字符串替换函数：s="张某-陕西西安-205房间"s=strreplace(s, "-", "")
vb怎么截取指定的字符串的一部分?
Private Sub Command1_Click()For i = 1 To Len(Text1.Text)s = Mid(Text1.Text, i, 1)If IsNumeric(s) Then t = t & s Next i Label1 = t End Sub
vb 特定截取字符串?
Public Function GetSimpleFileName(varFileName As String) As String'从完整的文件名获取“单纯”的文件名：去掉路径以及后缀。'文件名可以没有后缀名（包括有点号没有后缀的情况），但如果有，则最后一个点号必须是后缀分隔符Dim nPos As LongDim str1 As String str1 = StrReverse(Trim(varFi...
使用vb截取字符串中的特定内容
Private Function ReplaceA_B(Docs As String, A_ As String, B_ As String) As String ReplaceA_B = Docs Do While InStr(ReplaceA_B, A_)ReplaceA_B = ReplaceA_B_C(ReplaceA_B, A_, B_)Loop End Function Private Sub Command1_Click()Dim Strs As String Strs = "你好吗?ABC...
VB截取指定的字符串
VB截取指定的字符串 5 张某-陕西西安-205房间 我需要截取第一个“-”号前和第二个“-”后的字符,即结果:张某205房间请问用什么函数 匿名 | 浏览5326 次 |举报 我有更好的答案推荐于2017-12-16 15:45:05 最佳答案 我胡乱写了一段代码,请你参照一下 Dim aa As StringDim t As Integeraa = "张某...
VB问题--读取字符串中特定位置
在文本框中输入数字n1，然后通过代码定义一个字符串变量st1，其值为"\/25\/12\/98\/20\/36\/58\/65"。使用val函数将文本框中的文本转换为整数形式的n1。接着，使用Split函数将字符串st1按照"\/"分隔符进行分割，得到一个字符串数组x。再通过索引n1选取数组x中的特定字符串。字符串中有"\/"的个数等于数组...
