Capital Letters

[Taftheman]

Hi i have a program which collects the first letter of a surname depending on what the user typs i search for it in the database and display it, on the same form i have a tab filter, sorted by letters. It all works the only problem i have is if the users potentially typa "a" instead of "A" i need to capitalise it

is there a function in vb6 i can use

[GoHokies95]

I've used this in the past. It initializes the first letter of each word in a string:

  ' Init Caps - Make First Letter Of All Words Capitalized.
  Public Shared Function InitCaps(ByVal text As String) As String
    Dim c() As Char = text.ToCharArray()
    Dim MakeUpper As Boolean = True
 
    For i As Integer = 0 To UBound(c)
      If MakeUpper Then
        If Char.IsLetter(c(i)) Then
          c(i) = Char.ToUpper(c(i))
          MakeUpper = False
        End If
      Else
        If (Char.IsWhiteSpace(c(i))) Or _
           (c(i).Equals(".".ToCharArray()(0))) Or _
           (c(i).Equals("_".ToCharArray()(0))) Or _
           (c(i).Equals("""".ToCharArray()(0))) Then
          MakeUpper = True
        Else
          c(i) = Char.ToLower(c(i))
        End If
      End If
    Next
    Return New String(c)
  End Function
 

[Killer42]

...It all works the only problem i have is if the users potentially typa "a" instead of "A" i need to capitalise it

is there a function in vb6 i can use

Yes. It's the Ucase() function.

For more complex conversions, check out the StrConv() function.

[Killer42]

I've used this in the past. It initializes the first letter of each word in a string: ...

I hate to be the one to break it to you, but the StrConv function does that in one statement. At least, according to the online help it does.