Há algum tempo eu abandonei a FlexGrid e só utilizo o ListView, para mim é melhor, mas se não me engano, no seu caso é assim:
Private Sub Grid_Click()
If Grid.Row < Grid.FixedRows Then
Exit Sub
End If
TxtBox1.Text = Grid.TextMatrix(Grid.Row,0)
TxtBox2.Text = Grid.TextMatrix(Grid.Row,1)
TxtBox3.Text = Grid.TextMatrix(Grid.Row,2)
TxtBox4.Text = Grid.TextMatrix(Grid.Row,3)
End Sub
Ou seja,
Para pegar o conteúdo da FlexGrid, use TextMatrix(linha,coluna)
Teste e veja se está certo.
Até mais.