msn安装-2345 广告
![flv下载](/uploads/image/0504.jpg)
2023年4月5日发(作者:qq空间应用打不开)
实用第 智慧密集
使用“维棠"轻松完成FLV视频下载与转换
马凤娟 吴鹏飞
摘 要: “维棠”是一款专门针对FLV格式的视频下载而开发的软件,用户使用“维棠”可以将
优酷网、土豆网、酷6网、56网等网站上的FLV视频节目轻松下栽到自己的电脑上保存下来,并
可以根据需要转换成不同的格式。
关键词:维棠;FLv文件;下载;格式转换
1 FLV视频简介
FLV视频即Flash Video,是Macromedia公司推出的一种
流媒体视频格式,与其他视频格式相比,FIJV视频文件较小,
加载速度非常快,便于在互联网上传输。并且,FLV视频采用
嵌入在浏览器中的Flash Player来播放.用户不需要再安装另
外的视频播放器就可以直接观看,非常方便。因此,FLV格式
推出不久,就受到各大网站的青睐,例如优酷网、土豆网、酷
6网、56网等都采用FLV作为自己的网络视频格式,内容上
涵盖娱乐、教育、新闻等方面,一时间,互联网上出现了大量
的FLV文件。
但是大家在使用的过程中或许已经发现,这种FLV的视
频格式.只能在线观看不能下载,即便是下载也要借助于该
网站提供的下载软件,例如56网提供的56ican、土豆网提供
的iTudou等.播放这些文件也需要专门的播放器,这显然是
不方便的.而且安装这么多的插件也会加重电脑的负担。只
安装一个“维棠”.就可以轻松地解决各大网站的FLV格式
视频的下载、播放及格式转换问题.接下来就一起来看怎么
做吧。
2安装“维棠”软件
2.1 下载
首先从“维棠”官网(网址:http://www.vidown.cn/
supportlist.htm1)下载该软件,目前最新版本是ViDown-1.1.2-2。
2.2安装
(1)双击ViDown1.1.2.2setup.exe进行安装,将会弹出一
个选择安装语言的对话框,选择“简体中文”,单击“OK”按
钮。
(2)从接下来弹出的对话框中单击“下一步”按钮。
(3)然后从弹出的对话框中单击“我接受”按钮,接受授
权协议中的条款。
88 电 与雏
(4)然后会弹出选择安装目录的对话框,单击“浏览”按
钮可以选择自己要安装的目录。按默认设置,单击“下一步”
按钮继续安装。
(5)接下来的对话框主要是一些附加任务的选择,例如是
否创建桌面图标、快速启动图标等.可以根据自己的需要进行
选择某些任务或取消某些任务。然后单击“安装”按钮,开始
安装。
(6)稍微等待几秒钟即可,从弹出的对话框中单击“完
成”按钮。即可完成安装。
(7)安装完成后将自动运行该软件,或者从“开始”菜单
中选择“程序”一“维棠FLV视频下载软件”.或者单击桌面
快捷图标,都可以启动该软件。启动后界面如图l所示。
图1程序运行界面
该软件的界面比较简单,上方是该软件的菜单栏和常用的
工具栏,主要的操作都是通过菜单栏和工具栏里的命令来完成
的。左侧是一个列表,包括正在下载的视频、已经完成下载的
视频和已经删除的视频列表,需要查看哪一部分,直接单击选
择即可。
3使用“维棠”下载FLV视频
在优酷网、土豆网等网站浏览视频时。如果想下载到自己
(下转第93页)
TR0UBlESH00TlHB OF PROGRAM
VBA中常见自定义控件应用有何技巧
小少朋友喜欢对OMce进行二次开发.用VBA来提高
自己的办公效率,恰当、合理地使用VBA提供的自定义控件
不仪可以让应用程序窗体变得更加美观,同时也能使设计的应
用更加的个性化、更加方便用户的使用。
在默认的情况下,窗体控件工具箱中仅给出了常见的几个
控件,事实上,VBA的控件数量远不止如此。用户可以根据
需要在控件工具箱上添加一些标准控件或自定义控件,也可以
随时删除它们。接下来,为大家介绍几个常见的自定义控件的
使用方法.希望大家能充分地运用这些控件,这样会使应用程
序增色不少。
(1)日历控件【Calendar)
在Excel VBA窗体的工具箱中没有提供El历控件对象,事
实上很多应用程序在设计的时候需要用到此控件,利用它可以
方便地插入用户输入的日期。首次使用该控件时需要将其添加
到窗体工具箱中。添加的方法是:
打开VBE编辑器.首先在当前工作薄中插入一个用户窗
体。接下来单击“工具”菜单的“附加控件”命令,打开“可
用控件”对话框,在“可用控件”列表框中选择“日历控件
l1.0” (Office版本为2003),单击“确定”按钮。此时在窗体
工具箱中多出了一个“Calendar”(El历)控件。
与其他可编程控件一样,日历也有很多的属性,如:
BackColor属性可用来设置日历控件的背景色:Year、Month和
Day属性可用来提取所选日历的年份、月份和日期;Value属
性用于显示用户在El历控件中选定的日期值等。
接下来.看一个关于日历控件应用的例子:
当在工作表中输入出生日期时,系统自动弹出插入日期的窗
体,用户选择日期并确认后,日期将被插入到指定的单元格中。
打开VBE编辑器.在当前工作簿中插入一个用户窗体,
利用El历控件和按钮控件设计如图1所示的用户界面。双击窗
体中的命令按钮。在其Click事件中编写下面的代码:
Private Sub CommandButton 1 Click()
ActiveCel1.Value=Calendar1.Value
UserForm1.Hide
End Sub
双击当前的工作表(如sheet1),在其SelectionChange事
件中编写下面的代码:
Private Sub Worksheet
_Selec onChange(ByVal Target
As Range)
判断用户选中的是否为第3列
lf Target.Column=3 Then
UserForm1.Show
End If
End Sub
输人数据时.当用户将光标移到到第3列即出生日期所在
列时自动弹出用户窗体。用户选择完El期并单击“插入El期”
按钮后,所选日期自动插入到当前的单元格中,同时用户窗体
自动隐藏。这样,用户就可以方便地录入日期数据了。
图1 日历控件
(2)日期控件(DTPicker)
与日历控件一样,日期控件也是一个用来获取日期的控
件,功能大致相同,但操作界面与日历控件略有区别,该控件
在应用程序的开发中比日历控件应用更为常见。
首次使用日期控件时也需要将其添加到窗体工具箱中去,
添加的方法与日历控件类似。日期控件的名字是“Microsoft
Date and Time Picker Control 6.0(SP4)”。其主要属性有:
Format属性用于指定日期的显示格式:Value属性值与用户选
定的日期值有关:Year、Month和Day属性可用来提取所选日
期值的年份、月份和El期等。
也来看一个关于日期控件使用的例子:
使用窗体查询或采集数据时经常会遇到日期输入的问题。
此时既可以手工输入日期数据,也可以单击列表框右侧的下拉
按钮选择日期数据。图2为日期控件在应用程序设计中的典型
应用,系统可将用户选择的Et期值回显到指定的文本框或其他
对象中,从而方便了日期数据的查询或采集。
图2日期控件
(3)Flash控件
在Office组件中利用控件工具箱提供的“其他控件”中的
“Shockwave Flash Object”对象可以在文件中插入Flash文件,
其实在VBA的应用程序窗体中也可以插入nash对象。要使用
Flash控件.首先需要从“附加控件”对话框中选中它并将其
添加到窗体工具箱上,该控件的名字是“Shockwave Flash
Object”。
在窗体中添加Flash对象的方法与在文档中添加Flash的
方法相同,这里就不再赘述了。利用Flash控件对象可以制作
出精美的欢迎界面、功能强大的CAI(计算机辅助教学)软件
以及一些个性化的应用程序菜单等.结合Flash本身强大的
Action Script命令.几乎无所不能。
蝴 j 89
、々 J |l J J 实用第一: 智慧密集
, ; .
(4)进度条控件(ProgressBar)
进度条控件是用来显示进度的控件,该控件在应用程序的
加载、下载等待、安装等应用中非常的广泛。要使用进度条控
件.首先需要从“附加控件”对话框中选中它并将其添加到窗
体工具箱上,进度条控件的名字是“Microsoft ProgressBar
Control 6.0(sP4)”。
该控件的主要属性有:Max属性用于指定进度条控件的最
大值;Min属性用于指定进度条控件的最小值;Value属性用
于显示进度条的进度值。
下面例子可以实现模拟的应用程序进度加载效果。利用进
度条控件和标签控件,可以设计一个如图3所示的窗体界面,
最后在窗体Activate事件中编写如下代码就可以模拟其效果了。
Private Sub UserForm Activate()
ProqressBar1.Min:1
ProgressBar1.Max=20000
Label2.Caption=”0%“
For i=1 TO 10000 Step 0.1
ProgressBar1.Value=Str(i)
Label2.Caption=Round( /10000,2) 1OO&“%”
DoEvents
Next i
End Sub
图3进度条控件
朋友们可以根据演示的速度来调整代码中的相关数值。需
要说明的是:代码中使用了DoEvents函数,其作用足转让控
制权,以便让操作系统处理其它的事件。当需要执行一段循环
代码时.特别是循环的次数较大时,为了防止出现死机或死循
环.在循环代码的开始加上DoEvents函数以便在程序运行过
程中可以中止程序的运行。本例稍有遗憾的是无法根据系统的
运行情况实现进度条加载速度快慢的控制,感兴趣的朋友可进
一步做些尝试。
其实VBA中的自定义控件也不止今天介绍的这几个,在
很多时候.其实用户的很多需求利用这些自定义控件就可以很
方便地实现了,而不是需要辛辛苦苦地去重复编写这些代码,
当然这需要大家平时就要留意收集和整理这方面的技巧与心得。
(作者:仲勇)
质数判别有哪些问题有待探讨
质数在研究整数的过程中占有一个很重的地位,它被称
为自然数的“建筑的基石”。虽然有很多数学家和学者致力于对
它的研究,但成果并不显著,仍有许多问题有待解决。例如,哥
德巴赫猜想困扰了人们几百年.有很多数学家对它进行了多年的
90 电 与雏
研究但并没有得到解决。随着现代科学技术的迅速发展,运用
计算机能够较快地计算某自然数是否是质数,知道在某范同内
质数的分布情况。另外。质数在信息学奥林匹克竞赛中也屡屡
出现,技巧性非常强,可以锻炼和提高学生的思维,所以有必
要对质数在计算机上如何进行判别的相关问题进行一些探讨。
(1)质数的定义法
1)如何判别一个数为质数
什么是质数?质数是一个大于1的整数,如果它的正因数
只有1及它本身,这个数就叫质数(或素数)。通俗的讲,质
数是只有1和它本身两个约数的自然数,不能被任何其他的自
然数整除。
如何判别一个数是质数呢?按照上述对质数的定义,就要
用2到这个数减1的数分别去除这个数,如果都不能把它整除
了,那么这个数就被认为是质数。用程序表示如下:
var
n, :integer:
f:boolean;
begin
read(n);
f:=true;
for i:=2 to n-1 do
if n mod i=O then f:=false;
If f then writeln(‘YES’)
else writeln(“NO’):
end.
这个程序按照质数的定义来判断一个整数是否是质数是没
什么问题的,但它还是做了许多无用功。比如,来判断l5是
否为质数。如果用上面的程序,就得从2到14分别去除15,
其实是没有必要的。如果15能被3整除了,就说明它是合数
了.还有必要再用4 14去除吗?这时就应中断循环。另外,
在循环的次数上还可以优化,假如判定36是否为质数,只要
从2到6分别去除36就可以了,为什么?因为:2x18=36;3x
12=36;4x9=36;6x6=36;如果2、3、4、6能把36整除了,
那18、12、9肯定也能把36整除。所以可把上面的程序优化
为:
Var
n,i:integer:
f:boolean;
begin
read(n);
f:=true;
for i:=2 to round(sqrt(n))do
if n mod i=O then begin
f:=false;
break;
end;
if f then writeln《‘YES’) ..
… 、-TR0UBlESH00TIHGOFPROGRAM“ uu一 … 一 …… … . … ……-nm…-一…一- 一 . ..
else writeln(“NO’)
end.
经过优化后的程序,大大缩短了质数的判别时间。
2)如何找出任意两个正整数之间的质数
如果再寻找某一区间内的所有质数就好办了,只要在上面
的程序加上一个大循环就行了。如,找出a—b(a≤b,a,b是正整
数)之间的质数,实现的程序就是:
Var
a,b,n,i:integer
f:boolean:
begin
read(a,b):
for n:=a to b do
begin
f:=true;
fOr :=2 to round(sqrt(n))do
if n mod i=Othen begin
f:=false;
break;
end;
.f f then write(n,‘’)
end;
end,
上述程序对整型(integer)内的数进行判定一般不成什么
问题,一旦数大了,会出现超时。尤其是奥林匹克竞赛上的试
题,测试数据有的是很大的,如果超时就难获得满分,就得采
用另一种方法——筛选法。
(2)合数过滤筛选法
质数是不能被2一(n一1)间的任何数整除;反过来看,只
要能被2~(n一1)间的任何数整除的n,都不是质数。我们可以
采用一个简单的排除法:就是对n以内的所有数.只要逐个去
掉值为2~(n~1)的倍数的数,剩下的数就是质数。
现在以一个奥赛试题进行分析:选数(2002年试题):
问题描述:已知n个整数,x1,x2,x3,……xn,以及一
个整数k(k<n)。从n整数中任选k个整数组合相加,可分别得
到一系列的和。现在要求你计算出和为素数(质数)的组合数
有多少种。 (1≤n≤20,k<n,1≤xi≤500O000)。在此只对试题
质数的判定来分析:由于整数xi的上限为5000000,k的上限为
l9,这就使得 ̄lbJ'l k个整数的和是否为质数的问题似乎有点困
难。为了保证在该范围内能正确出解,且不超时,先进行筛选,
将1^,lO000间的质数筛选出来存人质数表P中。由于P表中的最
大质数接近10000,其平方大于或等于xi和的上限19x5000000
(k最大值是19),因此是一个比较可行的方法:
var
f:array[1..10000】of boolean;{标记是否为质数)
P:array[1..50001 of Iongint;{存放质数)
k:integer:
编写一个过程来筛选质数:
Procedure prime;
Var
i,j:integer;
begin
k:=0:
fillchar(f,sizeof(f),true);
们J:=false;
for i:=2 to 10000 do
jf f[i】then begin
inc(k):{计质数的个数)
p【k】:=i {存放质数)
j:: ;{能用加法就不要用乘法}
while j<=10000 do{将i的倍数筛掉)
begin
f[j]:=false;
j:=j+i:
end;
end;
end;
上面的程序运行后,在质数表P中就有k个质数。在质数
表P的基础上再去判别和数stlm是否为质数。大家知道,任何
一个大于1的整数都可以分解成质因子的乘积形式,而P表中
的质数是按递增方向存放的.如果用P表中的每个质数去除
SHill,若某个质数能把SHIn整除,则说明SHIn为合数;若PⅢi
P【i】>sum,则说明sllm不可能分解出比P[i]大的质数了,
SHill本身就是质数了。判别函数程序如下:
function text(sum:longint):boolean;
Var i:integer;
begin
text=true;
for i:=1 to k do
begin
if p【i】 p[i】>sum then break(若超出搜索范围的上
限,则说明sum是质数,返回true)
else if sum mod pIl】=0 then begin
text:=false;
break;
end;{说明sum不是质数,返回false}
end;
end;
这样在程序中只要调用一次过程。就可将质数筛选出来,再
将每次组合的和数用函数去判别,大大提高了程序的运行时间。
再看一个实例.大家都听说过哥德巴赫猜想的问题.迄今为
止,这仍然是一个著名的世界难题,被誉为数学王冠上的明珠。
问题描述:任何一个大于2且不超过n的偶数都能写成两
个质数之和。
问题分析:由题意可知,程序是要对组成上述范围内的任
一个偶数的两个整数进行质数判别。如果n的数不是很大,用
蝴 91
* 。… H “ … J’ ’ 1 ’ ’ 、 实用第一 智慧密集
.. ¨ …
2到round(sqrt(n))之间数去除,进行两次判别,机器还能承
受;如果n的值很大,肯定是要超时的。为了保证n是大数时
能出正确解,是用筛选法来编写程序,验证哥德巴赫猜想问
题。 (在这里n是大于2且小于等于10000之间的偶数):
Var
n,i:longint;
m,j,k:integer;
p:array[1..10000】of Iongint;
f:boolean;
begin
readln(n);
m:=1:
p[11:=2:{将质数2放人P表中)
for i:=3 to n do{筛选n以内的所有质数)
begin
f:=true;
for j:=1 to m do{用质数表中的质数去除i,如果整
除i就是合数)
mod l_Othen begin
f:=false;
break;
end;
if f then f如果不能被整除,i就是质数并放入P表)
begin
inc(m);
pfmI:=
end;
end;
for i:=2 to ln div 2)do{验证任一个大于2的偶数都可
以用两个质数和表示}
for j:=1 to m do
begin
f:=false;
for k:=i to m do
if i+i=p【jl+p【k】then
begin
f:=true;
writeln(i+i, = ,p【j】, + ,p【k1):
break;
end;
if f then break;
end;
end.
这个问题还是很有趣的,同学们不妨运手试一试。
(3)其他方法与技巧
有些问题中,并不是涉及到质数都得要去判别是否为质
数,只要算法合适,问题完全可以简化。比如:求2-lO0中.
每个数的质因子。输出形式如下:
2=2
3=3
92电器 与雄 。电脑缡程技巧与雄护、’.
4=2 2
5=5
6=2 3
’00=2 2 5 5
认真观察.仔细分析上面的输出形式:发现它是先用最小
的质数2连续去整除,直到不能被整除了,如果这时商不为
l,将除数加1,继续去除。直至商等于1时,说明该数分解
完成。由于在每次开始时都是用质数连续去除,直到不能整除
为止,所以出现的因子都会是质因子。程序如下:
Program zhiyinzi;
var a,b,n:integer;
begin
for n::2 to 1O0 do
begin
a:=2:
b:=n:
write(b, = ):
repeat{b是变化的被除数,a是变化的除数)
while b mod a<>O do a::a+1:{b不能被整除,除数加1)
b:=b div a:{b被a整除了,产生新的被除数b)
if b=l then write(a){b=l时分解完毕}
else write(a, ,):{b<>1时,输出当前质因子
a,等待下一个质因子的输出)
until b=l:{本次分解质因子结束)
writeln;
end;
end.
从这个程序中可以得知:任何一个大于l的正整数都可以
用质因子的乘积表示。
看一下2012年普及组复赛的第一题“质因数分解”。
问题描述:已知正整数n是两个不同的质数的乘积,试求
出较大的那个质数。
输入文件:只有一个正整数n:
输出文件:较大的那个质数P:
数据范围:6≤n≤2x109。
问题分析:根据给出的数据范围,n的上限达到2x109,
如果它的两个因子都要判别是否为质数的话.那一定会超时
的。由前面的例题已经知道:任何一个正整数都能表示成质因
子的乘积。而此题正是n是两个不同的质数的乘积,那给出的
n就不会出现像7、28这样的数(7=7,28=2x14,28=4x7)。
那只要在2到trunc(sqrt(n))范围内找出能把n整除的数,这
个数就是那个较小的质因子,较大的那个质因子也就迎刃而解
了。程序如下:
program prime:
var n,i:longint;
begin
readln(n);
1’R0UBlESH00TIHBOFPROGRAM 一… -…… … - ……… — … 一…一 ………r 一 …… … - ’ … 一-
for i:=2 to trunc(sqrt(n))do
if n mod i=O then break;
writeln(n div i):
end.
此程序全部通过给出的考试测试数据。
通过以上分析.大家对质数判别问题可能有了初步的认
.S止.址 .址.5止 .S止.s止. .SlL
识。若能够掌握其算法思想对解决实际问题还是很有必要的。
在平时的训练和学习中,注意锻炼思维能力,勤于思考,发现
规律.在面临一个个题型时能够快捷准确地建立模型,确定算
法,解决问题。以上仅是个人的理解,希望和大家共勉。
(作者:檀素芳)
(上接第88页)
电脑上保存下来,只需要启动
按钮(如图2所示)。
(1)单击
“维棠”,单击工具栏中的新建 按Ah+C快捷键
。 一 蒜
图2新建下载
单击新建按钮后,打开如图3所示的页面,将想要下载的
视频所在页面的网址拷贝到“视频网址”后面的对话框中,
单击“另存到”后面的节略号,指定视频要存储的位置。然后
设置一些参数或按照默认设置,单击确定,即可开始下载视
频.如图4所示。
图3下载设置
图4下载列表
4 FLV视频格式转换
目前很多视频播放软件和课件制作软件还不支持FLV格
式的视频,所以需要把下载的FLV文件转换成其他通用的视
频格式.如Avi、Wmv、Mp3、Mp4等。做法如下:
. 止 — .毒止舢—S .Sl上.s止 .址舢—S止.址
“工具”菜单栏,选择“转换管理器”,或者
打开如图5所示的对话框。
图5视频转换对话框
(2)单击图5中的“新建任务”按钮,打开图6所示的
页面。从中单击“源文件”后面的“浏览”按钮,选择要转换
的源文件。单击“输出文件”后面的“浏览”按钮,指定要输
出文件的保存路径和要输出的格式,单击“确定”按钮,即可
完成格式转换。操作非常方便,也可以根据需要截取视频中的
某个片段进行转换。
图6转换设置
这样只需要一个软件“维棠”,就可以完成下载、格式转
换的功能,完成后可以得到Avi、Wmv、Mp3等格式的视频,
可以直接用于MP3、手机等其他的播放设备,也可以插入到
Powerpoint等软件中作为演示材料,这一点对于教师朋友们有
很大的帮助。
(收稿日期:2012—12—17)
i 脑螭程2技0巧13与.0雅9护93
更多推荐
flv下载
发布评论