在VB程式設計中，如何實現加入聲音

阿新 • • 發佈：2019-02-07

新增一個WindowsMediaPlayer控制元件放到窗體裡，然後寫程式碼：

Private Sub Command1_Click()
WindowsMediaPlayer1.URL = "123.mp3" '這句程式碼的意思是播放程式所在資料夾中的123.mp3

'URL後面添地址,可以是網址

第一種Private Sub Form_Load()

Set a = CreateObject("wmplayer.ocx")
a.url = "E:\mp3\花好月圓.mp3" '你可在此改成你的樂曲
a.settings.playCount = 99999
End Sub

Private Sub Form_Unload(Cancel As Integer)

a.Controls.stop
a.Close
Set a = Nothing
End Sub

第二種加個Windows Media Player控制元件

在VB程式設計中，如何實現加入聲音

新增一個WindowsMediaPlayer控制元件放到窗體裡，然後寫程式碼： Private Sub Command1_Click() WindowsMediaPlayer1.URL = "123.mp3" '這句程式碼的意思是播放程式所在資料夾中的123.mp3

windows程式設計中，如何讓一個視窗實現真正的置頂

也許你會說，很簡單啊。用“::SetWindowPos(m_hWnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_SHOWWINDOW | SWP_NOSIZE | SWP_NOMOVE);”這個函式不就一下子可以解決了。然而事實有時卻沒有這麼容易。

將日誌記錄在是mysql中，實現loganalyzer

mysql 日誌報表三臺主機 192.168.191.106（代號106）產生日誌 192.168.191.107（代號107）實現存放日誌的數據庫 192.168.191.173（代號173）實現日誌報表 1、實現rsyslog將日誌記錄於M

在Linux系統中，實現LVM邏輯卷管理及磁盤配額

Linux LVM邏輯卷磁盤管理配額 LVM（Logical Volume Manager）是Linux系統中對磁盤分區進行管理的一種邏輯機制，他是建立在磁盤和分區之上的一個邏輯層，能夠在保持現有數據不變的情況下動態調整磁盤容量，從而提高磁盤管理的靈活性。 1. 執行命令 fdisk -l 來查

在GNS3中，實現switch，router，虛擬機 pc互聯互通

roc cdd name 路由器適配命令 ccf address ces 實驗環境：GNS3 ，虛擬機 1.打開虛擬機，選擇編輯項裏面的-虛擬網絡編輯器 2.選擇-添加網絡，確定後重啟宿主機 3.重啟後，打開GNS3，拖入一個路由器 4.右擊router，選擇-Chan

相簿選取圖片插入到EditText中，實現圖文混排

1.首先用到了 ImagePicker，上github搜尋仿微信圖片選擇就能找到 2.匯入ImagePicker的包 compile 'com.squareup.picasso:picasso:2.5.2' 3.我是用是 picasso載入圖片，github上imag

如何在react中，實現可伸縮的echarts圖表

1，基礎篇我們在使用echart，基本使用，可以使用script標籤引入的方式進行使用，也可以使用npm的方式，進行載入echarts。 script的方式，非常簡單，就像我們的jquery一樣，引入這樣的一個js檔案就可以使用echarts了。然後echarts的核心就是例項化一

VB.net中，給類新增事件

定義一個全新的類 Public Class TestEvent Public Event testEvent_Name(ByVal testString As String) '定義一個事件，差不多像一個函式宣告，也想一個委託宣告 Public Sub

Java併發程式設計中volatile實現過程詳細解析

首先併發程式設計有三大特性：可見性，有序性，原子性。volatile關鍵字實現了前面兩個特性。那麼它是如何實現這兩個特性的呢？　　首先是可見性。可見性主要是讓快取，直接寫穿透到主存中。然後另外的cpu 通過底層的硬體層面的嗅探，可以發現自己cpu本地的快取已經失效。然後到主存中直接讀取。

ArcGIS中，實現兩點間連線

轉載：ArcGIS中，一個點集裡的點兩兩連線，比如有4個點，就連3+2+1=6條線一、目標　　一個點集裡的點兩兩連線，比如有4個點，則連3+2+1=6條線；有38個點，則連37+36+35+···+3+2+1=703條線，其原始座標資料及最終樣式類似於以下這種：　 →

在微信中，實現微信點擊鏈接或者掃描二維碼在瀏覽器中打開指定的鏈接

eba oid 體驗直接 p s 營銷商城鏈接 app 這個問題我查看了許多資料，最後總結一下：我首先看了IOS端微信關於下載app的整個邏輯：關於公眾號裏面關於微官網裏面的app下載，如果你將你的應用中在微信開發平臺認證過來，這個是要掏錢的；你點微官網app的下

pyQuery在python中，實現css選擇器功能

# -*- coding=utf-8 -*- import sys import pdb from pyquery import PyQuery as pyq import urllib url=r'http://list.taobao.com/browse/cat-0.

嵌入式程式設計中，我們該如何提高自己的程式設計水平

原文：http://www.sohu.com/a/145433685_432282 對於程式設計師而言，我們該如何提高自己的程式設計水平呢，凌陽教育的老師說過如果與真正的高手們比起來，拿我們還是差的太遠。在生活中，有誰是輕輕鬆鬆的就能提高自己的能力啊，世界上並沒有成為高手的間接捷徑，但是還是有一

演算法=邏輯+控制: 在邏輯式程式設計中，程式設計師只需表達邏輯，而控制交給程式語言的直譯器或編譯器去管理

“邏輯式語言著眼於關係而非函式，對付這類問題正是它的拿手好戲。”冒號聲音逐漸高亢，“大家應該都聽說過等式‘演算法+資料結構=程式’吧？這是Pascal設計者Niklaus Wirth的一本著作的書名，它刻畫了過程式尤其是結構化程式設計的思想。後來Robert Kowalski進一步提出：演算法=邏輯+控制。其

網路程式設計中，同步傳輸和非同步傳輸有什麼區別

在網路通訊過程中，通訊雙方要交換資料，需要高度的協同工作。為了正確的解釋訊號，接收方必須確切地知道訊號應當何時接收和處理，因此定時是至關重要的。在計算機網路中，定時的因素稱為位同步。同步是要接收方按照發送方傳送的每個位的起止時刻和速率來接收資料，否則會產生誤差。通常可以

Web程式設計中，常見的亂碼解決方案

1、資料庫端： Create database mydb default character set utf8; 連線MYSQL時的URL： jdbc:mysql://localhost:3306/mydb?useUnicode=true&characterE

VB 載入winIO，實現驅動級鍵盤模擬

最近用VB做外掛，模擬滑鼠實現自動化操作。發現驅動級模擬，一直存在問題。今天終於解決了，記錄下. --------------------------------------------------------------------------------- 系統環

增強型MyEclipse6.5中，實現輸入任意字母后都會有提示（詳細圖文）

原強烈推薦：MyEclipse6.5中，實現輸入任意字母后都會有提示（詳細圖文） 2012年07月04日 15:03:17 LuAndy 閱讀數：2664 標籤： myeclipse triggers 文字編輯 java file import 更多個人分類： Eclipse 版權宣告

SignalR SelfHost實時訊息,整合到web中，實現伺服器訊息推送

先前用過兩次SignalR，但是中途有段時間沒弄了，今天重新弄，發現已經忘得差不多了，做個筆記！首先建立一個控制檯專案Nuget新增引用聯機搜尋：Microsoft.AspNet.SignalR.SelfHostMicrosoft.Owin.Cors 在Program.cs新增程式碼新增一個

vue中，實現錨點定位及跳轉（url不發生變化）

直接上程式碼<div class="footer" @click="returnTop"> methods:{ returnTop:function(){ document.querySelector("#header").scrollIntoVi

在VB程式設計中，如何實現加入聲音

相關推薦