• 注册
  • 关于作者
    企业认证:趣记站长
    关注 6 粉丝 4 喜欢 9 内容 992
    江西省·南昌市
    聊天 送礼
    • 查看作者
    • VB.NET中声响的播放

          由VB6升级为.NET后,有些人不清楚声响的措置责罚,比如递次出错的时候,自定义一个声响播放,也许递次的背景音乐、搜罗游戏音乐等等。下面引见几种在VB.NET中盘算俭朴可以或许完成的设计:

      1.  Beep

      最俭朴的一种方法,经过历程盘算机的扬声器发出声响, 声响的音高与持续时间取决于硬件和系统软件,从而随盘算机不合而不合。

      Beepg跟Msgbox等方法位于Microsoft.VisualBasic.Interaction 中,一样寻常默许系统会自动加载。调用很俭朴,看下面的例子。

      Dim I As Integer

      For I = 1 To 100   ' Loop 100 times.

           Beep()      '  Sound a tone.

      Next I

      2. 用Win32 API PlaySound

      PlaySound位于"winmm.dll"中,可以或许根据输入参数的不合,播放WAV类型的音乐。在VB.NET中调用跟VB6中差不多:

      先声明:

      Private Declare Auto Function PlaySound Lib "winmm.dll" (ByVal lpszSoundName As String, ByVal hModule As Integer, ByVal dwFlags As Integer) As Integer

      Const SND_FILENAME As Integer = &H20000

      Const SND_ALIAS As Integer = &H10000

      Const SND_SYNC As Integer = &H0

      细致尚有很多常量,

      在JAVA中连接Sybase数据库
      JAVA中sleep()、wait()、yield()、join()方法浅析,探秘Java 7新增垃圾回收器G1特性,Java按字节长度截取字符串,Java解析XML文件的四种方法,Java和.NET互操作:应该放弃Web Service吗,Java源代码的折行规则,JAVA进阶:一个简单Thread缓冲池的实现,Java语言中Timer类的简洁用法,JAVA进阶:一个简单Thread缓冲池的实现,JAVA进阶:一个简单Thread缓冲池的实现,Java Swing中键盘事件的处理,Java多线程设计模式:了解wait/notify机制,JAVA基础:解读内存优化编程,JAVA文件中获取该项目的相对路径方法,JAVA高手解析XML配置文件的读取操作,java操作Excel的一种方法,JDK5的ProcessBuilder介绍和使用实例,一个Java程序员应该掌握的10项技能,获取java线程中信息的两种方法,Java语言中内存管理的几个技巧
      JAVA

      不一一列举,下面是播放一个wav文件的例子

      Dim mstrfileName As String = "c:\eagle2.wav"

      PlaySound(mstrfileName, 0, SND_FILENAME)

      注意上面的播放诟谇同步的,就是说它并不会播放结束才终了。如果把上面的代码写在一个Button.Click的事件措置责罚递次中,第二次点击的时候它会打断第一次的播放,重新开始。

      当然我们也可以或许调用系统的声响:

      PlaySound("SystemStart", 0, SND_ALIAS Or SND_SYNC)

      ' 以同步的体式款式调用系统启动时候的声响。

      3.  调用媒体播放器控件

      VB.NET中并没有供给媒体播放器的.NET组件,没办法我们还是调用之前Com组件Windows Media Player。当然除声响外,还可以或许播放视频文件。

      首先把媒体播放器控件加到工具栏中,调用还是俭朴的写一下吧:)

      Private Sub playMediaFile(ByVal mediaFileName As String)

        With MediaPlayer1

         .Stop()

         .FileName = "c:\mp3\爱不爱我.mp3"

         .Play()

        End With

      End Sub

      总结:虽然VB.NET比VB6改变了很多,搜罗真正的OOP,多线程等等,但是总归还是跟VB有很多联系,提议大家碰到难于处置惩罚的问题的时候,试一下之前的措置责罚体式款式,一样寻常都能奏效

      切割一个Container中的图片
      用VB创建FTP组件(get),Visual Basic构建线程安全的Singleton,如何实现VB与EXCEL的无缝连接,vb中利用xmlhttp来下载远程文件,vb中使用正则表达式,ASP.NET中Cookie编程的基础知识,MASM-打字练习程序,用VB制作注册软件的方法,VB程序中数据库的图片处理的解决方法,用VB编写键盘拦截程序,用VB实现客户——服务器(TCP/IP)编程实例,利用Visual Basic 实现无线通讯,VB 中资源文件的多种使用技巧,VB中资源文件的具体使用方法,vb接收GPS数据源码全,VB6中使用Winsock穿越各种代理的实现(TCP协议),VB实现文字“闪入”显示的特殊效果,VB对注册表操作程序开机时运行,VB将OCX植入执行文件内,利用VB函数Dir()实现递归搜索目录
      Visual Basic

    • 0
    • 0
    • 0
    • 76
    • 单栏布局 侧栏位置: