十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
小编给大家分享一下VB.NET如何复制读取音频文件到剪贴板,希望大家阅读完这篇文章之后都有所收获,下面让我们一起去探讨吧!
成都创新互联公司是一家集网站建设,禹王台企业网站建设,禹王台品牌网站建设,网站定制,禹王台网站建设报价,网络营销,网络优化,禹王台网站推广为一体的创新建站企业,帮助传统企业提升企业形象加强企业竞争力。可充分满足这一群体相比中小企业更为丰富、高端、多元的互联网需求。同时我们时刻保持专业、时尚、前沿,时刻以成就客户成长自我,坚持不断学习、思考、沉淀、净化自己,让我们为更多的企业打造出实用型网站。
示例代码
Public Class Form1 'VB.Net复制读取音频文件并复制到剪贴板 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Try Dim MyData As Byte() MyMyData = My.Computer.FileSystem.ReadAllBytes("WindowsXP.wav") My.Computer.Clipboard.SetAudio(MyData) MessageBox.Show("已经成功将音频数据VB.Net复制到剪贴板!", "51cto提示", MessageBoxButtons.OK, MessageBoxIcon.Information) Catch ex As Exception MessageBox.Show("将音频数据复制到剪贴板出现错误,请检查音频文件是否已经存在?", "51cto提示", MessageBoxButtons.OK, MessageBoxIcon.Error) End Try End Sub '粘贴剪贴板音频数据并播放 Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Try Dim MyData As Object MyMyData = My.Computer.Clipboard.GetData(DataFormats.WaveAudio) My.Computer.Audio.Play(MyData, AudioPlayMode.Background) Catch ex As Exception MessageBox.Show("剪贴板上不存在指定的音频数据!", "51cto提示", MessageBoxButtons.OK, MessageBoxIcon.Error) End Try End Sub '清空剪贴板上的音频数据 Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click My.Computer.Clipboard.Clear() End Sub End Class
看完了这篇文章,相信你对“VB.NET如何复制读取音频文件到剪贴板”有了一定的了解,如果想了解更多相关知识,欢迎关注创新互联行业资讯频道,感谢各位的阅读!