将视频添加到VB.Net中的表单 [英] Adding video to a form in VB.Net

问题描述

是否可以使用VB.Net将影片添加到表单?

解决方案

以下是示例代码:

 私有 声明 功能 mciSendString 库 "  span> 别名 " ( ByVal  lpstrCommand  As  字符串， ByVal  lpstrReturnString  As   String ， As   ByVal  hwndCallback  As  长) As  长

私有 子 Form_Click()
 Dim  Ret  As  长，A 

，x As 整数，y 整数 x = 0 y = 0 A

= " ' 更改路径和文件名 Ret = mciSendString(" ，0 ，; 128 ， 0 ) Ret = mciSendString(" ，0 ，; 128 ， 0 ) Ret = mciSendString(" & A

Is it possible to add a movie to a form using VB.Net?

解决方案

Here is the sample code:

Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long

Private Sub Form_Click()
Dim Ret As Long, A

, x As Integer, y As Integer x = 0 y = 0 A

= "C:\Windows\Movie.avi" 'Change the path and filename Ret = mciSendString("stop movie", 0&, 128, 0) Ret = mciSendString("close movie", 0&, 128, 0) Ret = mciSendString("open AVIvideo!" & A

这篇关于将视频添加到VB.Net中的表单的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！