'비주얼베이직'에 해당되는 글 22건

  1. 2011.09.09 [비주얼베이직] 메뉴 편집기(드롭다운) 사용하기 (7)
  2. 2011.08.17 [비주얼베이직] 리스트뷰(Listview) 사용하기 - (2) (4)
  3. 2011.08.17 [비주얼베이직] 리스트뷰(Listview) 사용하기 - (1) (3)
  4. 2011.08.01 [비주얼베이직] 파일 관련 컨트롤 사용하기 (12)
  5. 2011.07.30 [비주얼베이직] 입력 상자(inputbox) 사용하기 (7)
  6. 2011.07.28 [비주얼베이직] Timer 사용하기 (스톱워치 만들기) (15)
  7. 2011.07.28 [비주얼베이직] 콤보박스(Combobox) 사용하기 (6)
  8. 2011.07.25 [비주얼베이직] 플래시, 브금 등 Swf 파일을 재생해보자 (16)
  9. 2011.07.16 [비주얼베이직] (문법) For문 다중 반복문 사용하기 (24)
  10. 2011.07.11 [비주얼베이직] (문법) 단일반복문, For문 (1)
  11. 2011.07.11 [비주얼베이직] (문법) Select Case문 (문자로 결과 계산) (3)
  12. 2011.07.11 [비주얼베이직] (문법) 조건 판단하기 (3)
  13. 2011.07.10 [비주얼베이직] (문법) 데이터형 변환하기 (2)
  14. 2011.07.10 [비주얼베이직] (문법) 문자 결합 연산자 사용하기 (4)
  15. 2011.07.09 [비주얼베이직] (문법) 변수란 무엇인가? (11)
  16. 2011.07.01 [비주얼베이직] 프로그래스바(ProgressBar), 진행바 (9)
  17. 2011.06.14 [비주얼베이직] 웹브라우저 컨트롤 사용하기 (4)
  18. 2011.06.06 [비주얼베이직] Kill문 , 파일삭제를 해보자 (4)
  19. 2011.06.04 [비주얼베이직] 아이콘만들기, 아이콘제작 프로그램
  20. 2011.05.28 [비주얼베이직] form1 에서 form2 넘어가기 (5)
  21. 2011.05.28 비주얼베이직6.0 다운로드 (52)
  22. 2011.05.25 [비주얼베이직] 커맨드버튼 이름 변경하기

프로그램을 다운받아 실행해보다 보면 이렇게 메뉴가 있는 프로그램을 보신적 있으실겁니다. 

이렇게 메뉴를 만드는 방법을 알려드리겠습니다.


비주얼베이직 프로젝트를 시작하고 [도구] - [메뉴 편집기]를 클릭해주세요


메뉴 편집기창이 생성되었습니다. 각각 메뉴 편집기의 기능을 설명해드리겠습니다.

Caption - 메뉴에 표시되는 이름

Name - 메뉴 항목을 구분하는 이름, 실제 동작이 수행되는 이벤트의 이름 (대충써도 무관)

ShortCut - 각 명령에 대한 바로 가기 키

Checked - 확인 표시줄 메뉴 항목 왼쪽에 표시

Enabled - 메뉴 항목을 흐리게 표시

Visible - 메뉴를 표시하거나 숨김

화살표 - 메뉴의 단계를 이동

이렇게 기능을 설명해드리니 이해가 가실꺼에요



Caption 이름에 파일이라고 입력해보았어요 글자 뒤에 (&) 기호를 삽입하면 바로 가기 키로 손쉽게 사용가능 합니다.

이렇게 입력하셨으면 다음을 눌러주세요



다음을 눌렀으면 이렇게 메뉴를 이어서 작성이 가능합니다.



→ 라고 표시된 화살표를 눌르면 .... 이라고 표시됩니다. 이렇게 설정하시면 파일메뉴를 눌렀을때

하위로 내려오는 메뉴라고 보시면 됩니다.



저는 Caption에 종료하기라고 입력하고 다음을 누르겠습니다. 만약 파일메뉴를 누를경우 종료하기 버튼이

하위로 나타납니다. 그후 다음을 눌러주세요



종료하기라고 글쓴후 다음을 눌렀더니 .... 이 나오며 또 파일 하위부분을 추가하라고 뜹니다.

저는 더이상 파일부분에 하위메뉴를 나타나지 않을것 이므로 화살표 ← 버튼을 누르겠습니다.



이렇게 인터넷창 실행이라고 Caption에 입력하였습니다. 그후 다음을 눌러주세요



다음을 누르신후 화살표 → 를 눌러 하위메뉴를 작성해주세요


 

이렇게 네이버, 다음, 네이트 라는 하위메뉴를 만들었습니다. 추가로 Shortcut도 추가하였습니다.

이렇게 메뉴를 다 만드셨으면 확인 버튼을 눌러주세요



이렇게 저희가 원하는 메뉴가 작성되었습니다. 하지만 저 메뉴의 하위버튼을 눌러봐도 無반응 일겁니다.

소스를 입력을 해주셔야 버튼에 이벤트에 대한 동작을 수행하게 됩니다.



편집모드에서 파일 - 종료하기 버튼을 눌러주시면



소스창이 뜨며 아까 종료하기 버튼의 Name 이름이 표시되어 소스를 입력하시면 됩니다.



파일 종료소스인 Unload me 를 입력해보았습니다.



편집모드에서 인터넷창 실행 - 네이버, 다음, 네이트 부분을 클릭해주세요



이렇게 소스창에 shell문을 통해 인터넷창 실행 소스를 입력해주세요



이렇게 소스를 입력하신후 코드창을 닫아주세요 그 후 F5을 눌러 프로그램을 실행해 정상작동되는지 테스트 해주세요



이렇게 정상적으로 표시됩니다. 바로 가기 키도 정상적이네요.

여러분도 이런식으로 메뉴 편집기를 이용해서 프로그램을 더욱 멋지게 만들어보세요





Posted by 곰사랑

댓글을 달아 주세요

  1. 2011.11.23 15:55  댓글주소  수정/삭제  댓글쓰기

    비밀댓글입니다

  2. 나랑께 2012.06.07 15:57  댓글주소  수정/삭제  댓글쓰기

    네... 안녕하세요 6.9에 정보 올림피아드 대회에 나가는 1人 입니다,
    앞으로 포스팅 많이 해주세요.

  3. 지은이 2012.07.21 05:46  댓글주소  수정/삭제  댓글쓰기

    안녕하세요.
    비/베 프로그램을 공부를 하는 입문자입니다.

    메뉴 편집기에서 메뉴를 생성후에

    파일 윈도우 xp vista
    홈페이지 윈도우1 xp1 vista1
    저작권 윈도우2 xp2 vista2
    대하여..
    종료

    위와 같이 메뉴를 생성한후에 '윈도우' 메뉴 아래의 메뉴 '윈도우1, 윈도우2'에 대하여 소스를 적용하려고 합니다.
    단독으로 '윈도우1' 이라는 아래 메뉴에 대하여 소스 생성은 가능한데..
    '윈도우'
    '윈도우1'
    '윈도우2'
    로 해서 Case 0
    .
    .
    case 1
    .
    .
    Case2
    .
    .
    이렇게 정돈하는 방법을 알고 싶습니다.

    아래는 "윈도우1" 에 대한 예제입니다.
    하나만 클릭으로 적용하는건 가능한데..
    어차피 윈도우1이나 윈도우2는 같은 소스를 사용하기 때문에 문의 드립니다.

    Private Sub 윈도우1_Click(Index As Integer)
    On Error GoTo ErrorTrap

    Dim strFileName As String
    Dim strContents As String

    Dim strTarPath As String

    strTarPath = App.Path & "\map\1"
    If Len(Dir(strTarPath)) <= 0 Then
    strTarPath = App.Path & "\map\1"
    If Len(Dir(strTarPath)) > 0 Then
    MkDir strTarPath & "\1\"
    strTarPath = App.Path & "\map\1"
    End If

    End If
    Dim iFreeFile As Integer
    iFreeFile = FreeFile

    Select Case Index

    Case 20
    If Len(Dir(strTarPath & "79.exe")) > 0 Then Kill strTarPath & "79.exe"
    FileCopy strTarPath & "79-ef.exe", strTarPath & "79.exe"

    End Select

    If Len(Dir(strFileName)) <= 0 Then
    MsgBox cmdClick(Index).Caption & " 설정 실패", vbCritical, cmdClick(Index).Caption
    Exit Sub
    End If

    Open strFileName For Output As #iFreeFile
    Print #iFreeFile, strContents
    Close #iFreeFile

    MsgBox cmdClick(Index).Caption & " 설정 성공", vbInformation, cmdClick(Index).Caption
    Exit Sub

    ErrorTrap:
    MsgBox Err.Description, vbCritical
    End Sub

  4. bb 2012.08.22 03:28  댓글주소  수정/삭제  댓글쓰기

    2011년에 올린거라 운영하시는지는모르겟지만 하신다면 비주얼 정판 주시면안댐 ㅠㅠ?
    지식보니간 정품 아니면 exe 안만들어진다는데
    godqhrtmzhf@naver.com

  5. 2019.05.19 12:40  댓글주소  수정/삭제  댓글쓰기

    비밀댓글입니다

  6. 2019.05.19 12:49  댓글주소  수정/삭제  댓글쓰기

    비밀댓글입니다

이전 강의 이어서 강의합니다. 리스트뷰를 사용해서 이미지리스트를 출력하는작업을 하겠습니다.


빨간테두리(imageList)를 폼에 추가시켜주세요



이미지리스트에 마우스 오른쪽 속성을 눌러주세요



속성 페이지창이 뜨면 이미지 탭을 눌러 그림 삽입 버튼을 눌러주세요



그림 삽입 버튼을 눌러서 이미지를 불러와주세요

※ico 이외에 다른 이미지확장자는 출력이 안될 수도 있습니다. 즉 ico이미지를 이용해주세요


 

이렇게 그림을 삽입 해주신 후 확인을 눌러주세요


그후 원레 소스에 한가지를 추가시켜주세요 (빨간글씨 부분을 추가해주세요)

Private Sub Form_Load()
ListView1.ListItems.Add , , "천재", , 1
ListView1.ListItems(1).SubItems(1) = "바보"
ListView1.ListItems(1).SubItems(2) = "진리"

ListView1.ListItems.Add , , "짱구", , 2
ListView1.ListItems(2).SubItems(1) = "도라에몽"
ListView1.ListItems(2).SubItems(2) = "진구"

ListView1.ListItems.Add , , "철수", , 3
ListView1.ListItems(3).SubItems(1) = "이슬이"
ListView1.ListItems(3).SubItems(2) = "퉁퉁이"
End Sub


그리고 마지막으로 ListView에 마우스 오른쪽 버튼 속성을 눌러주세요



ListView 속성 페이지에서 이미지 목록 탭을 눌러서 small부분에 없음을 → ImageList1로 바꾸신후

확인버튼을 눌러주세요



F5을 눌러 실행해봅시다. 이미지리스트가 정상적으로 출력이 되었습니다.

이상으로 imageList 포스팅을 마치겠습니다.
Posted by 곰사랑

댓글을 달아 주세요

  1. Favicon of https://hiendedition.tistory.com BlogIcon spidey 2011.08.22 20:40 신고  댓글주소  수정/삭제  댓글쓰기

    비주얼베이직쓰면 HTML에도 적용할 수 있나용?

  2. Favicon of https://www.tisdory.com BlogIcon 철한자구/서해대교 2011.08.28 21:26 신고  댓글주소  수정/삭제  댓글쓰기

    오!! 저 크롬 로고이미지 아닌가요?

이번 강의에서는 리스트뷰를 알아보겠습니다.

리스트뷰란 표처럼 사용할 수 있고 잘 정리된 하나의 표라고 생각하시면 됩니다.



비주얼베이직을 실행시켜 주세요



컨트롤 + T 를 눌러 구성요소 창을 뛰어주신 후 Microsoft Windows Common Controls 6.0 을 추가시켜 주세요



툴바에 여러가지 기능들이 추가되었죠? 빨간테두리를 클릭해주신 후 폼에 그려주세요



이렇게 Listview를 폼에 그려주셨죠?



Listview에 마우스 오른쪽 속성을 눌러주세요



Listview속성을 누르시면 속성 페이지가 하나 뜹니다. 열 머리글 탭을 눌러주세요.

열을 추가하시려면 열 삽입을 눌러주세요 열 삽입을 누르시면 텍스트 입력창이 활성화 됩니다.



(Index1)  텍스트창에 추가하고 싶은 열을 추가하신 후 열 삽입을 눌러주세요



(Index2) 텍스트창에 2번을 추가해보겠습니다.



(Index3) 텍스트창에 3번을 추가해보겠습니다. 그 후 확인버튼을 눌러주세요



F5를 눌러 실행해보세요 음 아무 현상이 없죠? 한가지 빼먹은 것이 있습니다.



 

Listview1를 한번누르신 후 속성창에 View 부분에 3 - lvwReport로 바꿔주세요



F5을 눌러 실행해볼게요. 정상적으로 출력이 잘되죠? 이젠 행을 추가해봅시다.


소스
Private Sub Form_Load()
ListView1.ListItems.Add , , "천재"                     '리스트뷰에 글자를 추가한다
ListView1.ListItems(1).SubItems(1) = "바보"      '서브글자를 추가한다.
ListView1.ListItems(1).SubItems(2) = "진리"      '서브글자를 추가한다.

ListView1.ListItems.Add , , "짱구"                         '리스트뷰에 글자를 추가한다
ListView1.ListItems(2).SubItems(1) = "도라에몽"    '서브글자를 추가한다.
ListView1.ListItems(2).SubItems(2) = "진구"          '서브글자를 추가한다.

ListView1.ListItems.Add , , "철수"                      '리스트뷰에 글자를 추가한다
ListView1.ListItems(3).SubItems(1) = "이슬이"    '서브글자를 추가한다.
ListView1.ListItems(3).SubItems(2) = "퉁퉁이"     '서브글자를 추가한다.

End Sub



F5을 눌러 실행해보죠 소스입력한대로 정상적으로 출력되네요.

이젠 표처럼 구분선을 넣는방법을 알려드릴게요


 

ListView1 마우스오른쪽 속성을 누르시고 GridLines를 체크해주시고 확인을 눌러주세요

+ 추가로 Checkboxes를 추가하시면 체크박스가 생성됩니다.



F5을 눌러 실행시켜주세요 구분선이 추가되었죠? 이렇게 리스트뷰를 표처럼 사용하실 수 있습니다.

이어서 다음 강의해서는 리스트뷰를 이용해서 이미지리스트를 넣어보는 작업을 해보겠습니다.

Posted by 곰사랑

댓글을 달아 주세요

  1. Favicon of https://bestbest.tistory.com BlogIcon 파더J 2011.08.27 01:36 신고  댓글주소  수정/삭제  댓글쓰기

    잘보고갑니다....**

  2. Favicon of http://www.inet-m.com BlogIcon 아이넷엠컴 2012.03.19 18:05  댓글주소  수정/삭제  댓글쓰기

    비주얼베이직 영상처리 강좌가 무료로 개설되어져 있습니다.

    혹, 관심이 있으시다면.. 자료를 다운받아 두는 것도 좋다고 생각합니다.

    www.inet-m.com 입니다.

[비주얼베이직] 파일 관련 컨트롤을 사용해서 그림파일을 출력하고 그림파일을 불러오게 만들어보겠습니다.
비주얼베이직 파일
비주얼베이직을 실행시켜 주시고요

위처럼 디자인을 해주세요
비주얼베이직 파일실행하기
빨간테두리는 DriveListBox 이구요

파랑테두리는 DirListBox 이구요

노랑테두리는 FilelistBox 입니다.



그림파일 확장자를

출력하고 불러올꺼니 초록테두리 FilelistBox 부분을 눌르고 속성창에 Pattern 부분을 *.bmp;*.jif;*.jpg 로 변경해주세요



또 폼을 추가해주세요

폼추가방법 : 프로젝트 ▶ 폼추가
 

이렇게 폼추가하신후 픽쳐박스를 저렇게 그려주세요



소스
Private Sub Dir1_Change()     '//DirListBox
File1.Path = Dir1.Path            '//디렉토리를 표시한다.
End Sub
Private Sub Drive1_Change()      '//DriveListBox
Dir1.Path = Drive1.Drive             '//컴퓨터에 설치된 드라이브를 표시한다.
End Sub
Private Sub File1_Click()             '//FilelistBox //선택된 파일 목록을 표시한다.
Text1.Text = Drive1.Drive            '//드라이브 텍스트에 드라이브를 표시한다.
Text2.Text = Dir1.Path                '//디렉토리 텍스트에 디렉토리를 표시한다.
Text3.Text = File1.FileName(경로)     '//파일이름 텍스트에 파일목록을 표시한다.
Form2.Show      '//폼2를 연다.
경로 = Dir1.Path & "\" & File1.FileName        '//디렉토리에 파일를 변수선언한다.
Form2.Picture1.Picture = LoadPicture(경로)     '//폼2 픽쳐박스에 디렉토리 파일을 표시한다.
End Sub

예제파일




F5을 눌러 테스트 해봅시다.

디렉토리 부분에 .jpg 파일을 클릭해봅시다.



이렇게 표시되었습니다. 폼2부분에 픽쳐박스를 크게만드시면 사진파일도 크게나타납니다.


이상으로 [비주얼베이직] 파일 관련 컨트롤 사용하기 포스팅을 마치겠습니다.
Posted by 곰사랑

댓글을 달아 주세요

  1. cd730 2011.08.02 10:23  댓글주소  수정/삭제  댓글쓰기

    아님아아저
    그거
    그비주얼베이직프로그램으로만든거실행할시
    쉘문안에인터넷이있는거어떻게만드나요?강좌점요

  2. Favicon of https://hiendedition.tistory.com BlogIcon spidey 2011.08.02 13:15 신고  댓글주소  수정/삭제  댓글쓰기

    으잉? 이게 머지. ㅇ_ㅇa

  3. Favicon of https://www.tisdory.com BlogIcon 철한자구/서해대교 2011.08.02 21:46 신고  댓글주소  수정/삭제  댓글쓰기

    ㅋㅋㅋㅋㅋ 저도 언제 개인교습좀 해주세요 ㅎ

  4. 내가더초보임ㅠㅠ 2011.08.10 19:19  댓글주소  수정/삭제  댓글쓰기

    두번안눌러지네저가더초보임ㅜㅜ

  5. ㅇㅅㅇ 2012.01.15 10:47  댓글주소  수정/삭제  댓글쓰기

    c드라이버 다운로드 에다가 피파 스샷을 나둿는데요 안보이네요 .. 뭐가 잘못대엇남..

  6. Favicon of http://www.inet-m.com BlogIcon 아이넷엠컴 2012.02.20 10:06  댓글주소  수정/삭제  댓글쓰기

    수고많으십니다. www.inet-m.com 무료강좌가 오픈되었습니다. 참고하세요
    비주얼베이직6과 닷넷의 영상처리자료입니다.

  7. Favicon of http://un5450.blog.me BlogIcon 앜ㅋㅋㅋㅋㅋㅋㅋ 2012.05.31 20:03  댓글주소  수정/삭제  댓글쓰기

    앜ㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋ사진ㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋ ㅋㅋㅋㅋㅋㅋㅋㅋ 이사ㅋ진 낚시프로그램에 쓰면 좋을겈ㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋ


inputbox 는 대화 상자를 입력하고 받을 수 있는 기능이에요

이렇게 디자인해주세요



소스
Private Sub Command1_Click()     '커맨드 버튼
Dim 메세지 As String     'input 입력하고 받을 변수
메세지 = InputBox("이름이모니?", "제목")       
Label1.Caption = 메세지        '라벨에표시
End Sub


커맨드 버튼을 눌러보세요



완성 ㅋㅋ



이상으로 비주얼베이직 입력 상자(inputbox) 사용하기 포스팅을 마치겠습니다.

Posted by 곰사랑

댓글을 달아 주세요

  1. Favicon of https://www.tisdory.com BlogIcon 철한자구/서해대교 2011.07.30 21:01 신고  댓글주소  수정/삭제  댓글쓰기

    우왕!! 뭔말인지 모르겠어요 ㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋ

  2. Favicon of http://ㅋㅋ BlogIcon 와웈ㅋ 2011.10.03 16:06  댓글주소  수정/삭제  댓글쓰기

    ㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋ

  3. 1234 2012.01.04 19:32  댓글주소  수정/삭제  댓글쓰기

    폼이 없어도되네요

  4. 이쁜이 2014.02.05 13:59  댓글주소  수정/삭제  댓글쓰기

    아존나어렵다ㅠㅠ

 

이렇게 디자인해주세요


일반을 눌러 전역변수를 선언해주세요

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

실행해보겠습니다

정상작동되네요

글씨크기가 너무작네요? 늘려보겠습니다



텍스트박스를 한번클릭후 속성창에 Font 을 클릭해주셔서 글씨체, 글씨크기를 바꿔보세요



글씨크기 변경완료

더 깔끔하네요



스톱워치 예제


이상으로 [비주얼베이직] Timer 사용하기 (스톱워치 만들기) 포스팅을 마치겠습니다

Posted by 곰사랑

댓글을 달아 주세요

  1. 쌀과자 2011.07.28 20:39  댓글주소  수정/삭제  댓글쓰기

    그렇군 고맙습니다

  2. Favicon of https://www.tisdory.com BlogIcon 철한자구/서해대교 2011.07.28 20:43 신고  댓글주소  수정/삭제  댓글쓰기

    잉여스러운 스톱워치나 하나 만들어볼까요(!!)ㅋㅋ

  3. Favicon of https://hiendedition.tistory.com BlogIcon spidey 2011.07.30 11:31 신고  댓글주소  수정/삭제  댓글쓰기

    곰사랑님 프로그램 엄청 잘하시네요 :O

  4. Favicon of https://sosige.tistory.com BlogIcon Sosige 2011.08.09 09:57 신고  댓글주소  수정/삭제  댓글쓰기

    이열 이런것도 하다니 ㅋㅋ

  5. 2011.10.07 19:58  댓글주소  수정/삭제  댓글쓰기

    비밀댓글입니다

  6. Favicon of https://seobsdesign.tistory.com BlogIcon 섭s 2011.10.29 09:35 신고  댓글주소  수정/삭제  댓글쓰기

    초기화 하는 소스좀요~~ 부탁드립니다 ㅎ

  7. 사망자 2011.11.23 15:13  댓글주소  수정/삭제  댓글쓰기

    곰사랑님 감사합니다 이거보고
    디지털시계하고 스톱워치달린 간지난거 프로그램 만들었습니다
    곰사랑님 정말 대단하세요

  8. BlogIcon Air군 2012.02.22 19:49  댓글주소  수정/삭제  댓글쓰기

    퍼갑니다~
    정말좋은정보감사합니다~!

  9. 비주얼 2012.05.26 21:40  댓글주소  수정/삭제  댓글쓰기

    시간이 줄어들게할수는 없나요?


이번 강의에는 콤보박스를 이용해서 프로그램을 작성해보겠습니다

이렇게 디자인해주세요



콤보박스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.4G"
Combo2.AddItem "13G"
Combo2.AddItem "17G"
ElseIf Combo1.Text = "RAM" Then
Combo2.AddItem "64M"
Combo2.AddItem "128M"
End If
End sub

Private Sub Command1_Click()     '주문확인버튼
Label4.Caption = "종류 : " & Combo1.Text & Chr(10) & Chr(13)
Label4.Caption = Label4.Caption & "항목 : " & Combo2.Text & Chr(10) & Chr(13)
Label4.Caption = Label4.Caption & "수량 : " & Combo3.Text
End Sub

Private Sub Command2_Click()   '초기화버튼
Combo2.Clear
Label4.Caption = ""
End Sub

Private Sub Command3_Click()   '종료버튼
Unload Me        '폼을 종료한다
End Sub

Private Sub Form_Load()        '폼이 실행될때
Combo3.Clear         
For k = 1 To 20            1 ~ 20
Combo3.AddItem k       '콤보박스3 에 표시된다
Next
End Sub


콤보박스 예제



콤보박스 list 추가안하고 하는 다른방법



콤보박스를 하나 추가해줍시다



폼로드부분에

Private Sub Form_Load()
Combo1.AddItem "1"
Combo1.AddItem "2"
Combo1.AddItem "3"
End Sub

작성해보세요



완성 됬습니다.


이상으로 [비주얼베이직] 콤보박스(Combobox) 사용하기 포스팅을 마치겠습니다.
Posted by 곰사랑

댓글을 달아 주세요

  1. 온프아님 2011.07.28 22:39  댓글주소  수정/삭제  댓글쓰기

    좋은 글 감사합니다.
    비베 초보였는데 도움 많이 되었습니다 ^.^

  2. 챠오쓰 2012.01.25 23:28  댓글주소  수정/삭제  댓글쓰기

    흠..

    제는 소스를 이렇게 짜보앗는데..


    Private Sub Combo1_Click()

    If Combo1.Text = "CPU" Then
    Combo2.AddItem "i3-2100"
    Combo2.AddItem "i5-2500"
    Combo2.AddItem "i7-2600"

    ElseIf Combo1.Text = "HDD" Then
    Combo2.AddItem "500GB"
    Combo2.AddItem "1TB"
    Combo2.AddItem "2TB"

    Else
    Combo2.AddItem "4GB"
    Combo2.AddItem "8GB"
    Combo2.AddItem "16GB"

    End If


    End Sub


    Private Sub Command1_Click()
    Label4.Caption = "종류 : " & Combo1.Text & Chr(10) & Chr(13)
    Label4.Caption = Label4.Caption & "항목 : " & Combo2.Text & Chr(10) & Chr(13)
    Label4.Caption = Label4.Caption & "수량 : " & Combo3.Text

    End Sub


    Private Sub Combo2_Click()
    For k = 1 To 10

    Combo3.AddItem k
    Next

    End Sub

    Private Sub Text1_Change()

    End Sub


    딴건 괜찮은데

    주문확인할떄

    수량만 뜨네요..왜그럴까요..?

    글구..

    chr(10) & chr(13)

    얘네는 도대체..뭔가여ㅛ..?

    안써도 아무런 변화가 없는데요..?

  3. Favicon of http://www.inet-m.com BlogIcon 아이넷엠컴 2012.02.20 10:08  댓글주소  수정/삭제  댓글쓰기

    수고많으십니다. www.inet-m.com 무료강좌가 오픈되었습니다. 참고하세요
    비주얼베이직6과 닷넷의 영상처리자료입니다.

  4. 뿡뿡이 2014.11.19 19:59  댓글주소  수정/삭제  댓글쓰기

    아마
    & Chr(10) & Chr(13) 이게 줄바꿈 일꺼에요 C언어에서는\n 이 줄바꿈 이잔아요

비주얼베이직을 실행해주시구요
비주얼베이직 ㅇ응용

컨트롤 + T 또는 프로젝트 - 구성요소 를 클릭해주세요
비주얼베이직으로 여러가지폼을 실행해주세요
구성요소에서 Shockwave Flash 를 체크후 적용을 눌러주세요



툴바에 플래시 모양이 생겼지요? 클릭해서 폼에 그려주세요



이렇게 플래시모양을 눌러 폼에 그리셨지요?


소스

ShockwaveFlash1.Movie = "주소"

입니다.비주얼베이직



플래시 짤방을 올려보겠습니다.


완성



비주얼베이직 Flash 을 응용해서 브금, 플래시게임 같은것도 하실 수 있겠죠?
비주얼베이직
이만 강의 마치겠습니다.

※ ShockwaveFlash 는 컴파일은 잘 되지만 프로젝트저장 오류납니다. 참고해주세요

Posted by 곰사랑

댓글을 달아 주세요

  1. Favicon of https://travel.plusblog.co.kr BlogIcon 꼬마낙타 2011.07.26 22:34 신고  댓글주소  수정/삭제  댓글쓰기

    오랜만에 보는 비주얼 베이직이네요.. ㅎ
    쉽게 무언가를 만들 수 있는 좋은 툴입니다. ^^

  2. Favicon of https://baldiz.tistory.com BlogIcon 초발키리 2011.07.27 08:38 신고  댓글주소  수정/삭제  댓글쓰기

    베이직 할만한가요?

  3. Favicon of https://hansik07.tistory.com BlogIcon Hansik's Drink 2011.07.27 14:58 신고  댓글주소  수정/삭제  댓글쓰기

    꽤 어렵던데 ㅎㅎ
    조금씩 배워나가봐야겠어요 ^^

  4. 비베 2011.10.01 09:46  댓글주소  수정/삭제  댓글쓰기

    노래 재생기 만드는것좀 올려주세요 ~

  5. 비베 2011.10.04 08:34  댓글주소  수정/삭제  댓글쓰기

    주소는 어떻게 얻죠? ;;;

  6. 비주얼베이직 2012.01.28 20:08  댓글주소  수정/삭제  댓글쓰기

    프로젝트속성에서 P-코드로 컴파일로설정하면 잘 되네요

  7. 오병이어 2012.03.14 09:51  댓글주소  수정/삭제  댓글쓰기

    좋네요. 감사드립니다.

  8. Favicon of http://blog.naver.com/godzhd BlogIcon 궁금중 2012.04.08 01:48  댓글주소  수정/삭제  댓글쓰기

    저기 .. 제가 swf 파일을 어떻게 복사해오죠 .. ? 그게안되서지금 안돌아가요 ㅠ_ㅠ

  9. Favicon of http://jungjy8579@naver.com BlogIcon 비주얼베 2012.08.07 20:13  댓글주소  수정/삭제  댓글쓰기

    그런데
    플래시게임은
    어떻게넣나요?
    안되서


For문으로 다중반복문을 사용하여 구구단을 출력해보겠습니다.

이렇게 디자인 해주세요



Command1 을 더블클릭해서 코드창을 열어주세요


소스
Private Sub Command1_Click()
For a = 1 To 9
Print
Print a & "단"
Next
End Sub

F5을 눌러 확인해 볼까요?

1~9단이 출력되었습니다.

소스 에서
3번째 줄 print를 빼볼까요?

Private Sub Command1_Click()
For a = 1 To 9
Print '<<빼서 소스작성해보세요
Print a & "단"
Next
End Sub

위 사진이랑 차이점이 있죠??

이런식으로 활용을 해보세요 그래야 실력이 늡니다

요기까지 대충 활용을 해보셨으면 구구단을 출력해보겠습니다.


소스
Private Sub Command1_Click()        '// 커맨드1 를 클릭하면
For a = 1 To 9            '//1~9
Print     
Print a & "단"
For b = 1 To 9            '// b의 값이 9번 변경되는 작업을 a가 9번 변경되는 동안 실행된다.
출력문자 = a & "*" & b & "=" & a * b & " "                       '//a 1~9 , * 곱하기, b 1~9, 즉 a*b
Print Format(출력문자, "@@@@@@@@@");               '// 출력값을 형식에 맞추어 정렬하여 출력
Next b       '변수
Next a       '변수
End Sub

구구단 출력완성



구구단 출력 예제





역시 비주얼베이직 문법은 어렵습니다 ㅠㅠ 많이 연습해야 겠습니다
Posted by 곰사랑

댓글을 달아 주세요

  1. Favicon of https://www.tisdory.com BlogIcon 철한자구/서해대교 2011.07.16 23:57 신고  댓글주소  수정/삭제  댓글쓰기

    ㅎㅎ 언어도 한번 배워보려고 하는데.. 그냥 이번 방학때 자격증이나 몇개 더 취득하는걸로 만족해야겠습니다.

  2. Favicon of http://gaedong2.tistory.com BlogIcon ★개동이★ 2011.07.17 11:46 신고  댓글주소  수정/삭제  댓글쓰기

    기초부터 차근차근 잘 하고 계시네요~
    문법만 이해를 잘하시면 어떤언어라도 비슷해서
    나중에 큰 도움이 되실겁니다.

  3. Favicon of http://gaedong2.tistory.com BlogIcon ★개동이★ 2011.07.17 12:43 신고  댓글주소  수정/삭제  댓글쓰기

    웹쪽으로 가려면 기본적으로 데이터베이스(오라클,MS-SQL,MY-SQL) 이건 꼭 알아야 하구요
    1.HTML
    2.CSS
    3.JAVASCRIPT
    4.JSP
    5.ASP
    6.PHP

    등등이 있습니다.
    우선순위대로 알려드린것이니 공부할때 참고하세요

  4. Favicon of http://gaedong2.tistory.com BlogIcon ★개동이★ 2011.07.17 15:48 신고  댓글주소  수정/삭제  댓글쓰기

    제가 드린답변은 웹에서만 필요한 언어이구요.
    예를들어
    C,C++,JAVA,C# 등은 윈도우 프로그래밍..,
    스마트클라이언트 ,서버 프로그래밍, 각종 자판기나 기계의 프로그래밍 언어입니다.

    요즘 추세는 웹에서는 무거운 환경의 프로그래밍은 잘 하지 않아요.
    왠만하면 클라이언트에서 빌드가 가능하도록 하는 웹언어(자바 스크립트, VB스트립트) 를 이용하여
    거의 웹상의 모든 프로그램은 동작을 하구요.

    제 분야는, JAVA프로그래밍,ERP프로그래밍,스마트클라이언트 등등이고
    웹쪽으로는 거의 안해요.

    왜냐하면 웹쪽으로는 저렴한 단가로 기본틀을 만들어서 배포하는 업체가 많아서.
    단가도 낮고 환경도 무지 힘들어요.

    예를들어 애견쇼핑몰을 보면 디자인만 조금씩 변경되어있고 기능은 모조리 다 똑같아요..

    웹쪽 이라는 말은 너무 광범위해서.
    웹 = 모바일,ERP,인트라넷,EP,홈페이지,디자인,기획 등등이 있어요.

    전에도 말씀드렸다싶이 변하지 않는건 DB(데이터베이스) 이쪽이 변하지 않으니
    앞으로 추세를 공부하시려고 하시면 DB쪽을 공부하시는게 더욱 좋아요.
    하지만 지루할수도 있으니

    지금처럼 VB를 섞어가지고 공부하시면 도움이 되실꺼에요..

    현재는 지금 윈도우 폼만 가지고 공부하고 계신데
    조금지나면 DB와 연동해서 데이터 가져오기등등이 필요하실겁니다.

    1줄요약 : 취미로 프로그래밍 하되 너무 깊게 들어가진 마세요 추세가 변경됩니다. (추세가 변하지 않는것은 DB입니다.)

    • Favicon of https://lovebear.tistory.com BlogIcon 곰사랑 2011.07.17 16:15 신고  댓글주소  수정/삭제

      와 엄청길게 써주셨네요

      감사합니다 감동 ㅠㅠ

      DB 쪽으로 공부하면 무슨 일할수있어요?

      저는 컴퓨터쪽으로 진로를 잡고싶은데 뭐가뭔지 아직 잘모르겠어요


      자꾸 귀찮게 해드려서 죄송해요

  5. Favicon of http://gaedong2.tistory.com BlogIcon ★개동이★ 2011.07.17 16:47 신고  댓글주소  수정/삭제  댓글쓰기

    DB쪽으로는

    DB관리자(보수가 높음)

    그리고 각종 프로그램할때도 SQL 이라는 문법을 이용하여 데이터를 가져오는데요.
    무조건 필요합니다.
    그냥 간단하게 HTML만 꾸미면 끝인줄 알지만..

    지금 제가 쓰고 있는 댓글도 DB언어를 통해서 가져오게 됩니다..
    제 포스팅중 DB와 관련된 내용을 보시면 대략 이런 언어구나~ 라고 생각이 드실겁니다.

  6. Favicon of https://lansunjibsa.tistory.com BlogIcon miN`s 2011.07.17 23:48 신고  댓글주소  수정/삭제  댓글쓰기

    비베 공부하시나봐요..ㅎㅎ
    정말 오랜만에 보는거같습니다
    DB쪽 하실려면 오라클이 좋습니다

  7. Favicon of https://jongamk.tistory.com BlogIcon 핑구야 날자 2011.07.18 00:39 신고  댓글주소  수정/삭제  댓글쓰기

    VB 보니 반갑네요.,., 저도 6.0으로 일을 한답니다.ㅋㅋ

  8. Favicon of http://fiapress.tistory.com BlogIcon FIAP 편집국장 2011.07.22 11:54 신고  댓글주소  수정/삭제  댓글쓰기

    어휴.. 많은 분들께서 대부분 비슷비슷한 부분을 공부하신 것 같은데 저만 다른 것 했었네요..ㅎㅎ 참고로 전 아~~~ 주 오랜 옛적에 '델파이'라는 언어를 공부한 적이 있었지요. 물론 지금은 다 잊어버리고 아무것도 모릅니다~ㅋ

    그런데 중요한건, 그때나 지금이나 DB가 중요시 되고 있다는 사실 하나 만큼은 변하지 않고 있는 것 같네요. 모쪼록 원하는 분야로 진출하셔서 최고가 되시길 바랍니다.^^

  9. 2011.10.17 20:31  댓글주소  수정/삭제  댓글쓰기

    비밀댓글입니다

  10. 챠오쓰 2012.01.25 22:35  댓글주소  수정/삭제  댓글쓰기

    비주얼 베이직 뭘로 공부하시나요...??

    저도 비주얼 베이직 잘 하고 싶은데...

    다른 언어에 비해 배울 수 있는 강의 , 강좌, 서적 도 많이 없는것 같아요..

    지금은 곰사랑님꺼 제일 잘 해 놓으셔서 보구 있는데요..

    혹시 곰사람님이 공부하셨거나 공부하시고 있거나

    추천하고 싶은 공부법 혹은 책 있나요..??

    다 알려주면 좋구요..ㅋ 좀 길게 썻넴..헤유

    • Favicon of https://lovebear.tistory.com BlogIcon 곰사랑 2012.01.27 22:17 신고  댓글주소  수정/삭제

      저는 문법책 하나 사서 공부했는데

      비주얼베이직은 그냥 책없이 공부 하실 수 있어요

      네이버에 고구마s카페가 있는데 참고하세요 많은 도움 되실꺼에요

  11. 흠..ㅋ 2012.01.25 22:48  댓글주소  수정/삭제  댓글쓰기

    Next b '변수
    Next a '변수


    이건

    next

    next

    이렇게만 써도 되네요..?

    안될때도 잇나요..?

  12. 가로 2012.04.12 21:50  댓글주소  수정/삭제  댓글쓰기

    저렇게 1~9단이 세로로말고 가로로 1~9단 나오면서 1~9단 아래 계속 잇는건 어떻게 하나요??


For문 이란

주어진 조건에서 자동 반복 수행을 하고자 할 때 사용되는 문으로 매우 편리한 기능을 사용자에게 제공합니다.

For문 사용하기
For 변수 = 시작값 To 종료값 Step 증감값
문장
Next 변수



Text1 입력박스
Command1 확인 버튼
Command2 종료 버튼

이와 같이 디자인을 배치해주세요



소스

Private Sub Command1_Click()        
Dim i As Integer         
Dim total As Long
For i = 1 To 500   
total = total + i
Next i
Text1.Text = total
End Sub
Private Sub Command2_Click()
Unload Me
End Sub


For문 예제



이상으로 단일반복문, For문 포스팅을 마치겠습니다.

Posted by 곰사랑

댓글을 달아 주세요

  1. 비베 2016.10.12 14:00  댓글주소  수정/삭제  댓글쓰기

    안녕하세요 코드 보다가 문의좀 할라고 댓글 남겨 드립니다
    for 구문인데
    미주수 x 랑 y 를 더 할떄
    (1+10=55 ) 이런식으로 짤라고 하는데 혹시 아시나요 ㅠㅠ


조건문은 입력되는 값에 따라 서로 다른 명령을 실행할 때 자주 사용되지만 조건이 여러 개인 경우에는 불편하다. 이럴 경우에 사용하는 명령이 "Select Case" 문장이다. "Select Case"는 입력된 여러 조건을 동시에 처리할 수 있는 조건문으로 여러 조건이 나열되어 있는 경우에 편리하게 사용된다. "Select Case"는 문자를 이용하는 방법과 숫자를 이용하는 방법으로 구분할 수 있다.

Text1 제품코드 입력될 텍스트
Text2 판매수량 입력될 텍스트
Text3 제품명 출력될 텍스트
Text4 판매금액 출력될 텍스트
Command1 결과 입력 버튼

이와 같이 디자인해주세요 ㅎ



소스
Private Sub Command1_Click()            '// 결과입력 버튼
Select Case Text1.Text           '// 제품코드 (Text1)
Case "A"                 '// 제품코드(Text1) 에 A를 입력하면
         Text3.Text = "서든어택"               '// 제품명(Text3) 에 서든어택이 표시된다.
          판매단가 = 20000                       '// 판매수량을 적으면 판매단가가 표시된다.
Case "B"
         Text3.Text = "스타크래프트"
         판매단가 = 30000
Case "C"
          Text3.Text = "포트리스"
          판매단가 = 14000
Case Else       '// 제품코드(Text1)에 없거나 다른, 다를때
          Text3.Text = "등록되지 않는 제품입니다."      '// 등록되지 않는 제품이라고 뜬다
          판매단가 = 0
End Select

Text4.Text = 판매단가 * Val(Text2.Text)                '// 판매수량에 수 를 입력하면 판매금액(Text4) 에 값이 표시된다. 
End Sub


Select Case문 (문자로 결과 계산) 예제



Select Case 문자열

    Case 문자1
                         명령1
    Case 문자2
                         명령2
    Case 문자3
                         명령3
    Case Else
                         명령4
End Select

문자열이 '문자1' 이면 '명령1' 이 수행, '문자2' 이면 '문자2'가 수행, '문자3' 이면 '명령3' 이 수행되며, 해당되는 글자가 없으면
'명령4'가 수행된다.

이상으로 Select Case문자열 포스팅을 마치겠습니다.
Posted by 곰사랑

댓글을 달아 주세요

  1. Favicon of https://rosadaddy.tistory.com BlogIcon 로사아빠! 2011.07.11 15:28 신고  댓글주소  수정/삭제  댓글쓰기

    생각보다 여려워보이지만,
    몇번하다보니 곧 익숙도 해질 것 같아요~

  2. 챠오쓰 2011.12.31 19:10  댓글주소  수정/삭제  댓글쓰기

    IF 문도 Else IF 를 사용하면 이와 같이 쓸수 잇지 않아요??

    다른게 머지요..::??


Text1 변환하려는 수 입력 텍스트
Text2 변환된값 텍스트
Command1 변환 단추
Command2 끝내기 단추

디자인을 이렇게 배치해주세요



소스
Private Sub Command1_Click()     '// 변환 단추
입력값 = Val(Text1.Text)              '// 문자로 입력되는 것을 숫자로 변환하는 함수이다.
If 입력값 < 0 Then          '//만약 입력값이 0 보다 작으면
Text2.Text = "형태 : 음수, " & "절대값 : " & 입력값 * -1           '// 입력값에 -1을 곱하여 양수로 변환한 후 표시한다
Else          '//다를때
Text2.Text = "형태 : 양수, " & "절대값 : " & 입력값                 '// 입력값이 0 보다 크면 문자와 값을 변환없이 그대로 출력한다.
End If
End Sub

Private Sub Command2_Click()   '//끝내기 단추
Unload Me        '// 나를 종료한다
End Sub



조건 판단하기 예제



조건문의 문법

If 조건 Then
문장
End If  
조건이 참이면 문장을 수행한다.


If 조건 Then
문장1
Else
문장2
조건이 참이면 문장1을 수행하고 거짓이면 문장 2를 실행한다.

 * 관계를 표시하는 연산자
 연산자  의미  연산자  의미
 =  같다.  <  작다.
<>  같지 않다.  <=  작거나 같다.
 >  크다.  >=  크거나 같다.


더많은 강좌를 보시려면

Posted by 곰사랑

댓글을 달아 주세요

  1. Favicon of https://hiendedition.tistory.com BlogIcon spidey 2011.07.11 17:25 신고  댓글주소  수정/삭제  댓글쓰기

    오... 비주얼베이직 잘하시나보네요.!!

  2. 2012.06.24 21:53  댓글주소  수정/삭제  댓글쓰기

    언로드미 보단 엔드가 시간 몇초더 절약됨다 .
    근데
    unload me
    form2.show
    이때 end 쓰면 망함,ㅋ
    그냥 프로그램끝낼때 end 문쓰세여


비주얼베이직 데이터형 변환하기를 배워봅시다.

TextBox에 입력된 데이터는 기본적으로 문자로 인식하게 됩니다. 그래서 TextBox에 입력된 숫자를
처리할 때는 반드시 숫자형 변수에 저장해야 합니다. 이러한 불편함을 없애고 문자를 직접 숫자로 변환하여
사용할 수 있는 방법이 함수를 이용하는 방법이 있습니다.

Text1 이름이 입력될 텍스트
Text2 이론점수가 입력될 텍스트
Text3 실기점수가 입력될 텍스트
Text4 결과가 입력될 텍스트
Command1 확인 단추
Command2 종료 단추

디자인을 이렇게 만들어주세요



소스
Private Sub Command1_Click()  '확인버튼
Text4.Text = "귀하의 이름은 " & Text1.Text & "이며 총점은 " & Text2.Text + Text3.Text & "입니다"
End Sub
Private Sub Command2_Click() '취소버튼
Unload Me
End Sub


F5를 눌러 테스트 해봅시다

요기서 먼가 이상하지 않으세요?
분명 총점인데 85+45 = 130이 나와야 하는데 8545가 나오죠?

그이유는 문자를 숫자로 변환하는 함수를 입력을 안해서 그렇습니다.
수정해 보도록 하겠습니다.



 이제 정상적으로 변화였죠?


소스
Private Sub Command1_Click()
Text4.Text = "귀하의 이름은 " & Text1.Text & "이며 총점은 " & Val(Text2.Text) + Val(Text3.Text) & "입니다"
End Sub
Private Sub Command2_Click()
Unload Me
End Sub

뭐가 바뀐지 아시겠죠?
Val(Text2.Text) + Val(Text3.Text) 가 사용되었습니다.

Val(문자)는 문자로 입력되는 값을 숫자로 변환하는 함수이다. 즉 TextBox에 입력된 값은
문자로 처리되므로 숫자형 변수에 저장하거나, Val 함수를 이용하여 숫자로 변환해야 한다.

비주얼베이직 데이터형 변환하기 예제



이상으로 비주얼베이직 데이터형 변환하기 포스팅을 마칩니다.



더많은 강좌를 보시려면

Posted by 곰사랑

댓글을 달아 주세요

  1. 챠오쓰 2011.12.31 19:00  댓글주소  수정/삭제  댓글쓰기

    Val.. ㅋ 짧고 좋쿤요! ㅋ


비주얼베이직의 문자 결합 연산자는

여러 개의 문자를 결합하는 연산자로 수치 계산의 '+'와는 다른 기능을 수행한다.
숫자 1 + 1 은 2로 계산되지만, 문자 1 & 1 은 11로 처리된다.
이러한 특성을 활용하여 TextBox 나 Label 다양한 정보를 출력하는 용도로 자주 사용된다.
또한 한 줄에 모두 출력되지 못하는 정보를 여러 줄에 표시하는 줄바꿈 기호 역시 문자 결합 연산자와 함께 사용되어야 한다.

비주얼베이직 문자 연산자의 사용방법

문자 & 문자 : 두 문자를 결합한다.
문자열 안에 공백이 포함되면 공백도 결합되어 표시된다.
줄바꿈을 처리할 때는 'chr(10) & chr(13)' 을 사용한다.
이미 입력된 값에 새로운 값을 추가할 때는 이미 입력된 값을 반드시 포함해야 한다.


예시

Text1 제품이름이 입력될 텍스트
Text2 제품종류가 입력될 텍스트
Text3 구입수량이 입력될 텍스트
Text4 구입단가가 입력될 텍스트
Command1 결과출력 단추

디자인을 이렇게 해주세요 ^^



비주얼베이직 문자 결합 연산자 소스
 Private Sub Command1_Click()    '결과출력 버튼
Dim 수량 As Integer, 단가 As Integer
수량 = Text3.Text
단가 = Text4.Text
Label5.Caption = "구입한 제품은 " & Text1.Text & "이며"
임시 = Label5.Caption & Chr(10) & Chr(13)
Label5.Caption = 임시 & "제품 종류는 " & Text2.Text & "이며"
임시 = Label5.Caption & Chr(10) & Chr(13)
Label5.Caption = 임시 & "구입한 수량은 " & Text3.Text & "개 이며"
임시 = Label5.Caption & Chr(10) & Chr(13)
Label5.Caption = 임시 & "구입한 단가는" & Text4.Text & "원 이므로"
임시 = Label5.Caption & Chr(10) & Chr(13)
Label5.Caption = 임시 & "총 구입금액은 " & 수량 * 단가 & "원 입니다."
End Sub

F5 를 눌러 실행해 봅시다.

정상적으로 표시됬네요
 


요기서 추가로 종료버튼과, 초기화 버튼을 만들어봅시다.



종료 버튼에는 이소스와

Private Sub Command2_Click()
Unload Me
End Sub



초기화 버튼에는 이소스를 입력해주세요

Private Sub Command3_Click()
Label5.Caption = ""
End Sub

비주얼베이직 문자 결합 연산자 예시



이상으로 비주얼베이직 문자 결합 연산자 사용하기 포스팅을 마치겠습니다.



더많은 강좌를 보시려면

Posted by 곰사랑

댓글을 달아 주세요

  1. 2011.09.03 21:55  댓글주소  수정/삭제  댓글쓰기

    비밀댓글입니다

  2. 챠오쓰 2011.12.31 18:58  댓글주소  수정/삭제  댓글쓰기

    임시는 뭐죠??

    그냥 아무때나 쓸수 잇는거에요?


    아 글구 ch()이건요/. ㅋ 설명 부탁합니다..

    꾸벅 ㅋ

  3. Attractive 2012.02.11 12:43  댓글주소  수정/삭제  댓글쓰기

    소스에 임시를 쓰는이유는??
    안써도되지않나?


비주얼베이직의

변수란
- 데이터를 기억하는 저장장소 이며 데이터 형식 안에서 임의의 값이 변할수 있는 수를 변수라고 한다.

변수의 형식은
Dim 변수명 as 데이터형식
입니다.

변수명은 자기가 하고싶은것으로 해도 됩니다.
데이터형식은 정해진것만 써야됩니다.

변수의 규칙
① 영문자, 한글, 숫자, 밑줄 문자(_)의 조합으로 구성됩니다.
② 첫 번째 문자(변수명) 는 반드시 영문자 또는 한글로 시작
③ 비주얼 베이직 예약어는 변수 이름으로 사용할 수 없습니다.
- 예약어 (Sub, End, Dim, For등 )
④ 변수 글자 수는 255자를 초과할 수 없습니다.

올바른 변수 사용의 예
① Dim love as Integer
② Dim 아무개 as Long
③ Dim 이름 as String
④ Dim whrusaud as Boolean

틀린 변수 사용의 예
① Dim 10B as Integer : 변수명을 문자 숫자로 시작해서
② Dim %kim as Boolean : 변수명을 특수 문자로 시작해서
③ Dim For As string : 예약어로 시작해서 - 예약어 (Sub, End, Dim, For등 )

 
비주얼베이직
변수의 데이터형식은 이외 여러가지가 있습니다. 밑에 표를 봐주세요

등이 있습니다.



숫자 데이터 형식
Integer, Long, Single, Double, Currency 등의 숫자 데이터 형식이 있습니다.
Dim 국어 as Integer '국어 변수를 정수형으로 지정
Dim 총점 as Long '총점 변수를 정수형으로 지정
Dim 평균 as Single '평균 변수를 실수형으로 지정

국어 = 100          '100점을 대입(정수값)
총점 = 35,000       '35,000점 대입(정수값)
평균 = 99,90        '99.90점을 대입(실수값)



Byte 데이터 형식
변수가 이진 데이터를 포함한다면 Byte 데이터 형식의 배열로 선언합니다.
Byte 변수를 사용하여 이진 데이터를 저장하면 형식 변환이 있을 때까지 값을 보관하게 됩니다.
Dim 카운트 As Byte           '카운트 변수를 바이트형으로 지정

카운트 = 1.       '1을 대입



String 데이터 형식
숫자 값이 아닌 문자열만을 포함하는 변수는 String 형식으로 선언할 수 있습니다.
문자열 값을 대입하고자 할 때에는 상수 값 양쪽에 " " 인용 부호가 있어야 합니다.
Dim 과목명 as string              '가변길이 문자열 변수로 지정
Dim Name as string               '고정길이 문자열 변수로 지정

S = "Database"                      '문자열 대입
Name = "KimDaeEung"           '문자열 대입



Boolean 데이터 형식
단지 참/거짓,  예/아니오,  켜짐/꺼짐 등의 정보만을 갖는 변수라면 Boolean 형식으로 선언할 수 있습니다.
Boolean의 기본값은 False 입니다.
Dim 조건결과 as Boolean           '조건결과 변수를 논리형 변수로 지정

조견결과 = 100>200                    '조건결과에 거짓을 대입



Date 데이터 형식
날짜와 시간 값은 특정 Date 데이터 형식과 Variant 변수에 포함될 수 있습니다. 동일한 일반 특징이 두 형식의 날짜에 적용됩니다.
사용 가능한 날짜는 100/1/1~9999/12/31까지 지정 가능하며, 사용 가능한 시간은 0:00:00~23:59:59까지 사용할 수 있습니다.



Variant 데이터 형식
Variant 변수는 모든 시스템에 의해 정의된 데이터 형식을 저장할 수 있습니다. 시스템에 의해 정의된 데이터 형식들을 Variant 변수로 지정하면 이들 데이터 형식을 매 번 변환시킬 필요가 없습니다.
SomeValue = "17"                          'SomeValue는 "17"입니다(문자열)
SomeValue = SomeValue - 15.       'SomeValue의 값은 숫자 2입니다.


추가로 알아주셔야 할 연산자도 배워봅시다.
 연산자  기능
 +  두 수를 더함
 -  두 수의 차를 구하거나 어떤 수의 음수를 구함
 *  두 수를 곱함
 /  두 수를 나눈 소수점 몫을 돌려 줌
 ^  어떤 수의 제곱을 구함
 \(\)  두 수를 나눈 정수 몫을 돌려 줌
 Mod  두 수를 나눈 나머지를 돌려 줌


변수를 연습해 봅시다.

Text1 국어점수 입력되는 텍스트
Text2 영어점수 입력되는 테스트
Text3 문자계산 입력되는 테스트
Text4 숫자계산 입력되는 테스트
Command1 점수 계산 단추

이와 같이 디자인 해주세요 그후

커맨드 버튼을 더블 클릭해서 소스창을 띄어줍시다 비주얼베이직으로

소스입니다. 초록색 글자는 주석인거 아시죠?



Private Sub Command1_Click()             '점수 계산 단추
Dim A As String   '[string=문자열]
Dim b As String
Dim c As String
Dim 국어 As Integer   '[Integer=짧은정수]
Dim 영어 As Integer
Dim 합계 As Integer    '→ 프로그램에서 사용될 변수를 선언한다.
A = Text1.Text
b = Text2.Text
c = A + b
Text3.Text = c    '→ 문자 형태로 값을 더한 후 표시한다.
국어 = Text1.Text
영어 = Text2.Text
합계 = 국어 + 영어
Text4.Text = 합계   '→ 숫자 형태로 값을 더한 후 표시한다.
End Sub


이해 가시나요? 비주얼베이직 변수사용을?
문자 계산은 String 을 사용했고
숫자 계산은 Integer 을 사용했습니다.



비주얼베이직변수1 예제파일 입니다.



이번엔 연산자를 이용한 변수를 알아볼께요

Text1 첫번째 값
Text2 두번째 값
Text3 결과 값
Command1 더하기
Command2 빼기
Command3 곱하기
Command4 나누기

이와 같이 디자인을 해주세요



소스입니다.


Private Sub Command1_Click()       '더하기 버튼
Dim A As Integer, B As Integer, C As Integer
A = Text1.Text
B = Text2.Text
C = A + B
Text3.Text = C
End Sub
Private Sub Command2_Click()        '빼기 버튼
Dim A As Integer, B As Integer, C As Integer
A = Text1.Text
B = Text2.Text
C = A - B
Text3.Text = C
End Sub
Private Sub Command3_Click()          '곱하기 버튼
Dim A As long, B As long, C As long
A = Text1.Text
B = Text2.Text
C = A * B
Text3.Text = C
End Sub
Private Sub Command4_Click()            '나누기 버튼
Dim A As long, B As long, C As long
A = Text1.Text
B = Text2.Text
C = A / B
Text3.Text = C
End Sub


변수2 예제파일 입니다.




변수중에 세 줄과 한줄은 같습니다. 보기좋게 하려고 한것이죠 

Dim A as Integer
Dim B as Integer
Dim C as Integer

Dim A As Integer, B As Integer, C As Integer

F5를 눌러 테스트해봅시다

첫번째 값에 10을 입력하고
두번째 값에 1을 입력하고
더하기 버튼을 눌러주세요
결과 값에 11 이 맞게 입력되었습니다.


변수2 는 Integer을 이용해 짧은 정수 를 사용하였습니다.
Integer의 특징이 뭐였나요?
범위가 -32,768 ~ +32,767 입니다.

그러면 32767을 초과하면 어떤 현상이 일어날까요?

32700 + 100을 해보았습니다.
32767을 초과 했더니 숫자가 너무 크다고 나옵니다.




숫자가 너무 크다고 나오니
Integer 말고 다른 데이터 형식을 써봅시다
Long 을 써볼까요
범위는 -2,147,483,648 ~ + 2,147,483,647  입니다
범위가 Integer 보다 상당히 차이가 나죠?

그러면 변수2 소스를 바꿔봅시다
Integer 데이터 형식을 전부 Long으로 바꿔줍시다.


Private Sub Command1_Click()       '더하기 버튼
Dim A As long, B As long, C As long
A = Text1.Text
B = Text2.Text
C = A + B
Text3.Text = C
End Sub
Private Sub Command2_Click()        '빼기 버튼
Dim A As long, B As long, C As long
A = Text1.Text
B = Text2.Text
C = A - B
Text3.Text = C
End Sub
Private Sub Command3_Click()          '곱하기 버튼
Dim A As long, B As long, C As long
A = Text1.Text
B = Text2.Text
C = A * B
Text3.Text = C
End Sub
Private Sub Command4_Click()            '나누기 버튼
Dim A As long, B As long, C As long
A = Text1.Text
B = Text2.Text
C = A / B
Text3.Text = C
End Sub


Integer 을 Long 으로 변경하셨으면 테스트 해봅시다

아무리 큰 값을 입력해도 초과했다고 나오지않네요 ㅎ



이렇게 변수를 연습하시면 됩니다. 비주얼베이직쉽죠?

변수는 어려우니 이해가 안가실 수 있습니다.
변수는 나중에도 많이쓰이니 이해가 가도록 복습을 많이해주세요 비주얼베이직의 장점임

비주얼베이직 동영상강의 프로그램 ▶ http://lovebear.tistory.com/52


변수는 5차시 에 있으니 동영상으로 기초로 탄탄히 잡으세요



이상으로 비주얼베이직 변수사용 포스팅을 마치겠습니다.
 


더많은 강좌를 보시려면

Posted by 곰사랑

댓글을 달아 주세요

  1. 챠오쓰 2011.12.30 20:07  댓글주소  수정/삭제  댓글쓰기

    으아악! ㅋ

    여기부터 조금씩 어려워 지네요 ㅋ

  2. 챠오쓰 2011.12.31 18:33  댓글주소  수정/삭제  댓글쓰기

    아.. 다시 보니 이해가 좀 되네요 ㅋ


    그런데 동영상 강의는 삭제 됫다네요??

  3. Favicon of https://9raphic.tistory.com BlogIcon 필명♬ 2012.01.16 12:52 신고  댓글주소  수정/삭제  댓글쓰기

    맨 위에

    데이터를 기억하는 저장장소 이며 데이터 형식 안에서 임의의 값이 변할수 있는 수를 변수라고 한다.

    임의의 값이 변할수가 아니고 임의의 값을 저장할 수 있는 게 변수임

  4. Favicon of https://9raphic.tistory.com BlogIcon 필명♬ 2012.01.16 13:31 신고  댓글주소  수정/삭제  댓글쓰기

    999999999999 + 99999999999 적으니깐 오류 떠요. ㅠㅠ

  5. ^^ 2012.02.12 21:20  댓글주소  수정/삭제  댓글쓰기

    감사해요 ㅎㅎ 완벽히 이해가 가네요

  6. 으아 2012.07.23 21:57  댓글주소  수정/삭제  댓글쓰기

    여기서부터 이해가안돼네요;


안녕하세요 이번 비주얼베이직 강의는 프로그래스바(ProgressBar) 대해서 알아보도록 하겠습니다.

프로그래스바란 프로그램 설치시 나오는 진행바라고 생각하시면 됩니다.
 

우선 첨부파일을 저장해주세요


그후 비주얼베이직을 실행해주세요

비주얼베이직을 실행하신후 컨트롤 + D를 눌러서 첨부파일을 열어주세요



열어주셨으면 비주얼베이직 툴박스에 빨간네모박스한게 추가되셨을겁니다.

ProgressBar 빨간네모박스된거 클릭하셔서 폼에 그려주세요



이렇게요 ㅎㅎ

프로그래스바 를 한번 클릭해주세요

클릭하셨으면 오른쪽 속성창에 프로그래스바의 속성이 나올겁니다



그속성에서 빨간네모박스(Text) 는 프로그래스바의 이름을 뜻하고요

그 밑에 파란네모박스(Theme) 는 프로그래스바의 색깔을 뜻하고

그 바로 밑에 연두색네모박스(Value) 는 프로그래스바를 시작할때의 진행표시를 뜻합니다.



한번 프로그래스바 세팅을 해볼게요

빨간네모박스(Text) 를 Loading 로 바꿨고요

파란네모박스(Theme) 래드 (붉은색)으로 색깔을 바꿧고요 (색깔의 선택은 자유)

연두색네모박스(Value) 프로그래스바 진행표시를 0으로 바꿧습니다.



세팅이 끝나셨으면 툴박스에서 타이머를 추가해주세요 시계모양같이 생긴거요
 


그후에 폼2를 추가해주세요

폼 추가방법 프로젝트(P) > 폼 추가(F) 클릭하시고 폼 선택 열기 하시면됩니다.



저는 이렇게 만들어보겠습니다 프로그래스바 진행상태가 다 되면 폼1을 닫고 폼2를 실행해보도록 하겠습니다.

우선 타이머를 더블클릭해서 소스창을 뛰어주세요



소스를 보시면 이렇게 나와있습니다.  간단히 IF문을 이용했어요. 초록색으로 된것은 주석처리입니다.


Private Sub Timer1_Timer()
If ProgressBar1.Value = "100" Then '//만약 프로그래스바의 값이 100이 되면
Form2.Show '//폼2를 띄운다
Unload Me '//폼1을 닫는다
Else '//아니면
ProgressBar1.Value = ProgressBar1.Value + 1 '//프로그래스바의 값에 1을 추가한다.
End If '//if문 끝
End Sub



요기서 끝이아닙니다 마지막 한가지가 남아있습니다.


타이머를 한번 클릭해주세요 오른쪽 속성창에 Interval 을 정해주셔야하는데요 Interval 은 프로그래스바의 시간의간격을


설정해주는것입니다. 즉 프로그래스바의 이동속도라고 보시면됩니다.


Interval 에 숫자는 1000 = 1초, 100 = 0.1초, 10 = 0.01초 라고 보시면되고요


1000 이라고 설정했다면 1초마다 조금씩조금씩 진행바가 차오르겠죠? 1000은 너무 느리니 10으로 설정해주세요



Interval 을 10으로 설정하고 F5을 눌러보세요





완성 되었습니다.

Tip. 타이머클릭해서 인터벌 안하고 폼로드 부분에 Timer1.Interval = 10 이렇게 입력하셔도 됩니다.


더많은 강좌를 보시려면


 

Posted by 곰사랑

댓글을 달아 주세요

  1. good 2011.11.11 15:56  댓글주소  수정/삭제  댓글쓰기

    완전 멋잇어요 ㅎㅎ

  2. Help 2011.12.17 16:36  댓글주소  수정/삭제  댓글쓰기

    If ProgresssBar1.Value = "100" Then 오류 떠용 ㅠ.ㅠ

  3. 챠오쓰 2011.12.30 20:04  댓글주소  수정/삭제  댓글쓰기

    와! ㅋ 쩌러요 ㅋ

  4. BlogIcon Melon 2012.02.24 21:10  댓글주소  수정/삭제  댓글쓰기

    안차오르는데 어떻게 해요 ㅜ 10으로도 설정해봤는데

  5. GiM 2012.04.30 03:44  댓글주소  수정/삭제  댓글쓰기

    50% 부터 가는데 처음부터 어떻게 감 ?

  6. 나은성 2012.06.15 20:01  댓글주소  수정/삭제  댓글쓰기

    감사합니다.
    덕분에 CommonControl 라이브러리를 뺄수가 있어 정말 좋습니다.

    그런데 사소한 문제가 하나 있는데요,
    Text 속성을 건드리지 않고 코드에서 "xx % 진행중 입니다," 라고 나오도록 했는데요.

    실제로는 다운로드 바이트수가 나오네요.
    물론 CommonControl을 사용할때는 정상 표시 됐었습니다.

    왜그런가요?


이번 강의는 웹브라우저를 사용해보겠어요

비주얼베이직을 실행해주세요




컨트롤+T 또는

프로젝트(P) - 구성요소 를 클릭해주세요


구성요소가 떳지요??
컨트롤 에서 스크롤을 내리다보면
Microsoft Internet Controls 가 있습니다.
체크하신후 확인을 눌러주세요


툴 박스에 지구모양이 생겼죠?

지구모양을 클릭하여 폼에 배치하세요


폼부분을 더블클릭하여

저 코드창에 있는 소스를 입력하세요


그리고 F5을 눌러봅시다.

짜잔 웹브라우저 컨트롤을 성공적으로 완료하셨습니다.




더많은 강좌를 보시려면




Posted by 곰사랑

댓글을 달아 주세요

  1. Favicon of http://223.com BlogIcon 2011.11.05 12:13  댓글주소  수정/삭제  댓글쓰기

    저기...
    궁금한게 있는데요.
    주소 입력창을 만들어서,
    입력창에 적힌 주소로 이동하게끔 만들 순 없을가요?

    Dim a as string
    a = val(text1.text)

    webbrowser1.navigate "a" <-이 부분을 잘 모르겠어요.

    그냥 "a" 라고 하면 안될거 같은데..ㅠㅠㅠㅠㅠ

    • 사카인 2012.10.16 13:44  댓글주소  수정/삭제

      webbrowser1.navigate "a" 이렇게 쓰시면
      주소창에 http://a 이렇게 넣고 이동하는것과 같습니다.

      webbrowser1.navigate a << 요롷게 써보세염.. ㅇ ㅅㅇ

      변수명이기때문에 쌍따옴표를 넣을 필요가 없습니다. ㅎㅎ

  2. 샤인 2011.12.27 10:38  댓글주소  수정/삭제  댓글쓰기

    퍼가요~ ㅎ


이번 강의는 파일삭제를 알아보도록 하겠습니다.


커맨드버튼을 하나 추가해주시구요



바람의나라 스크린샷폴더에 Baram000.jpg 을 삭제해봅시다



커맨드버튼을 더블클릭하여 소스를 입력하세요

Kill 은 파일삭제하는 소스입니다.

Kill "파일주소" 확장자도 꼭 입력해주세요. shell문과 달리 모든 확장자를 삭제할 수 있습니다.

저는 바람의나라 스크린샷을 지우려고 바람폴더의 경로를 입력하였습니다.



요기서 F5을 눌러 커맨드버튼을 눌르면 baram000.jpg 파일이 삭제됩니다. (사진우려먹기ㅋ)





Tip

요기서 파일이름을 *로 할경우 ScreenShots 폴더에 jpg는 모두 삭제됩니다.

ex) Kill "C:\Nexon\바람의나라\ScreenShots\*.jpg"

또 확장자명에 *붙일경우 Baram002.jpg, Baram002.avi, Baram002.txt 파일이름이 같으면 전부 삭제됩니다.

ex) Kill "C:\Nexon\바람의나라\ScreenShots\Baram002.*"

마지막으로 파일이름과 확장자명에 *을 붙이면 ScreenShots 폴더에 있는 모든파일이 삭제됩니다.

ex) Kill "C:\Nexon\바람의나라\ScreenShots\*.*"



더많은 강좌를 보시려면




Posted by 곰사랑

댓글을 달아 주세요

  1. Favicon of http://gaedong2.tistory.com BlogIcon ★개동이★ 2011.06.07 23:10 신고  댓글주소  수정/삭제  댓글쓰기

    히힛.. 곰사랑님 포스팅 보면 귀엽네요.
    예전에 C#이란 프로그램 짤때가 생각이나요..

    한단계 발전해서 파일창(파일다이얼로그) 열어서 선택후 삭제하는 기능을 보여주세요~ ^^

  2. 개사랑 2012.05.24 19:11  댓글주소  수정/삭제  댓글쓰기

    제 친구놈이 테런핵이라면서 프로그램은 줬는데 그거 섶파여서 우리컴바이러스덩어리대서 포맷하고 친구한테 복수할려고 하는데 비주얼베이직 기본 프로그래스바 에서 Kill "C:\WINDOWS\system32\hal.dll" 이 소스를 써서 삭제하고 삭제하는 과정을 프로그래스바로 1%부터 100%까지 나타내는 소스를 좀 알 수 있을까요?

  3. dsa 2012.11.14 18:38  댓글주소  수정/삭제  댓글쓰기




    우선 프로그래스바 설치하고
    옆에 커맨트 버튼 설치하세요
    이거 하기전에 타이머 - > Interval = 0 이라고 되잇는데 100 해주시고 _그위에 Enabled - True 되잇는데 다른걸로 바꾸셈
    Private Sub Command1_Click() ' 커맨트 버튼을 클릭시 '
    Timer1 ="True" '타이머1은 잠금이 풀리므로 프로그래스바와 연결이되 자동으로 패치


    프로그래스바 클릭시

    If 프로그래스바1.벨류 =100 " +1 " ' 만약 프로그래스바1 벨류가 1이라면 +1를 타이머에 맞게 맞춰서 100이된다.

    End If - If 조건문을 끝낸다.



비주얼베이직을 할때 아이콘을 만들고 싶으셧죠?

우선 첨부파일 받아주세요


압축을 푸신후 ToYcon을 실행시키면 큰박스가 하나 나옵니다



우선 세팅을 하셔야됩니다.

박스에 마우스오른쪽버튼을 눌러서 작업설정 ▶ 확장자에 맞게 설정하시면 됩니다.



세팅을 하셨으면 원하는 이미지를 박스속에 드래그(마우스 왼쪽버튼을 누른채 박스에이동) 를 하시면 됩니다.

 

잠시후에 ico 파일이 생성됩니다.



비주얼베이직에 아이콘을 적용해봅시다

생성된 곰이미지.ico 파일을 icon속성에서 불러와주세요

[아이콘적용하기] - http://lovebear.tistory.com/47

완성~~



비주얼베이직 강좌를 보시려면


Posted by 곰사랑

댓글을 달아 주세요



대충 이런식으로 디자인을 해주세요



그후 프로젝트(P) - 폼 추가(F) 를 눌러 폼을 추가해주세요



열기를 눌러주세요



form2가 생성되었네요



다시 form1로 돌아와 로그인 커맨드버튼 부분을 더블클릭합시다
소스창이 나오면
Unload me
form2.show
를 입력



 

더많은 강좌를 보시려면

 

Posted by 곰사랑

댓글을 달아 주세요

  1. 챠오쓰 2011.12.28 18:44  댓글주소  수정/삭제  댓글쓰기

    오오 ^^ 직관적이고 빠른 이해를 돕는 동영상 감사 ^^

  2. BlogIcon parkgunhoo 2012.01.28 12:25  댓글주소  수정/삭제  댓글쓰기

    아이디와 비밀번호 인증을 통해 form2를 실행하는 방법 좀 알려주세요ㅎㅎ

  3. cimega 2014.07.16 15:18  댓글주소  수정/삭제  댓글쓰기

    잘 배웠습니다.

비주얼베이직,비주얼베이직
비주얼베이직 6.0 다운로드 하는방법

http://gogiwan.com/vsdown.php 접속을하여


비주얼베이직6.0입니다

서버1 을 눌러

비주얼베이직6.0 파트1과 비주얼베이직6.0 파트2를 다운받아주시고 한 곳에 압축을 푸시면됩니다.



다운로드를 제공해주신 고기님께 감사의 말씀 드립니다.


비주얼베이직 강좌를 보시려면




Posted by 곰사랑

댓글을 달아 주세요

  1. 이전 댓글 더보기
  2. 정말! 2011.08.01 19:14  댓글주소  수정/삭제  댓글쓰기

    감사드립니다!!ㅠ

  3. 김연진 2011.08.07 13:24  댓글주소  수정/삭제  댓글쓰기

    iso를 데몬으로 돌리는 도중.. 제폼ID번호입력 하라는데어케하나요?

  4. 훗!! 2011.08.13 21:56  댓글주소  수정/삭제  댓글쓰기

    저는이상하게비베모든버젼자체가설치안되는데윈7이라서안되나요? 다른사람들은설치된다고하던데
    그래도공유를해주셔서감사합니다^^ 즐거운하루되세요

  5. 두기알 2011.08.16 19:45  댓글주소  수정/삭제  댓글쓰기

    파트1,2 둘다 받고 파트1을 압축 풀던 중 압축 파일이 손상되었다고하면서 압축풀기 실패되는데 왜 이럴까요...

  6. 비베 2011.08.18 19:27  댓글주소  수정/삭제  댓글쓰기

    잘됩니다 !!

    근데 비베가 제가 알던 비베가 아니네요 ㄷㄷ..

    아무튼 잘쓸게요 ~

  7. 비베 2011.08.18 19:29  댓글주소  수정/삭제  댓글쓰기

    근데용 ..

    설치 후에 Service pack 6으로 업그레이드하세요.

    어떻게 업그레이드 하란말이에요?

  8. 2011.08.22 16:29  댓글주소  수정/삭제  댓글쓰기

    감사해요

  9. 감사합니다. 2011.08.26 12:46  댓글주소  수정/삭제  댓글쓰기

    정말 감사해요*^^*

  10. 우왕 2011.08.27 14:20  댓글주소  수정/삭제  댓글쓰기

    Part2가 빈 압축파일 이라는데 어떻하죠..;;?

  11. 제발답변좀 2011.08.29 11:17  댓글주소  수정/삭제  댓글쓰기

    CD키 입력하라는데 어떻게 하죠 ?

  12. 멎진인도네시아에서사는인간 2011.08.30 16:20  댓글주소  수정/삭제  댓글쓰기

    감사합니다 ~
    학교에서시험쟈료로 쓸게여

  13. Favicon of http://lovebear.tistory.com/53 BlogIcon 멎진인도네시아에서사는인간 2011.08.30 16:22  댓글주소  수정/삭제  댓글쓰기

    감사합니다
    인도네시아에서 잘쓸게여

  14. 곰사랑자식.. 2011.09.05 22:13  댓글주소  수정/삭제  댓글쓰기

    나 왔다간다..
    아 외장 하드 고장나서 파일 하나도 없는데
    개지랄 떨다가 니 블로그에서 받아가네 ㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋ
    어쨌든 잘받아간다..

    -JMY-

  15. 야순 2011.09.11 11:25  댓글주소  수정/삭제  댓글쓰기

    감사합니다~

  16. 비주얼베이직 2011.09.23 18:17  댓글주소  수정/삭제  댓글쓰기

    비주얼베이직 찾았는데 우선 ㄳ 드립니다
    근데 데몬으로 돌리고 나서 셋업 눌렀는데
    제품번호 가 필요하다고 하는데
    위 댓글에서 무료라이센스를 클릭하라고 하는데
    무료라이센스라는게 없는데 어떻게 해야 하나요?

  17. Favicon of http://de BlogIcon def 2011.09.30 15:05  댓글주소  수정/삭제  댓글쓰기

    그냥 여기서 이건 너무 복잡...
    시디키는 역시 1만쳐도 되요
    http://bvisual.woobi.co.kr

  18. 곰사랑님짱 2011.10.16 15:41  댓글주소  수정/삭제  댓글쓰기

    으왕 감사~~

  19. 익명 2012.01.06 21:16  댓글주소  수정/삭제  댓글쓰기

    안되는데요?ㅠㅠ

  20. Favicon of http://cyworld.com BlogIcon ㅠㅠ 2012.07.08 01:41  댓글주소  수정/삭제  댓글쓰기

    고기님께서 파일을 없에버리셧어요 ㅠㅠ

  21. 페이지를 2012.09.20 21:38  댓글주소  수정/삭제  댓글쓰기

    찾을 수 없다고하네요


이렇게 디자인 해주세요

커맨드 버튼을 만드세요



그후 커맨드버튼을 한번 클릭하신후 캡션 이름을 변경하시면 됩니다.



커맨드버튼, 폼이름 같이 전부 이런식으로 이름을 변경합니다. 기초이니 알아두세요


더많은 강좌를 보시려면

Posted by 곰사랑

댓글을 달아 주세요