vb字符串字符的起始位置
展开全部
Dim str As String
Private Sub Form_Load()
str = InputBox("请输入一段话", "字符串")
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text2.Text = InStr(str, Text1.Text)
End If
End Sub
下面是运行结果：
谢谢。
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
x=InStr(s, "abc")
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
x=InStr("xxxxabcxxx", "abc")
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
