|
* 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.
1. 액세스 버전(95,97,2000,2002):2000
2. 윈도우즈의 버전(win95,win98,winME,winNT,win2000,winXP):
3. CPU (486,PentiumI/II/III/IV...):
4. RAM (32,64,128,256,512MB,1G...):
* 아래줄에 질문을 작성하세요 >>
폼이 두개있습니다.(A폼과 B폼)
두 폼 모두 디자인보기로만 테이블에 바운드되지 않고 만들고
두 폼 모두에 같은이름의 콤부상자를 하나씩 만들었습니다.
그리고 A폼에는 고객 목록상자를 하위폼으로 구성하고
B폼에는 고객폼(탭형식)으로 하위폼으로 구성할려고 합니다.
이 두폼을 한 폼안에 넣고 이두개사이에 >버튼을 만듭니다
왼쪽목록상자에서 선택을 하고 >버튼으로 오른쪽 고객폼에 레코드를 이동시키는 그런걸 만들려고 합니다.
먼저 이런것을 할려고 하니까 목록상자와 콤보상자에 대해 잘 알아야 될 것 같더군요
그래서 도움말에 목록상자를 찾아서 속성에 대해 좀 보고 다음과 같은 코드로 함 써봤습니다.
set ctlList = [forms]![A]![고객폼]![고객이름]
For Each varItem in ctlList.ItemSelected
var고객() = ctlList.ItemData(varItem)
Next varItem
For i = 1 to 고객이름.ListCount
str1 = "select * fromr 고객테이블 where 고객이름 = '" & var고객(i) & "'"
str1 = "insert into 이름, 나이, 성별,..... values(str1)"
이렇게 할 것 같은데
그 다음부터는 잘 생각이 안나네요
부탁드려요
|
|