IT정보/비주얼베이직38 [비주얼베이직] 입력 상자(inputbox) 사용하기 inputbox 는 대화 상자를 입력하고 받을 수 있는 기능이에요 이렇게 디자인해주세요 소스 Private Sub Command1_Click() '커맨드 버튼 Dim 메세지 As String 'input 입력하고 받을 변수 메세지 = InputBox("이름이모니?", "제목") Label1.Caption = 메세지 '라벨에표시 End Sub 커맨드 버튼을 눌러보세요 완성 ㅋㅋ 이상으로 비주얼베이직 입력 상자(inputbox) 사용하기 포스팅을 마치겠습니다. 2011. 7. 30. [비주얼베이직] Timer 사용하기 (스톱워치 만들기) 이렇게 디자인해주세요 일반을 눌러 전역변수를 선언해주세요 Dim start As Date 소스 Dim start As Date '전역변수 Private Sub Command1_Click() start = Time '변수사용 Timer1.Enabled = True '작동 End Sub Private Sub Command2_Click() Timer1.Enabled = False '중지 End Sub Private Sub Form_Load() Timer1.Interval = 1000 '타이머 1초 End Sub Private Sub Timer1_Timer() Text1.Text = Format(start - Time, "hh:mm:ss") 'Format 함수사용 End Sub 실행해보겠습니다 정상작동되네요 글.. 2011. 7. 28. [비주얼베이직] 리스트박스(ListBox) 사용하기 리스트박스는 콤보박스와 추가하는방식이 똑같으니 생략하고 리스트박스를 이용한 프로그램을 제작해보겠습니다 이렇게 디자인 해주세요 Text1을 공백으로 해주시구요 ㅎ 소스 Private Sub Command1_Click() '추가버튼 List1.AddItem Text1.Text '리스트1에 새 항목을 추가한다 Text1.Text = "" Text1.SetFocus End Sub Private Sub Command2_Click() '삭제버튼 List1.RemoveItem List1.ListIndex '리스트1에 항목을 삭제한다 End Sub F5을 눌러 실행해주세요 텍스트 란에 글을 입력후 추가를 눌러주시면 리스트박스로 추가됩니다 리스트박스에 불필요한것을 클릭후 삭제 버튼을 눌러봅시다 삭제가 정상적으로 되지요?.. 2011. 7. 28. [비주얼베이직] 콤보박스(Combobox) 사용하기 이번 강의에는 콤보박스를 이용해서 프로그램을 작성해보겠습니다 이렇게 디자인해주세요 콤보박스1을 클릭후 속성창 List 부분에 목록을 클릭해서 CPU, HDD, RAM 을 추가해주세요 콤보1을 눌르면 리스트에 추가한것들이 뜨지요? 콤보1을 더블클릭하신후 Click으로 바꿔주세요 소스 Private Sub Combo1_Click() Combo2.Clear '콤보박스2의 모든 항목을 삭제한다 If Combo1.Text = "CPU" Then '만약 콤보1 CPU를 클릭했을때 Combo2.AddItem "펜티엄" '콤보2 항목선택으로 표시된다 Combo2.AddItem "펜티엄2" Combo2.AddItem "펜티엄3" ElseIf Combo1.Text = "HDD" Then Combo2.AddItem "8.4.. 2011. 7. 28. [비주얼베이직] 기존의 커맨드버튼은 가라 (이즈버튼, 캔디버튼) 기존의 커맨드버튼은 너무 식상하죠? 기존의 커맨드버튼보다 새로운 간지나는 그런 버튼을 써보겟습니다. 하단에 설명, 다운로드 파일 첨부하였습니다. 이즈버튼 : 이즈버튼은 생긴게 다 비슷하게 생긴것도 있고 약간 특이하게 생긴것도 있지요? 이즈버튼은 클릭할때 다른 버튼과 달리 이팩트 형식으로 나타납니다. 캔디버튼 : 커맨드 버튼과 달리 깔금한게 특징입니다. 이즈버튼, 캔디버튼 적용하는방법 비주얼베이직을 실행해주세요 실행시켰으면 컨트롤 + D 를 눌러 파일을 추가해야되요 위에 받은 파일을 불러와주세요 캔디버튼을 추가해주셨으면 이렇게 도구툴바에 추가됩니다. 클릭하셔서 만드시면됩니다. 이즈버튼을 불러와주세요 이즈버튼은 캔디버튼과 달리 여러가지 모양을 추가하실 수 있습니다. 우선 이즈버튼을 추가해주세요 그후 이즈버튼.. 2011. 7. 27. [비주얼베이직] 플래시, 브금 등 Swf 파일을 재생해보자 비주얼베이직을 실행해주시구요 비주얼베이직 ㅇ응용 컨트롤 + T 또는 프로젝트 - 구성요소 를 클릭해주세요 비주얼베이직으로 여러가지폼을 실행해주세요 구성요소에서 Shockwave Flash 를 체크후 적용을 눌러주세요 툴바에 플래시 모양이 생겼지요? 클릭해서 폼에 그려주세요 이렇게 플래시모양을 눌러 폼에 그리셨지요? 소스 ShockwaveFlash1.Movie = "주소" 입니다.비주얼베이직 플래시 짤방을 올려보겠습니다. 완성 비주얼베이직 Flash 을 응용해서 브금, 플래시게임 같은것도 하실 수 있겠죠? 비주얼베이직 이만 강의 마치겠습니다. ※ ShockwaveFlash 는 컴파일은 잘 되지만 프로젝트저장 오류납니다. 참고해주세요 2011. 7. 25. 이전 1 2 3 4 5 ··· 7 다음
