철도요금 시트의 1번째 행의 값 목록이
'AAA,새마을,특실,2,36000'(정답)이 아닌
'AAA,새마을,특실,2,0'(오답)입니다.
라고 채점프로그램에서 나왔는데
어느부분이 틀린건지 잘 모르게써ㅛ
요금이 계산 되지 않네요.
Private Sub cmd등록_Click()
참조행 = lst열차종류.ListIndex
입력행 = [a3].Row + [a3].CurrentRegion.Rows.Count
Cells(입력행, 1) = txt번호
Cells(입력행, 2) = lst열차종류.List(참조행, 0)
Cells(입력행, 3) = lst열차종류.List(참조행, 1)
Cells(입력행, 4) = txt매수
Cells(입력행, 5) = lst열차종류.List(참조행, 2) * 매수
매수가 아니라 txt매수로 하셔야 결과가 제대로 나옵니다.
좋은 하루 되세요.
"-
*2012-01-27 09:46:40
요금이 계산 되지 않네요.
Private Sub cmd등록_Click()
참조행 = lst열차종류.ListIndex
입력행 = [a3].Row + [a3].CurrentRegion.Rows.Count
Cells(입력행, 1) = txt번호
Cells(입력행, 2) = lst열차종류.List(참조행, 0)
Cells(입력행, 3) = lst열차종류.List(참조행, 1)
Cells(입력행, 4) = txt매수
Cells(입력행, 5) = lst열차종류.List(참조행, 2) * 매수매수가 아니라 txt매수로 하셔야 결과가 제대로 나옵니다.
좋은 하루 되세요.
"