sammenlign med noget af en string (vba)

if left(arr(i),3) = "trk" then msgbox ("yes")

If InStr(arr(i), "trk") = 1 Then msgbox ("yes")

plx > så er placeringen af"trk" jo ligegyldig og ikke nødvendigvis i starten

Jeg ved nu ikke, den evaluerer vel kun til true, hvis trk er på position 1

du har ret, sorry

ellers skal det vel bare være sådan..

  Const TextCompare = 1
  If InStr(1, arr(i), "trk", TextCompare) > 0 Then
    MsgBox ("yes")
  End If

If arr(i) Like "trk*" Then MsgBox "yes"

Med

Left()
Right()
Len()
Mid()
InStr()
InStrRev()
Trim()
Ltrim()
Rtrim()
LCase()
UCase()
Split()

kan du gøre ALT med strenge.

Læs om dem i hjælpen...

Hvis du bare skal tjekke om de tre første tegn er "trk", ville jeg bruge:

  If left(trim(arr(i)),3) = "tri" Then
    Msgbox "Yes"
  End if

Ovenstående er Case Sensitive. Er det ligemeget med store/små bogstaver, så brug

  If Lcase(left(arr(i),3)) = "tri" Then
    Msgbox "Yes"
  End if

Skal eventuelle mellemrum først i din string desuden fjernes, brug

  If Lcase(left(ltrim(arr(i)),3)) = "tri" Then
    Msgbox "Yes"
  End if

Og skift "tri" ud med "trk" ;o)

Jeg vrøvler. Glem ovenstående 2 indlæg. Læs dette:

Med

Left()
Right()
Len()
Mid()
InStr()
InStrRev()
Trim()
Ltrim()
Rtrim()
LCase()
UCase()
Split()

kan du gøre ALT med strenge.

Læs om dem i hjælpen...

Hvis du bare skal tjekke om de tre første tegn er "trk", ville jeg bruge:

  If left(arr(i),3) = "tri" Then
    Msgbox "Yes"
  End if

Ovenstående er Case Sensitive. Er det ligemeget med store/små bogstaver, så brug

  If Lcase(left(arr(i),3)) = "tri" Then
    Msgbox "Yes"
  End if

Skal eventuelle mellemrum først i din string desuden fjernes, brug

  If Lcase(left(ltrim(arr(i)),3)) = "tri" Then
    Msgbox "Yes"
  End if