saradaさん、こんにちは。

これでどうですか？

１．グローバル構造体を作成。
　変数は string型の変数、\"s_wk[]\"をひとつ宣言し、名前を付けて保存(struc_wk)。

２．画面Ａから画面Ｂを起動する時に以下のコーディングをする。
　struc_wk lstruc_wk

　OpenWithParm( 画面Ｂ, lstruc_wk, 画面Ａ )

　lstruc_wk = message.PowerObjectParm   <-- これで戻り値を取得

　Messagebox(\'\', lstruc_wk.s_wk[1] )    <-- ここで\"戻り値1\"が表示されればOK
　Messagebox(\'\', lstruc_wk.s_wk[2] )    <-- ここで\"戻り値2\"が表示されればOK

３．画面Ｂを閉じる時に以下のコーディングをする。（画面Ｂはレスポンスで。）
　struc_wk lstruc_wk2
  lstruc_wk2.s_wk[1] = \"戻り値1\"
  lstruc_wk2.s_wk[2] = \"戻り値2\"

　CloseWithReturn( 画面Ｂ, lstruc_wk2 )

でどうでしょう？