HSPTV!掲示板

教えてください。
作成しようとしているデータは、リストボックスから項目を選んだ後に 1つの　combox　に
追加しようとしています。しかし下記データは、選択毎に　combox　が増えてしまいます。
教えてください。

// リストボックス項目文字列取得サンプル (by Kpan)

; 文字列が返る変数用の領域をあらかじめ確保
sdim listbox_text

objsize 100

listbox a, 60, "蟷螂\n甲虫\n蟋蟀\n蜻蛉\n飛蝗\n蜘蛛"
hListbox = objinfo(stat, 2)

button "こんちゅう", *check
stop


*check
; 特定の項目の文字列を取得 (LB_GETTEXT)
; 第3パラのwparam値にインデックス番号(0〜)、
; 第4パラのlparam値に取得した文字列を入れる変数ポインタを指定

sendmsg hListbox, $189, a, varptr(listbox_text)

combox b,100,""+listbox_text

自分もかなり初心者なのですがこんな感じじゃダメでしょうか?

// リストボックス項目文字列取得サンプル (by Kpan)

 ; 文字列が返る変数用の領域をあらかじめ確保
sdim listbox_text
kioku=""
 objsize 100
b="蟷螂\n甲虫\n蟋蟀\n蜻蛉\n飛蝗\n蜘蛛"
 listbox a, 60,b

 button "こんちゅう", *check

 combox c,100,""
 objid=stat ;オブジェクトIDを記憶
 stop
*check
	notesel b //bに入っている文字列を呼び出す
	noteget d,a //bに入っている変数からa行目をdに入れる
	kioku=""+kioku+""+d+"\n"
	objprm objid,kioku

comboxが表示中かどうかのフラグを作って
処理を分岐させればいいと思います。

// リストボックス項目文字列取得サンプル (by Kpan)

; 文字列が返る変数用の領域をあらかじめ確保
	sdim listbox_text
	
	objsize 100
	listdata = "蟷螂\n甲虫\n蟋蟀\n蜻蛉\n飛蝗\n蜘蛛"
	a = 0
	listbox a, 60, listdata : lb_ID = stat
	hListbox = objinfo(stat, 2)
	cb_flag = 0		;	comboxが表示中かどうかのフラグ
	
	button "こんちゅう", *check
	stop

*check
; 特定の項目の文字列を取得 (LB_GETTEXT)
; 第3パラのwparam値にインデックス番号(0〜)、
; 第4パラのlparam値に取得した文字列を入れる変数ポインタを指定

	;	listboxから選択した項目を取得しcombox用の文字列に追加
	notesel listdata
	noteget getlist, a
	notesel combdata
	noteadd getlist
	
	;	comboxが非表示なら表示、表示中なら内容を書き換え
	if cb_flag = 0 {
			b = 0
			combox b,100,combdata :	cb_ID = stat
			cb_flag = 1
		} else {
			objprm cb_ID, combdata
			objprm cb_ID, 0
		}
	
	objsel cb_ID	;	comboxにフォーカスを移動

返答遅くなり申し訳ありません。
Evolさん、同じ初心者ながらのご回答ありがとうございます。
ありさん、ありがとうございました。

また、作ってみたいと思うものがこれに肉付けが必要なので、
いろいろ試していきたいと思います。