로그인

Select the product you need help with

Visual Basic .NET 또는 Visual Basic 2005를 사용하여 오디오 파일 재생 방법

기술 자료: 821767 - 이 문서가 적용되는 제품 보기.

기계 번역 고지 사항 보기

기계 번역된 문서와 영문 원본 문서 나란히 보기

모두 확대 | 모두 축소

요약

이 문서에서는 Microsoft Visual Basic .NET 또는 Microsoft Visual Basic 2005를 사용하여 오디오 파일을 재생하는 방법에 대해 설명합니다. 이 문서에서는 다음 문서에서 설명하는 개념을 나타내는 예제 코드도 포함되어 있습니다.

요구 사항

다음은 권장되는 하드웨어, 소프트웨어, 네트워크 인프라 및 필요한 서비스 팩의 목록입니다.

Microsoft Windows Server 2003, Microsoft Windows 2000 Microsoft Windows XP의 경우 또는 Microsoft Windows XP 서비스 팩 1
Visual Basic .NET 또는 Visual Basic 2005

참고 이 문서에서 제공하는 코드 Microsoft Windows Server 2003에서 지원되지 않습니다.

이 문서에서는 사용자가 다음 항목을 잘 알고 있다고 가정합니다.

시각적 기본 .NET 또는 Visual Basic 2005 프로그래밍
% 소프트웨어 개발 (SDK) kit
구성 요소 개체 모델(COM) 상호 운용성 Visual Basic .NET에서 또는 Visual Basic 2005의

Windows 응용 프로그램 만들기

Microsoft Visual Studio .NET 또는 Microsoft Visual Basic 2005 시작하십시오.
파일 메뉴에서 새로 만들기를 가리킨 다음 프로젝트 를 클릭하십시오.
프로젝트 형식Visual Basic 프로젝트 를 클릭하십시오.

참고 Visual Studio 2005에서 프로젝트 형식 에서 Visual Basic 을 클릭하십시오.
템플릿 을 Windows 응용 프로그램.
이름 상자에 AudioDemo 를 입력한 다음 확인 을 누릅니다. 기본적으로 Form1.vb이 만들어집니다.

해당 응용 프로그램 % 컨트롤 추가

Visual Studio .NET 또는 Visual Studio 2005 시작하십시오.
도구 메뉴에서 도구 상자 항목 추가/제거를 클릭하십시오.

참고 Visual Studio .NET 2002 도구 메뉴에서 도구 상자 사용자 지정 을 누릅니다.

Visual Studio 2005 도구 상자 항목 선택도구 를 클릭합니다. 메뉴.
COM 구성 요소 탭을 클릭한 다음 찾아보기 를 클릭하십시오.
찾은 다음 Msdxm.ocx 를 클릭한 다음 열기 를 클릭하십시오.

참고 Msdxm.ocx 일반적으로 %WINDIR% 에 위치한/System32 %WINDIR% 사용자 컴퓨터의 Windows 디렉터리의 위치를 위치.
도구 상자 사용자 지정 또는 선택 도구 상자 항목 대화 상자에서 확인 을 누릅니다. Visual Studio .NET 2003 및 WindowsMediaPlayer Visual Studio 2005에서 컨트롤 도구 상자에 추가됩니다. Visual Studio .NET 2002에서 MediaPlayer 컨트롤 도구 상자에 추가됩니다.
Visual Studio .NET 2003 또는 Visual Studio 2005 WindowsMediaPlayer 컨트롤을 Form1에 추가하십시오. Visual Studio .NET 2002에서 MediaPlayer 컨트롤을 추가하십시오.
AxMediaPlayer1 Form1에 추가합니다.

Windows Media Player 제어 단추 추가

네 개의 단추 컨트롤을 Form1에 추가하십시오.
Button1 을 클릭하십시오.
텍스트 속성 창에서 변경할 속성을 로드 Button1.
Button2 를 클릭하십시오.
속성 창에서 Text 변경할 Button2 재생 하는 속성.
Button3 을 클릭하십시오.
텍스트 속성 창에서 변경할 속성을 Pause Button3.
Button4 를 클릭하십시오.
텍스트 속성 창에서 변경할 속성을 Stop Button4.

오디오 파일 로드 OpenFileDialog를 구성 추가

Form1에 OpenFileDialog를 구성 요소를 추가하십시오.

초기화 코드 추가

보기 메뉴에서 코드 를 클릭하십시오.
다음 코드를 "Windows Form 디자이너에서 생성한 코드" 영역 찾습니다:
InitializeComponent()

2단계에서 찾은 코드 뒤에 다음 코드를 추가하여:

' Disable the Play, the Pause, and the Stop buttons.
Button2.Enabled = False
Button3.Enabled = False
Button4.Enabled = False

' Hide the Windows Media Player.
AxMediaPlayer1.Visible = False

오디오 파일 로드 코드 추가

보기 메뉴에서 디자이너 를 클릭하십시오.

로드 컨트롤을 두 번 클릭한 다음 Button1_Click 이벤트-처리기에 다음 코드를 추가하여:

' Reset the file names for the Open File dialog box and for the Media Player.
OpenFileDialog1.FileName = ""
AxMediaPlayer1.FileName = ""
' Display the Open File dialog box.
OpenFileDialog1.ShowDialog()
' Verify that Cancel was not clicked.
If Not OpenFileDialog1.FileName = "" Then
   ' Disable the Load button.
   Button1.Enabled = False
   ' Prevent the Media Player from automatically playing loaded files.
   AxMediaPlayer1.AutoStart = False
   ' Set the Media Player audio file.
   AxMediaPlayer1.FileName = OpenFileDialog1.FileName
   MessageBox.Show("The following file has been loaded in the Media Player control: " + AxMediaPlayer1.FileName)
   ' Enable the Play button.
   Button2.Enabled = True
Else
   ' Disable the Play button.
   Button2.Enabled = False
End If

오디오 파일 재생 코드 추가

보기 메뉴에서 디자이너 를 클릭하십시오.

재생 컨트롤을 두 번 클릭한 다음 Button2_Click 이벤트-처리기에 다음 코드를 추가하여:

' Disable the Load and the Play buttons.
Button1.Enabled = False
Button2.Enabled = False
' Play the audio file.
AxMediaPlayer1.Play()
' Enable the Pause and the Stop buttons.
Button3.Enabled = True
Button4.Enabled = True

오디오 파일 일시 중지 코드 추가

보기 메뉴에서 디자이너 를 클릭하십시오.

일시 중지 컨트롤을 두 번 클릭한 다음 Button3_Click 이벤트-처리기에 다음 코드를 추가하여:

' Disable the Pause button.
Button3.Enabled = False
' Pause the audio file.
AxMediaPlayer1.Pause()
' Enable the Play button.
Button2.Enabled = True

오디오 파일 중지 코드 추가

보기 메뉴에서 디자이너 를 클릭하십시오.

중지 컨트롤을 두 번 클릭한 다음 Button4_Click 이벤트-처리기에 다음 코드를 추가하여:

' Disable the Pause and the Stop buttons.
Button3.Enabled = False
Button4.Enabled = False
' Stop playing the audio file, and then reset the next play position to the beginning.
AxMediaPlayer1.Stop()
AxMediaPlayer1.CurrentPosition = 0
' Enable the Load and the Play buttons.
Button1.Enabled = True
Button2.Enabled = True

예제 코드 (Form1.vb) 목록

Option Strict On

Public Class Form1
    Inherits System.Windows.Forms.Form

#Region " Windows Form Designer generated code "

    Public Sub New()
        MyBase.New()

        ' This call is required by the Windows Form Designer.
      InitializeComponent()

      ' Disable the Play, the Pause, and the Stop buttons.
      Button2.Enabled = False
      Button3.Enabled = False
      Button4.Enabled = False

      ' Hide the Media Player.
      AxMediaPlayer1.Visible = False
      
        ' Add any initialization after the InitializeComponent() call.

    End Sub

    ' Form overrides Dispose to clean up the component list.
    Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
        If disposing Then
            If Not (components Is Nothing) Then
                components.Dispose()
            End If
        End If
        MyBase.Dispose(disposing)
    End Sub

    ' Required by the Windows Form Designer.
    Private components As System.ComponentModel.IContainer

    ' NOTE: The following procedure is required by the Windows Form Designer
    ' It can be modified using the Windows Form Designer.  
    ' Do not modify it using the code editor.
   Friend WithEvents AxMediaPlayer1 As AxMediaPlayer.AxMediaPlayer
   Friend WithEvents Button1 As System.Windows.Forms.Button
   Friend WithEvents Button2 As System.Windows.Forms.Button
   Friend WithEvents Button3 As System.Windows.Forms.Button
   Friend WithEvents Button4 As System.Windows.Forms.Button
   Friend WithEvents OpenFileDialog1 As System.Windows.Forms.OpenFileDialog
   <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
      Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(Form1))
      Me.AxMediaPlayer1 = New AxMediaPlayer.AxMediaPlayer
      Me.Button1 = New System.Windows.Forms.Button
      Me.Button2 = New System.Windows.Forms.Button
      Me.Button3 = New System.Windows.Forms.Button
      Me.Button4 = New System.Windows.Forms.Button
      Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog
      CType(Me.AxMediaPlayer1, System.ComponentModel.ISupportInitialize).BeginInit()
      Me.SuspendLayout()
      '
      'AxMediaPlayer1
      '
      Me.AxMediaPlayer1.Location = New System.Drawing.Point(224, 0)
      Me.AxMediaPlayer1.Name = "AxMediaPlayer1"
      Me.AxMediaPlayer1.OcxState = CType(resources.GetObject("AxMediaPlayer1.OcxState"), System.Windows.Forms.AxHost.State)
      Me.AxMediaPlayer1.Size = New System.Drawing.Size(286, 225)
      Me.AxMediaPlayer1.TabIndex = 0
      '
      'Button1
      '
      Me.Button1.Location = New System.Drawing.Point(16, 72)
      Me.Button1.Name = "Button1"
      Me.Button1.TabIndex = 1
      Me.Button1.Text = "Load"
      '
      'Button2
      '
      Me.Button2.Location = New System.Drawing.Point(32, 104)
      Me.Button2.Name = "Button2"
      Me.Button2.TabIndex = 2
      Me.Button2.Text = "Play"
      '
      'Button3
      '
      Me.Button3.Location = New System.Drawing.Point(40, 136)
      Me.Button3.Name = "Button3"
      Me.Button3.TabIndex = 3
      Me.Button3.Text = "Pause"
      '
      'Button4
      '
      Me.Button4.Location = New System.Drawing.Point(56, 192)
      Me.Button4.Name = "Button4"
      Me.Button4.TabIndex = 4
      Me.Button4.Text = "Stop"
      '
      'Form1
      '
      Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
      Me.ClientSize = New System.Drawing.Size(712, 397)
      Me.Controls.Add(Me.Button4)
      Me.Controls.Add(Me.Button3)
      Me.Controls.Add(Me.Button2)
      Me.Controls.Add(Me.Button1)
      Me.Controls.Add(Me.AxMediaPlayer1)
      Me.Name = "Form1"
      Me.Text = "Form1"
      CType(Me.AxMediaPlayer1, System.ComponentModel.ISupportInitialize).EndInit()
      Me.ResumeLayout(False)

   End Sub

#End Region

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
      ' Reset the file names for the Open dialog box and for the Media Player.
      OpenFileDialog1.FileName = ""
      AxMediaPlayer1.FileName = ""
      ' Display the Open File dialog box.
      OpenFileDialog1.ShowDialog()
      ' Verify that Cancel was not clicked.
      If Not OpenFileDialog1.FileName = "" Then
         ' Disable the Load button.
         Button1.Enabled = False
         ' Prevent the Media Player from automatically playing loaded files.
         AxMediaPlayer1.AutoStart = False
         ' Set the Media Player audio file.
         AxMediaPlayer1.FileName = OpenFileDialog1.FileName
         MessageBox.Show("The following file has been loaded in the Media Player control: " + AxMediaPlayer1.FileName)
         ' Enable the Play button.
         Button2.Enabled = True
      Else
         ' Disable the Play button.
         Button2.Enabled = False
      End If
   End Sub

   Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
      ' Disable the Load and the Play buttons.
      Button1.Enabled = False
      Button2.Enabled = False
      ' Play the audio file.
      AxMediaPlayer1.Play()
      ' Enable the Pause and the Stop buttons.
      Button3.Enabled = True
      Button4.Enabled = True
   End Sub

   Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
      ' Disable the Pause button.
      Button3.Enabled = False
      ' Pause the audio file.
      AxMediaPlayer1.Pause()
      ' Enable the Play button.
      Button2.Enabled = True
   End Sub

   Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
      ' Disable the Pause and the Stop buttons.
      Button3.Enabled = False
      Button4.Enabled = False
      ' Stop playing the audio file, and then reset the next play position to the beginning.
      AxMediaPlayer1.Stop()
      AxMediaPlayer1.CurrentPosition = 0
      ' Enable the Load and the Play buttons.
      Button1.Enabled = True
      Button2.Enabled = True
   End Sub
End Class

참고 Visual Basic 2005의 코드를 변경해야 합니다. Windows Forms 만들 때 기본적으로 Visual Basic 프로젝트에 대한 두 개의 파일을 만듭니다. 프로젝트. Form1이라는 폼의 경우 폼을 나타내는 두 개의 파일은 Form1.vb Form1.Designer.vb 이름이 지정됩니다. Form1.vb 파일의 코드를 작성합니다. Windows Forms 디자이너 코드 Form1.Designer.vb 파일에 씁니다. Windows Forms 디자이너 partial 키워드를 사용하여 두 개의 파일이 Form1의 구현을 나눕니다. 이 디자이너에서 생성한 코드 코드와 함께 삽입되어 방지됩니다.

새로운 Visual Basic 2005 언어 향상 기능에 대한 자세한 내용은 다음 MSDN) Microsoft 개발자 네트워크 (웹 사이트를 방문하십시오.

http://msdn2.microsoft.com/en-us/library/ms379584(vs.80).aspx

(http://msdn2.microsoft.com/en-us/library/ms379584(vs.80).aspx)

자세한 내용은 부분 클래스 및 Windows Forms 디자이너, 다음 MSDN 웹 사이트를 방문하십시오:

http://msdn2.microsoft.com/en-us/library/ms171843.aspx

(http://msdn2.microsoft.com/en-us/library/ms171843.aspx)

코드 작동하는지 확인하십시오.

빌드 메뉴에서 눌러 빌드 솔루션.
응용 프로그램이 실행되도록 하려면 디버그 메뉴에서 시작 을 클릭하십시오. Form1이 나타납니다.
로드 를 클릭하십시오. 열기 대화 상자가 나타납니다.
찾은 및 모든 유효한 오디오 파일을 선택한 다음 열기 를 클릭하십시오. 전체 파일 경로 사용하여 메시지 상자가 나타납니다.
확인 을 눌러 메시지 상자를 닫습니다.
오디오 파일의 재생을 시작하려면 재생 을 클릭하십시오. 해당 오디오 출력을 들을 수 있습니다.

참고 컴퓨터에 사운드 카드가 올바르게 구성된 경우 및 출력 들을 수, earphones, 스피커나 헤드폰을 사용하는 경우 오디오 출력을 들을 수 있습니다.
일시 중지 또는 중지 응용 프로그램에서 오디오 출력 제어하려면 누릅니다.

문제 해결

컴퓨터에 사운드 카드가 올바르게 구성된 경우 및 출력 들을 수, earphones, 스피커나 헤드폰을 사용하는 경우 오디오 출력을 들을 수 있습니다.
재생 을 전에 오디오 출력을 들을 수 있습니다. 미디어 플레이어 자동 시작 속성을 false 로 설정된 경우 이 문제가 발생합니다. 기본적으로 자동 시작 속성은 true 로 설정됩니다. 이 문제를 해결할 수 있는 "Windows Form 디자이너에서 생성한 코드" 영역 다음 줄을 찾습니다:
InitializeComponent()
다음 위치한 있어야 코드 뒤에 다음 코드를 추가합니다.
' Prevent the Media Player from automatically playing loaded files. AxMediaPlayer1.AutoStart = False
중지 를 다음 재생 을 누르면 오디오 파일을 처음부터 재생을 시작할 수 있습니다. 대신, 오디오 파일 위치를 파일 재생을 중지할 것을 재생을 시작합니다. 재생 위치를 오디오 파일의 시작 부분에 다시 설정할 때 이 문제가 발생합니다. 이 문제를 해결하려면 다음 코드를 Button4_Click 이벤트 처리기가 있는 사용하십시오:
AxMediaPlayer1.CurrentPosition = 0
이 샘플에서는 %에 의해 지원되지 않는 오디오 형식이 재생되지 않을 수 있습니다.

위로 가기 | 피드백 보내기

참조

자세한 내용은 다음 Microsoft 개발자 네트워크 (MSDN) 웹 사이트를 방문하십시오.

Windows Media Player 6.4에서 SDK
http://msdn2.microsoft.com/en-us/library/ms984011.aspx

(http://msdn2.microsoft.com/en-us/library/ms984011.aspx)

COM Interop
http://msdn2.microsoft.com/en-us/library/6bw51z5z(vs.71).aspx

(http://msdn2.microsoft.com/en-us/library/6bw51z5z(vs.71).aspx)

위로 가기 | 피드백 보내기

속성

기술 자료: 821767 - 마지막 검토: 2007년 11월 26일 월요일 - 수정: 2.8

본 문서의 정보는 다음의 제품에 적용됩니다.

Microsoft Visual Basic 2005
Microsoft Visual Basic .NET 2003 Standard Edition
Microsoft Visual Basic .NET 2002 Standard Edition

kbmt kbvs2005applies kbvs2005swept kbwaveaudio kbsdk kbcominterop kbcomctrls kbsound kbinterop kbappdev kbctrl kbcontrol kbprogramming kbsample kbhowtomaster KB821767 KbMtko

기계 번역된 문서

중요: 본 문서는 전문 번역가가 번역한 것이 아니라 Microsoft 기계 번역 소프트웨어로 번역한 것입니다. Microsoft는 번역가가 번역한 문서 및 기계 번역된 문서를 모두 제공하므로 Microsoft 기술 자료에 있는 모든 문서를 한글로 접할 수 있습니다. 그러나 기계 번역 문서가 항상 완벽한 것은 아닙니다. 따라서 기계 번역 문서에는 마치 외국인이 한국어로 말할 때 실수를 하는 것처럼 어휘, 구문 또는 문법에 오류가 있을 수 있습니다. Microsoft는 내용상의 오역 또는 Microsoft 고객이 이러한 오역을 사용함으로써 발생하는 부 정확성, 오류 또는 손해에 대해 책임을 지지 않습니다. Microsoft는 이러한 문제를 해결하기 위해 기계 번역 소프트웨어를 자주 업데이트하고 있습니다.

이 문서의 영문 버전 보기.

위로 가기 | 피드백 보내기