VB网络电视编写

软件简介：
; t6 h- w! c" G' c/ ?; X大家好 我是 shadowplayer QQ：454827094 今天给大家带来的教程
是VB简单编写自己的网络电视小程序。
4 i; g1 I. p& I& `! K" v 教程开始之前先来推荐下一个不错的学习网站 www.3800hk.com，在这
里可以找到你想要的所有教程。
好了，教程开始，程序比较简单，大家看下就知道了，主要是给菜鸟朋
9 s+ G, @6 q: `; d& `友们试试手，老鸟就飘过吧。
7 q6 W* D- ?5 e: \# e 先打开VB环境，新建工程，主要就是要用到一个部件 WindowsMediaPlayer，
这个东西我想大家都不陌生吧，剩下的事就是加几个网络电视直播地址了，我就
在菜单上添加几个试试，我们先给WindowsMediaPlayer控件改个名字吧，就改成
WMP1吧。好了，再添加一句代码 wmp1.URL =网络电视地址 。我在后面给
大家提供几个地址，别的大家自己去网上找找。好了就添加这两个吧。
4 _* s/ [+ v$ C 电视台添加好了，我们在来给这个WMP添加一个全屏播放的功能，一般的播放
0 `1 L3 y# V% N+ c( Q器我们都能双击全屏播放，我们就来添加这个代码，我们找到DoubleClick事件
! d6 |" C* ^" A+ k  m. A: w4 @ If WMP1.fullScreen = False Then
WMP1.fullScreen = True
ElseIf WMP1.fullScreen = True Then
( A+ L. ]+ t& J WMP1.fullScreen = False
End If
意思就是先判断现在是不是全屏，是就变成窗体，不是就变成全屏。
好了代码就这么多很简单，我们也可以添加一些装饰呀什么的上去，我在这里给
大家演示一个添加关于信息上去就这样吧，大家自己做了，好了，别的装饰大家自己
Load Form2
; H: ]+ @* ?6 S" E! ]form2.Show
( N5 L- q7 q2 b收集资料了，我就不演示了。程序做好了我们来测试一下 有点卡。。。。。。OK
+ u% j2 o" \7 B! n! g9 X程序有效，大家不妨试试。全屏也可以。
我自己是学破解和网络工程，准备考网络工程师的，希望大家加QQ交流。
最后希望黑鹰能给我一个邀请码，谢谢！ E-Mail:3291079@163.com
3 A0 r  c/ z; ?$ O9 z5 I% w QQ:454827094
1 p* N- j+ u* p; }# ~! u- `) |好了，教程结束，再见！
中央电视1台
. o8 F) m% d2 w! O8 Wmms://live.cctv.com/live11
中央电视2台
mms://live.cctv.com/live12
中央电视3台
7 Y: V1 m( z# {mms://live.cctv.com/live13
中央电视4台
9 C$ J5 O2 m4 G; y; E4 Zmms://live.cctv.com/live14
中央电视5台
mms://live.cctv.com/live15
中央电视6台
+ n7 C" M$ |4 L; F2 J# `mms://tv.lzu.edu.cn/cctv6
. T1 j$ M  d0 }1 h5 T+ @" {中央电视7台
+ J& i0 |' H0 B- S$ umms://live.cctv.com/live17
( c2 h- h. r: d中央电视8台
: g( Z& v6 }- Mmms://tv.lzu.edu.cn/cctv8
中央电视9台
mms://live.cctv.com/live19
中央少儿频道
# j- c1 y. W" W9 emms://live.cctv.com/livekids
2 B+ V( v- O& n' k3 h3 X% l' {中央西法频道
, U, w+ m3 _  R( {4 _( Jmms://live.cctv.com/livexifa
中央新闻频道
mms://live.cctv.com/livenews
中央音乐频道
% L. w# V4 L7 c& k$ w1 Q. M! g* {: rmms://live.cctv.com/livemusic
8 i% V) `: y, a- W1 ~4 P下载地址：

2008-8-19 13:34 上传 VB网络电视编写.rar

文件大小:

未知

下载次数:

0

下载权限:

版本vip会员

VIP专享 检测资源

有些游戏资源需要vip下载开通请点击开通vip

VIP专享,点击开通vip

确认