VB中播放WAV文件
http://zhidao.baidu.com/question/33440250.html
在模块中输入以下代码
Public Declare Function sndPlaySound Lib "winmm" Alias _
"sndPlaySoundA" (ByVal lpszSoundName As String, _
ByVal uFlags As Long) As Long
' flag uitzetten
Public Const SND_SYNC = &H0
Public Const SND_ASYNC = &H1
Public Const SND_NODEFAULT = &H2
Public Const SND_MEMORY = &H4
Public Const SND_LOOP = &H8
Public Const SND_NOSTOP = &H10
Public Sub PlaySound(strSound As String)
sndPlaySound strSound, SND_ASYNC Or SND_NODEFAULT
End Sub
在窗体中输入以下代码
Private Sub Form_Load()
PlaySound "D:\sound.wav"
End Sub
VB中播放WAV文件
作者：赵鹏
在多媒体软件的开发设计中，声音是一个相当重要的多媒体元素，优秀的声音设计会为多媒体软件增色不少。而WAV格式的声音文件是一种最常用的声音文件格式，也最容易得到，比如通过Win 95中的“录音机”程序，利用麦克风就可以非常简单地录制WAV文件。VB是一个相当经典的多媒体开发的工具，在VB中播放WAV文件的方法主要有这样几种。
一、利用OLE控件
建一窗体，用鼠标选择OLE控件，在窗体上拖出OLE区域，在图一的窗口中选择新建和声音然后按确定键就完成了在窗口中添加OLE控件，如图二。
这样就可以在OLE控件的ResourceDoc属性中选择所要播放的文件，程序运行时双击OLE控件即可。
在实际的程序设计当中，往往需要单击某个图标或按钮来控制声音的播放，其实现方法是这样的：首先将OLE控件的VISIBLE属性设置为FALSE,然后在图标或按钮的单击事件中编写如下的程序：
Private Sub Contol_Click()
OLE1.Action = 7
End Sub
二、利用MMControl控件
VB5.0提供了许多设计多媒体的控件，在PROJECT/COMPENENTS/CONTROLS中选择MMControls 控件，窗体上就出现了多媒体控件对象，在这个对象上有不同的图形功能标识，其名称从左到右分别是Pre、Next、Play、Pause、Back、Step、Stop、Record 、Eject 如图三。
这个多媒体控件可以播放多种格式的声音，播放WAV格式声音文件的程序代码
Private Sub form_load()
MMControl1.DeviceType = "waveaudio"
MMControl1.filen
相关文档：
建一个模块
Public Declare Function GetOpenFileName Lib "comdlg32.dll" Alias "GetOpenFileNameA" (pOpenfilename As OPENFILENAME) As Long
Public Type OPENFILENAME
lStructSize As Long
hwndOwner As Long
hInstance As Long
lpstrFilter As String
lpstrCustomFilt ......
http://topic.csdn.net/t/20060401/19/4656391.html
Private Declare Function GetCurrentProcess Lib "kernel32" () As Long
Private Declare Function SetPriorityClass Lib "kernel32" (ByVal hProcess As Long, ByVal dwPriorityClass As Long) As Long
Const IDLE_PRIORITY_CLASS = &H40 '新进程应该有非常低的 ......
引自：http://blog.csdn.net/yizia/archive/2006/09/19/1248669.aspx
访问远程数据库的情况有以下几种：
1）访问远程数据库的access数据库
2）访问远程mssql数据库或oracle等其他关系数据库，但是数据库通信端口被防火墙阻挡或其他网络原因造成无法使用该端口
本文仅在windows2000 advance server,mdac2.8下测试通过� ......
http://www.webuc.net/ddf3/archive/2005/08/25/6142.aspx
不用FSO的复制文件夹得方法？
用API函数 SHFileOperation
以下是使用SHFileOperation删除复制移动文件的例子，可以复制文件夹
Private Type SHFILEOPSTRUCT
hwnd As Long
wFunc As Long
pfrom As String
pTo As String
fFlags As ......
前阵子写了一个目录名/文件名的获取小程序，这两天居然又被名称批量修改麻烦了一下，所以再写一个吧。
注意：你要是只想写一次的话，用批处理更方便。只有多次使用的情况下，自己写程序才有意义。
VB中进行名称修改很容易,用到的就是Name这个函数，用法如下：
Name OldName As NewName，它不仅可以改写名称，而且可以更� ......
