web-dev-qa-db-ja.com

vb6を使用してtext1にtext2が含まれているかどうかを確認する方法

Vb6を使用してtext1にtext2が含まれているかどうかを確認する方法

Dim text1 as string
Dim text2 as string

text1 = "hello world I am Anas"
text2 = "Anas"

if (check if text2 is in text1) 'the result should be true or false
vb6
14
faressoft

次のように InStr 関数を使用できます。

Dim position As Integer

position = InStr(1, stringToSearch, stringToFind)

If position > 0 Then
  ' text is inside
Else
  ' text is not inide 
End If
25
Sarfraz

InStr を使用：

If InStr(text1, text2) > 0 Then
15
Oded

これでうまくいくはずです：

if (InStr(text1, text2) > 0)

http://msdn.Microsoft.com/en-us/library/8460tsh1（v = vs.80）.aspx をチェックして、特殊なケースがないか確認してください（パラメーターがNothing、空の文字列など）

5
Larsbj
RTM = InStr(1, text1,text2)

if RTM > 0 then debug.print "Text2 was found at position: "; RTM
2
horatio