UC知道如何用VB写一个简单的窗体？
来源：百度知道 编辑：UC知道 时间：2024/05/22 17:10:06
我想做一个类似于pplive的窗体，不需太多的功能，只要打开这个窗体就可以直接打开我指定的网页，这个网页我做得跟PPlive是差不多的http://union.xunlei.com/center/kankan/img/pic_kankan.jpg
请问如何实现？
还有我这个网页本身也是一个网络电视点播平台，它必须要基于最新的迅雷才能播放的，我想做成这个窗体直接加载迅雷，请问又何实现？
<!--请在页面中需要展现的位置加入代码，尺寸为1000x420-->
<script language="JavaScript" src="http://cop.my.xunlei.com/kankan/xlkkplayer.js"
type="text/javascript">
</script>
<script>
xlkkplayer("full","36959",1000,420);
</script>
请问如何实现？
还有我这个网页本身也是一个网络电视点播平台，它必须要基于最新的迅雷才能播放的，我想做成这个窗体直接加载迅雷，请问又何实现？
<!--请在页面中需要展现的位置加入代码，尺寸为1000x420-->
<script language="JavaScript" src="http://cop.my.xunlei.com/kankan/xlkkplayer.js"
type="text/javascript">
</script>
<script>
xlkkplayer("full","36959",1000,420);
</script>
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Sub Command1_Click()
RunIe "http://www.baidu.com"
End Sub
Private Sub RunIe(ByVal Url As String)
ShellExecute 0, vbNullString, "IEXPLORE.EXE " & Url, vbNullString, vbNullString, vbNormalFocus
End Sub