网站导航免费论文 原创论文 论文搜索 原创论文 网学软件 学术大家 资料中心 会员中心 问题解答 原创论文 论文素材 设计下载 最新论文 下载排行 论文上传 在线投稿 联系我们
返回网学首页
网学联系
最新论文 推荐专题 热门论文 素材专题
当前位置: 网学 > 编程文档 > VB.net > 正文
用VB.net2008打造你的影音播放器
来源:Http://myeducs.cn 联系QQ:点击这里给我发消息 作者: 用户投稿 来源: 网络 发布时间: 12/10/15
下载{$ArticleTitle}原创论文样式
本篇文章的主要开发环境是Visual Studio 2008,Visual Studio系列产品一直以来都提供了强大的控件功能,然而我们利用这些控件可以编写出功能强大的应用程序。本文主要利用微软的最新.net开发工具为大家展示一个应用程序的开发过程,让大家对添加/引用控件更加熟悉,很适合.net开发工具的初学者,具有一定的实用价值。

  打开 Visual Studio 2008在文件 (File) 菜单上,单击新建项目 (New Project)。 在新建项目 (New Project) 对话框的模板 (Templates) 窗格中,单击 Windows 应用程序(Windows Application)。单击确定 (OK)  

 由于我们需要以Windows Media Player作为播放控件,所以我们需要将Windows Media Player的控件添加到我们的工具箱,在此之前请安装最新的Windows Media Player SDK或者Windows Media Player播放器即可,一般情况下系统都默认安装了这个播放器。如果你确定已经安装了请搜索wmp.dll这个文件(一般存在\system32 \wmp.dll),如搜索完成后直接将此控件拖入我们的控件工具箱即可 。 

拖入我们的工具箱
 
选择此控件拖入我们的Form1界面

选择Form1窗体,在Form1窗体中添加如下控件:
OpenFileDialog1控件、Timer1控件、MenuStrip1、SaveFileDialog1、FolderBrowserDialog1 ListBox1控件、HScrollBar1控件

3个按钮控件分别为:Button1、Button2、Button3
控件属性设置如下:
Button1 Text: 打开
Button2 Text: 播放
Button3 Text: 停止
MenuStrip1 添加菜单选项 文件
MenuStrip1 菜单选项 打开
MenuStrip1 菜单选项 打开目录
MenuStrip1 菜单选项 关闭

进入Button1_Click事件
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
      
        OpenFileDialog1.InitialDirectory = "c:\"
        OpenFileDialog1.Filter = "mp3 文件(*.mp3)|*.mp3|CD音频文件(*.wav)|*.wav|" & "视频(*.asf)|*.asf|所有文件(*.*)|*.*"

        If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
            AxWindowsMediaPlayer1.URL = OpenFileDialog1.FileName
            ListBox1.Items.Add(OpenFileDialog1.FileName)
        End If
End Sub

进入Button2_Click事件
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        If Button2.Text = "播放" Then
            AxWindowsMediaPlayer1.Ctlcontrols.pause()
            Button2.

网学推荐

免费论文

原创论文

浏览:
设为首页 | 加入收藏 | 论文首页 | 论文专题 | 设计下载 | 网学软件 | 论文模板 | 论文资源 | 程序设计 | 关于网学 | 站内搜索 | 网学留言 | 友情链接 | 资料中心
版权所有 QQ:3710167 邮箱:3710167@qq.com 网学网 [Myeducs.cn] 您电脑的分辨率是 像素
Copyright 2008-2015 myeducs.Cn www.myeducs.Cn All Rights Reserved
湘ICP备09003080号