[VB] VB6.0 에서 vaSpread 행, 열 추가 삭제 하기 feat. action

VB6.0 은 굉장히 구식이지만 실무에서 쓰기엔 여전히 적절하기 때문에 아직도 쓰고 있습니다.

그 컴포넌트 중 vaSpread 라고 VB 상에서 엑셀 형식의 스프레드시트를 구현해주는 컴포넌트가 있는데, 옛날 것이라서 그런지 컨트롤에 조금 불편한 부분이 있습니다. 특히 열이나 행을 추가, 삭제 할 때 말이죠.

vs.action

기본적으로 제공하는 기능에 아무리 찾아 봐도 AddCol 이나 DeleteRow 같은게 없기 때문에 자칫하면 행, 열을 추가, 삭제 할 때 루프문을 돌리는 참사가 있을 수 있습니다. vs 는 이 기능을 위해 action 이라는 명령을 제공합니다.

예제: 열 삭제 하기

열을 삭제하기 위해서는 action = 5 를 사용하면 됩니다.

With vs
  .Row = .ActiveRow
  .action = 5
  .MaxRows = .MaxRows - 1
End vs

먼저 사용자가 클릭한 열(ActiveRow)을 타겟으로 지정합니다. 그러고 나서 5번 Action, 즉, Delete Row 명령을 실행해 줍니다. 그러면 열의 컨텐츠가 삭제 되면서 그 밑에 있던 열들의 데이터가 모두 한 줄씩 위에 위치합니다. 하지만 전체 열의 갯수(MaxRows)는 줄어 들지 않기 때문에 한 줄 줄여 줍니다.

귀찮게 루프문 돌리지 말고 편하게 행, 열을 추가, 삭제 해보도록 합시다.

vaSpread 의 더욱 자세한 사항은 아래 웹페이지를 참고 하세요(일본어로 되어 있지만 대충 보면 뭔지 압니다).

Action プロパティ一覧