99问答网
所有问题
在vb程序设计中,如何在一个给定的字符串中查找某个字符第一次出现的位置?
如题所述
举报该问题
推荐答案 2013-03-29
InStr 函数 返回 Variant (Long),指定一字符串在另一字符串中最先出现的位置。语法 InStr([start, ]string1, string2[, compare])InStr 函数的语法具有下面的参数:部分说明start可选参数。为数值表达式,设置每次搜索的起点。如果省略,将从第一个字符的位置开始。如果 start 包含 Null,将发生错误。如果指定了 compare 参数,则一定要有 start 参数。string1必要参数。接受搜索的字符串表达式。string2必要参数。被搜索的字符串表达式。Compare可选参数。指定字符串比较。如果 compare 是 Null,将发生错误。如果省略 compare,Option Compare 的设置将决定比较的类型。
设置 compare 参数设置为:常数值描述vbUseCompareOption-1使用Option Compare 语句设置执行一个比较。vbBinaryCompare0执行一个二进制比较。vbTextCompare1执行一个按照原文的比较。vbDatabaseCompare2仅适用于Microsoft Access,执行一个基于数据库中信息的比较。
返回值如果InStr返回string1 为零长度0string1 为 NullNullstring2 为零长度Startstring2 为 NullNullstring2 找不到0在 string1 中找到string2 找到的位置start > string20
说明InStrB 函数作用于包含在字符串中的字节数据。所以 InStrB 返回的是字节位置,而不是字符位置。
温馨提示:答案为网友推荐,仅供参考
当前网址:
http://99.wendadaohang.com/zd/BzBjWvWe7.html
其他回答
第1个回答 推荐于2018-02-28
InStr函数:寻找
字符串
[格式]: P=InStr(X,Y) 从X第一个字符起找出Y出现的位置 P=InStr(n,X,Y) 从X第n个字符起找出Y出现的位置 [说明]: (1) 若在X中找到Y,则
返回值
是Y第一个字符出现在X中的位置。 (2) InStr(X,Y)相当于InStr(1,X,Y)。 (3) 若字符串长度,或X为空字符串,或在X中找不到Y,则都返回0。 (4) 若Y为空字符串,则返回0。
本回答被网友采纳
第2个回答 2013-03-28
Dim aa As String
aa = "123456789"
MsgBox InStr(1, aa, "3", vbTextCompare)
'从aa的第一位开始查找3出现的位置
本回答被网友采纳
第3个回答 2013-03-29
用函数:InStr([start, ]string1, string2[, compare]) 例:查找“ABCDEFG”中E的位置INSTR("ABCEFG","E")
第4个回答 2013-03-29
InStr从一个较大字符串chs中查找另一个字符ch1iStart = InStr(ch1, chs) ' iStart变量返回值
相似回答
在VB程序设计中
答:
Private Sub Command1_Click()Randomize '随机种子初始化Text1.Text = Int(Rnd() * 1000) '生成0-999之间的随机整数End Sub
VB程序设计1
:统计
在一个
文本框中各英文字母
出现的
次数
答:
for i=1 to len(text1) 遍历
字符串
各字母
出现的
次数的运算过程 Sub cisu(ByVal st, Suzu() As Integer)st = UCase(st) '转换成大写 i = Asc(st) - 65 If i >= 0 And i <= 25 Then Suzu(i) = Suzu(i) + 1 End Sub Private Sub Command1_Click()Dim Suzu(25) As Intege...
在Java
程序设计中,
String类
字符串的
基本操作有哪些?
答:
使用指定的字面值替换序列替换此字符串匹配字面值目标序列的每个子字符串
。 StringreplaceAll(String regex, String replacement)使用给定的 replacement 字符串替换此字符串匹配给定的正则表达式的每个子字符串。 StringreplaceFirst(String regex, String replacement)使用给定的 replacement 字符串替换此字符串匹配...
VB程序设计
:根据
给定的查找
值,在数组中找出与之相同的元素。
答:
dim a as int16 ' 给定值声明 可根据 自己 需要 设置不同类型 a = 5 ‘设定 给定值 dim b() as int16 ’检查有相同值的数组 dim c() as int16 ‘包含相同值的集合 for i as int16 = 0 to b.count -1 从0开始 b数组集合数量-1 if a(i) = i then ’判断 数组元素 与...
VB
创建
一个
应用
程序,
能将输入
的字符串
颠倒后输出
答:
1. 用StrReverse函数可以使
字符串
颠倒:str=StrReverse(string1) 2. 用mid函数:Private Sub Command1_Click()Dim a As Stringa = InputBox("请输入一
串字符
", "输入")For i = Len(a) To 1 Step -1Print Mid(a, i, 1);NextEnd Sub 本回答由提问者推荐 举报| 答案纠错 | 评论 12 6 xjnzhidao ...
vb程序设计
:根据
给定的查找
值,在数组中找出与之相同的元素
答:
Private Sub Command1_Click()Dim i As Integer Dim b As Long Dim s As String Dim f As Boolean b = Val(InputBox("请输入要
查找的
数!"))If b >= 10 And b <= 100 Then For i = 1 To UBound(a, 1)For j = 1 To UBound(a, 2)If a(i, j) = b Then s = s + "...
VB设计程序,在一个
文本框输入一
串字符
(大于2个),点击处理按钮取
字符串的
...
答:
Private Sub Command1_Click() Label1.Caption = IIf(Len(Text1) > 2, Left(Text
1,
1) & Right(Text1, 1), "")End SubPrivate Sub Form_Load() Text1 = "abcde"End Sub
VB程序设计
:
设计程序,
窗体上包含
一个
文本框和一个标签,当在文本框输...
答:
Private Sub Text1_Change()s = Text1 Label1 = Len(s)End Sub
《
VB程序设计
》
答:
Data1.DatabaseName = "D:\DATABASE\STUDENT.MDB" Data1.RecordSource = strSQL Data1.Refresh】 60.
在VB中
何时用WTTH语句?方法?【WITH语句主要用在控件对像多属性设置时
,在一个
单一对象或一个用户定义类型上执行一系列的语句。With 语句可以对某个对象执行一系列的语句,而不用重复指出对象的名称 】★《信息...
大家正在搜
两个字符串连接的C语言程序设计
程序设计用函数实现字符串的复制
c语言程序设计编程题复制字符串
指向字符串的指针程序设计
c语言程序设计字符串
c语言程序设计字符串用什么输入
字符串正反连接程序设计
vb程序设计编写程序题
vb程序设计的主要特点是什么
相关问题
在某字符串中查找子字符串第一次出现的位置
VB查找字符串中数字第一次出现的位置
在VB中,怎样寻找一个字符串中的第N个指定字符的位置
建立一个工程,在一个给定的字符串中查找某个指定字符第一次出现...
在VB中用哪个函数可以找出一个字符串中某一个字符的位置
编写一个程序,在已知字符串查找某个字符首次出现的位置,若字符...
查找字符串中给定字符首次出现的位置
indexof定位字符串中某一个指定的字符首次出现的位置问题...