Question

VB中如何判断一个字符串，是否等于某个值

dim file() as string
file(0)=word
file(1)=rft
file(2)=excle
如何判断哪个file等于word

Answer 1

你的字符串没有加引号

追问

失误，求帮助啊

追答

那不就解决了吗？
除非你是vb没有入门，否则还有什么需要教你的呢？
---------------------
Dim File(100) As String

Private Sub Form_Load()
File(0) = "1"
File(1) = "22"
File(2) = "dd"
MsgBox (FindString("dd"))
End Sub

Private Function FindString(ByVal S As String) As Integer
Dim I As Integer
Dim Index As Integer
Index = -1
For I = 0 To UBound(File) - 1
If File(I) = S Then
Index = I
Exit For
End If
Next
If Index = -1 Then
MsgBox ("没有找到" & S)
End If

FindString = Index
End Function

Answer 2

Dim file(3) as string '如果定义动态数组,在使用Redim定义元素个数以前是不能赋值的.
file(0)="word"
file(1)="rft"
file(2)="excle"
Dim i As Integer
For i = LBound(file) To UBound(file)
If file(i) = "word" Then
Debug.Print i
Exit For
End If
Next

Answer 3

Select Case file
case word
End Select