Consulte el recurso utilizando la variable de cadena vb.net

Dim ResourceName As String = TextBox1.Text
Dim ResourceContents As String = My.Resources.ResourceManager.GetObject(ResourceName)
RichTextBox1.Text = ResourceContents
Dizzy Dolphin