Visual Basic

With txtLogin
    .SelStart = 0
    .SelLength = Len(.Text)
    .SetFocus
End With

<br />
With txtLogin<br />
    .SelLength = 0<br />
    .SelStart = len(.Text)<br />
    .SetFocus<br />
End with<br />

Option Explicit On
Option Strict On

Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, _
                              ByVal e As System.EventArgs) Handles Button1.Click
        For Each str As String In TestFunction()
            MessageBox.Show(str)
        Next
    End Sub

    Private Function TestFunction() As String()
        Dim ReturnArray(1) As String
        ReturnArray(0) = "TestString"
        ReturnArray(1) = "Another String"
        TestFunction = ReturnArray
    End Function
End Class