下载月排行
立即下载VB网络电视编写
软件大小: | 12.9 MB |
---|---|
软件语言: | 简体中文 |
软件类别: | 黑客教学 - 黑客动画 |
授权方式: | 共享版 |
应用平台: | Win9X/2000/XP/2003/ |
更新时间: | 2008/8/19 13:34:33 |
开 发 商: | 暂无信息 |
联 系 人: | 暂无联系方式 |
分享收藏 | |
解压密码: | 本站默认解压密码:www.987654321sf.com |
推荐等级: | |
会员中心: | 【账号登录】 【账号注册】 开通VIP下载流程 |
查毒情况: |
[复制下载页面地址给QQ/MSN上的好友]软件介绍
大家好 我是 shadowplayer QQ:454827094 今天给大家带来的教程
是VB简单编写自己的网络电视小程序。
教程开始之前先来推荐下一个不错的学习网站 www.3800hk.com,在这
里可以找到你想要的所有教程。
好了,教程开始,程序比较简单,大家看下就知道了,主要是给菜鸟朋
友们试试手,老鸟就飘过吧。
先打开VB环境,新建工程,主要就是要用到一个部件 WindowsMediaPlayer,
这个东西我想大家都不陌生吧,剩下的事就是加几个网络电视直播地址了,我就
在菜单上添加几个试试,我们先给WindowsMediaPlayer控件改个名字吧,就改成
WMP1吧。好了,再添加一句代码 wmp1.URL ="网络电视地址" 。我在后面给
大家提供几个地址,别的大家自己去网上找找。好了就添加这两个吧。
电视台添加好了,我们在来给这个WMP添加一个全屏播放的功能,一般的播放
器我们都能双击全屏播放,我们就来添加这个代码,我们找到DoubleClick事件
If WMP1.fullScreen = False Then
WMP1.fullScreen = True
ElseIf WMP1.fullScreen = True Then
WMP1.fullScreen = False
End If
意思就是先判断现在是不是全屏,是就变成窗体,不是就变成全屏。
好了代码就这么多很简单,我们也可以添加一些装饰呀什么的上去,我在这里给
大家演示一个添加关于信息上去就这样吧,大家自己做了,好了,别的装饰大家自己
Load Form2
form2.Show
收集资料了,我就不演示了。程序做好了我们来测试一下 有点卡。。。。。。OK
程序有效,大家不妨试试。全屏也可以。
我自己是学破解和网络工程,准备考网络工程师的,希望大家加QQ交流。
最后希望黑鹰能给我一个邀请码,谢谢! E-Mail:3291079@163.com
QQ:454827094
好了,教程结束,再见!
中央电视1台
mms://live.cctv.com/live11
中央电视2台
mms://live.cctv.com/live12
中央电视3台
mms://live.cctv.com/live13
中央电视4台
mms://live.cctv.com/live14
中央电视5台
mms://live.cctv.com/live15
中央电视6台
mms://tv.lzu.edu.cn/cctv6
中央电视7台
mms://live.cctv.com/live17
中央电视8台
mms://tv.lzu.edu.cn/cctv8
中央电视9台
mms://live.cctv.com/live19
中央少儿频道
mms://live.cctv.com/livekids
中央西法频道
mms://live.cctv.com/livexifa
中央新闻频道
mms://live.cctv.com/livenews
中央音乐频道
mms://live.cctv.com/livemusic
相关软件
- ☉ VB网络电视编写