解决方法:

1、选择WPS文档,右键选择【打开方式】>【选择默认程序】;

卸载了office重装后 无法新建word文档

2、在窗口中,选择WORD,勾选【始终使用选择的程序打开这种文件】后点击【确定】即可。

卸载了office重装后 无法新建word文档

在打开一个word文件时会提示“除非需要保存对其所做的更改,***都应该以只读方式打开。是否以只读方式打开?”

word2013如何退出只读模式

解决方法:

方法一:

在弹出的界面选择“否”

工具/选项/安全性,把“建议以只读方式打开文档”前勾去掉

保存后重新打开就不会有这个提示了

方法二:

1、打开要编辑的word文档,如下图显示只读模式;

2、 点击“文件”-“另存为”,出现如下对话框:

3、 点击“组织”——“属性”,出现如下对话框

4、 点击只读左边的蓝色方框,去掉只读属性,一路确定下去就可

以了。

word2013如何退出只读模式

方法三:

将只读属性的文件关闭,然后找到它所在位置,指向它右击,右击选择属性,然后把只读属性的对勾去掉即可。具体内容见下图

word2013如何退出只读模式

word2013如何退出只读模式

不知道大家在使用win10正式版的时候有没有遇到过各种各样的问题,小编最近在使用win10系统自动修复功能的时候,提示系统自动修复无法修复你的电脑,这是怎么回事,又该怎么办呢,下面小编就给大家带来win10正式版提示自动修复无法修复你的电脑解决教程。
1、相信大家在看到这个画面的时候,就感到非常头疼吧,小编第一次遇到这个问题的时候也是头大。这个应该是因为系统还不稳定的原因,我们的做法就是先点击高级设置。

win10自动修复无法修复你的电脑是怎么回事

2、进入高级设置后,我们可以看到这里有6个选项。基本上来说点击启动修复是没有办法解决的,不过建议大家可以先试一试。不行就按我的步骤来。我们点击系统还原选项。

win10自动修复无法修复你的电脑是怎么回事

3、然后我们可以看到这里有2个选择项。第一个是不完全清除,第二个是完全清除。如果有重要文件建议选择第一个选项。这样到时候我们电脑的文件还会存在电脑里面。小编这里选择的是第二个选项。

win10自动修复无法修复你的电脑是怎么回事

4、这里我们可以看到是驱动的删除,我们这里可以选择清除所有文件,清除所有的驱动,因为可能是驱动与系统不太匹配导致。

win10自动修复无法修复你的电脑是怎么回事

5、然后选择完全清理驱动器的选项。上面的说明标注有这些文件删除过后也是可以恢复的,但是比较麻烦。

win10自动修复无法修复你的电脑是怎么回事

6、最后我们点击初始化就可以了,完成过后电脑会重新启动。然后自己在下载对应所需要的文件。小编就不多说了。

win10自动修复无法修复你的电脑是怎么回事

7、以上方法可能出现的问题就是初始化不成功,遇到这种问题该怎么解决呢,一就是重新装系统,二就是在高级选项中选择启动设置。

win10自动修复无法修复你的电脑是怎么回事

8、然后就是选择我们原先的系统。因为在升级win10过后我们是还可以选择原来的系统,但是我们会发现我们选择原来系统过后,重启电脑会发现进入的系统还是win10。这样我们就可以继续用win10系统了。

win10自动修复无法修复你的电脑是怎么回事

如果你在使用win10系统自带修复功能的时候提示自动修复无法修复你的电脑就可以参照上诉方法进行解决哦,希望对大家有用。

在WPS中,无法直接设置下划线与文字的距离,但可以通过下面的方法实现调整文字与下划线的距离的效果(如上图所示),其操作步骤:

1、输入字符“WPS中下划线与文字的距离调整”(注在文字前、后各输入一个空格),并选中所输入的文字,但不要选中空格;

2、单击开始选项卡的下划线按钮;

wps文字和下划线的距离太窄 怎么把距离调大

3、单击选项卡右下角如上图所示的按钮;

4、打开“字体”对话框,切换到“字符间距”标签下,按“位置”右侧的下拉按钮,在随后弹出的快捷菜单中,选“上升”选项,然后在其右侧“磅值”后面的方框中输入一个数值(这个数值就是分离的距离,此处为了突出这一效果,设置为0.3厘米),确定返回即可。

wps文字和下划线的距离太窄 怎么把距离调大

这里首先请朋友把自己的word打开,这样可以更加直观的理解一下为什么会这个波浪线

复制的文章中带有的下划线如何去除

这里先举个例子为朋友你说明一下,这里的没有加上波浪线的有的是正确的英语单词,但是有的就是非正确的英语单词了

复制的文章中带有的下划线如何去除

这里点击一下这里的红色箭头所示的地瓜就可以,看见那个“审阅”,最左边的有一个下三角选项

复制的文章中带有的下划线如何去除

选择一下第一个就行,然后就可以看见这里的英语单词的纠正提示,这里可以看看“选项”,左下角

复制的文章中带有的下划线如何去除

消去下滑线,很简单,只直接的点击右键,“忽略全部”,点击一下就可以的

复制的文章中带有的下划线如何去除

看看这里就已经全部的把刚才的波浪线给干掉了,主要想要让朋友全方位的了解为什么有波浪线

复制的文章中带有的下划线如何去除

方法一:在QQ音乐乐库面板下方有下载及管理,点击就会出现新的面板,再点导入,根据提示就可以把酷狗里收藏的播放列表里的歌转到QQ音乐上面了。
方法二:把酷狗音乐里的歌下下来,然后打开所在的文件夹,找到那些歌,再点鼠标右键,找打开方式,点QQ MUSIC

win10的新颖吸引了很多人的目光,但是独特的操作界面让很多人无法很快的找的一些基本的设置。小编也在摸索中,在这里将电脑电源选项的设置分享给大家。

首先,点击菜单栏的“设置”;

win10电源选项怎么设置

在出现的设置界面点击“系统”;

win10电源选项怎么设置

在左侧一列栏目选择“电源和睡眠”;

win10电源选项怎么设置

接下来在右侧会出现屏幕和睡眠的设置选项,我们一般选择从不;

win10电源选项怎么设置

接下来我们设置笔记本合盖电脑采取什么操作,在下方点击“其他电源设置”;

win10电源选项怎么设置

在出现的界面中我们在左侧发现“选择关闭盖子的功能”,点击;

win10电源选项怎么设置

按照个人需要设置关闭盖子时电脑采取的操着,然后保存操作。小编习惯设置成“不采取任何操作”,因为有的电脑睡眠后很难唤醒。在不用电脑的时候建议直接关机。

win10电源选项怎么设置

  具体移动硬盘数据恢复故障类型:

  一.逻辑故障:

  误分区、误格式化、误删除、误克隆、分区表信息丢失、引导扇区信息丢失、MBR损坏、DBR损坏、病毒破坏、黑客攻击等;

  二、物理故障:

  BIOS不认盘、硬盘异响、电机不转、电路板烧坏、盘体摔坏等;硬盘坏道(物理、逻辑);密码破解:可破解各种操作系统密码、BIOS密码、破解文件密码等多项密码破解服 务。接口支持:可修复IDE、SATA、SCSI、FC、RAID服务器数据恢复等。

  三、外电路故障:

  大部分外电路的问题是电源芯片或主轴驱动芯片烧坏引起的,由于硬盘电路板质量问题、设计缺陷、市电波动、突然断电、芯片老化或者散热不良、静电等原因造成芯片烧毁 、击穿,严重的还会波及磁头芯片的损坏。这种情况基本上可以通过对外电路的修复来解决。

  四、磁盘坏道:

  硬盘磁头在盘片上的某一扇区读取时间过长或者无法读取,那么这个扇区就可能是坏扇区,也就是通常所说的坏道。

  坏道一般表现为: 无法启动、经常死机、读写困难等等。主要是由于长时间使用、非正常关机、突然断电及使用过程中强烈震动造成的。而且是在坏扇区附近经常性读写还会 造成坏扇区数量增加并扩散,长此以往会使磁头因长时间大功率读写而加速老化,最终报废。

  硬盘出现坏道后可以通过专用的磁盘工具对非坏道区域的数据进行读取或镜像的方式 来恢复文件。

  五、固件信息丢失或损坏:

  固件是用来控制硬盘自身运作的指令集,是硬盘的读写参数,它同硬盘里的文件一样也是存储在磁盘的盘片上,不同的是它存在的位置是 0 道以外的区域,通常称为负磁道。

  同样和文件一样,由于突然断电以及负磁道出现坏道等等原因,也可以造成固件信息丢失或损坏,而导致硬盘无法识别或误认,使数据无法正常读取。

  这种情况下一般用pc300UDMA 、HRT等磁盘底层工具对固件区域进行重写或是修改即可正常读取数据了。但固件区出问题的硬盘在所有的硬件故障中所占的比例并不是很大,而且不是每一块固件损坏的磁盘都可以通过这种方式来恢复,需要根据硬盘的具体品牌、型号、批次等相关信息来决定所采用的恢复方式。

  六、磁头损坏、偏移、磁盘异响:

  硬盘加电后有“咔嚓、咔嚓”的响声,在主机板的CMOS中无法检测到。

  这种情况大都是由于磁头损坏无法完成初始化而来回摆动发出的声音;很少一部分是由于固件损坏使得 磁头在指定位置无法读出正确信息而多次定位所造成的。

  如果硬盘出现异常的响声,应立即关闭电源。不要再盲目的进行反复加电尝试,以免变形的磁头对磁盘表面形成划伤,造成无法挽回的损失。遇到这种情况必须在超净间内将盘腔打开,更换一组完好的能正常工作的磁头,才能将原盘片上的数据完整的恢复出来。对工作环境及工程师手工要求非常高。

  七、硬盘解密:

  由于一些数据比较重要和敏感,所以用户需要对其进行加密。现在大部分的笔记本电脑都可以直接加密硬盘,还有一些第三方的软件提供这样的功能,使得硬盘如果不输入正 确的密码就无法使用,以确保全盘数据的安全。一旦密码遗失或系统崩溃,就连用户自己也无法读取需要的数据了!此时需要借助一些专业工具和特殊手段去解除密码从而读出正常数据,但现在加密的手段多种多样,加密的方式也在层出不穷,并不是每一种加密都是可以解开的,还需要不断的分析和尝试。建议用户养成良好的备份习惯,对重要数据做到 经常备份。

  八、主轴电机的损坏:

  由于现在的硬盘大都为提高读写速度而将磁盘主轴电机转速提高,厂商方面也普遍采用液态轴承以增加主轴电机的使用寿命,但在使用过程中仍然有部分硬盘出现盘片不转、 转速下降或不稳定、噪音过大、读取不稳等故障现象。这种情况下必须要修复硬盘的主轴电机才能将原盘数据成功导出。

  九、硬盘摔坏:

  随着移动硬盘的普及,在使用和移动过程中掉在地上的现象非常常见,这种高强度的撞击和震动可能会造成磁头的偏移、变形、主轴电机轴承偏心、变形、盘片变形等现象。 遇到这种情况建议用户不要盲目的反复加电尝试,以免变形的磁头在盘片上形成严重划伤,造成无法挽回的损失。

  遇到这种情况必须在超净间内将盘腔打开,更换一组完好的能正常工作的磁头或电机,才能将原盘片上的数据完整的恢复出来。对工作环境及工程师手工非常高的要求。

  十、盘片划伤:

  磁盘在运行的过程中受到剧烈震动,或磁头变形但仍盲目加电尝试等操作都有可能造成盘片划伤,从而使得数据恢复的成功率大大降低。

  根据划伤区域及严重程度的不同,数据成功恢复的可能性会有很大的差距。如果划伤区域在固件区,那么恢复的可能性是非常小的。如果在数据区,那么恢复的代价就会相当高,并且只能恢复出部分数据。

首先纠正一个错误,地址的格式不可能是1992.268.1.1,正确的地址可能是以下几种。
第一,地址可能是192.168.1.1。
第二,也有可能是192.168.0.1或者如tplogin.cn等网址登录。
第三,如果之前更改了路由IP,那就有无数种可能了,如,192.168.100.1。

第四,把自己电脑的IP设置成自动获取。再去翻看路由器底部铭牌确认默认IP。

如果您确认了您的地址是正确的话,然后登录页面还是打不开的话 ,下面就先分析产生此问题的原因和解决方法。

打不开的原因分析

原因一、默认网址

一般的路由器,进入路由器选项的网址都是192.168.1.1,这个是默认的,但是有些路由器不是,可能是192.168.0.1或其它。并且这个网址是不固定的。

请注意以下几点:

1、核对路由器说明书,路由器选项的默认网址和账号密码说明书上都有说明。

2、输入的网址格式要正确,只需在浏览器中输入默认的网址(例如:192.168.1.1)就可以,不需要输入其它任何字符。

1992.168.1.1登录页面打不开怎么办

原因二、用户名或者账户错误

输入的账号密码不对,分以下情况:

1、默认的账号密码输入错了。

2、默认的账号密码被更改。

1992.168.1.1登录页面打不开怎么办

原因三、被限制登陆路由器

有些情况下你即使输入了正确的账号密码也进不去,是因为在路由器里面可以设置权限,仅让部分电脑可以登陆路由器选项。

如下图,这台路由器,设置的是只有两台电脑可以登陆192.168.1.1。

1992.168.1.1登录页面打不开怎么办

原因四、路由器长时间运行

有时候路由器运行时间太长了,即使网址输入正确,账号密码也是对的,也可能出现路由器192.168.1.1无法登陆的情况。

那么要如何解决呢?

步骤一、登陆网址

首先要弄清楚路由器登陆的网址到底是什么,有没有被改动,这里需要说明的是,即使是路由器默认登陆网址是192.168.1.1,也可以在路由器里面把这个改成其他的网址。

因此如果其他人把这个网址修改了,当然就无法登陆了。

如果电脑可以上网,可以在网络状态里面查看登录网址。

1992.168.1.1登录页面打不开怎么办

1992.168.1.1登录页面打不开怎么办

步骤二、路由器输入网址是否正确的标志

输入的进入路由器选项的网址是否正确的标志就是,网址如果输入正确,会弹出对话框,输入账号和密码。

1992.168.1.1登录页面打不开怎么办

步骤三、对于网址或者密码不正确情况的处理方法

如果网址输入不正确,或者密码总不对,那么可以按如下处理:

(1)问修改路由器的密码的人。

(2)出厂化路由器,让账号密码恢复默认。具体参见路由器说明书,一般的就是断掉路由器电源,用牙签或者其他

SAI简单几步教你做出华丽丽的蕾丝花纹图案,简单粗暴即可以完成,值得绘看看,转需吧~

SAI简单几步教你做出华丽丽的蕾丝花纹图案

SAI简单几步教你做出华丽丽的蕾丝花纹图案

SAI简单几步教你做出华丽丽的蕾丝花纹图案

SAI简单几步教你做出华丽丽的蕾丝花纹图案

SAI简单几步教你做出华丽丽的蕾丝花纹图案

SAI简单几步教你做出华丽丽的蕾丝花纹图案

SAI简单几步教你做出华丽丽的蕾丝花纹图案

出现这个提示是系统临时文件太多了,或是磁盘出了问题引起的,看看下面的方法。
1)系统自带的磁盘修复方法:(如果故障依旧,就是你的磁盘有问题了,请修复一下磁盘,每个磁盘都修复一下)
具体步骤如下:在我的电脑中选中盘符后单击鼠标右键选属性,在弹出的驱动器属性窗口中依次选择 “工具→开始检查”并选择“自动修复文件系统错误”和“扫描并恢复坏扇区”,然后点击开始,扫描时间会因磁盘容量及扫描选项的不同而有所差异(按上面的方法做后,会弹出一个框,点是,自动关机后在开机进行修复)。

2)还是不行可能是硬盘有问题了,用软件修复试试。硬盘坏道将导致电脑系统文件损坏或丢失,电脑无法启动或死机。硬盘坏道可以采用NDD磁盘工具或Scandisk来修复。

3)如果故障依旧,请还原一下系统或重装(还是不行格式化硬盘重新分区重装,在不行就要换硬盘了,或检修一下去吧)。

4)最简单的方法就是删除“C:\ProgramData”的文件夹“QQPet”。(不用担心,重新运行QQ,又会在“C:\ProgramData”下自动生成文件夹“QQPet”。但错误提示不再弹出了。)

电脑提示qq.exe 损坏的图像

5)任务栏右下角出现这种提示(某文件损坏,请运行运用chkdsk工具修复),一般是系统垃圾文件太多导致的,主要是上网产生的垃圾文件,清理一下就好了。
  打开一个网页,点击“工具”菜单/Internet选项/在“常规”标签下点击“删除cookies(I)”,“删除文件”弹出窗口,点击“删除”(包括脱机文件),然后重启一下电脑(不需要用提示说的Chkdsk工具)。
  

电脑提示qq.exe 损坏的图像

电脑提示qq.exe 损坏的图像

针对Win7系统弹出的“qq.exe损坏的图像”警告,可以用以下操作。

1、先将系统上QQ程序相关文件全部删除,然后再重新下载安装QQ,在安装QQ过程中其安装路径需要修改下,别直接覆盖在之前的QQ安装路径上。安装结束后,再重新启动计算机,查看系统是否还有相应的提示。

2、或者在其他计算机上,将QQ文件拷贝过来,安装在这台电脑上即可。

1. tomcat 自带的 jsvc, 这个工具会启动2个线程,如果应用对资源独占,会造成应用启动不了,这个和Apache Commons 里的 daemon 项目是一样的。
2. Java Service Wrapper ,
参考nginx的脚本,自己写了一个脚本,供大家参考:

复制代码

代码如下:

#
#!/bin/bash
#
# chkconfig: - 91 35
# description: Starts and stops tomcat
CATALINA_HOME=/data/site/tomcat-8085
PID_FILE=/var/run/tomcat8085.pid
JAVA_HOME=/usr/java/default
JAVA_OPTS="-server -Xms512m -Xmx1024m"
CATALINA_BASE=$CATALINA_HOME
CATALINA_OPTS="-Djava.library.path=$CATALINA_HOME/bin"
CLASSPATH=/
$JAVA_HOME/lib/tools.jar:/
$CATALINA_HOME/bin/commons-daemon.jar:/
$CATALINA_HOME/bin/bootstrap.jar
RETVAL=0
# Source function library.
. /etc/rc.d/init.d/functions
# Source networking configuration.
. /etc/sysconfig/network
# Check that networking is up.
[ ${NETWORKING} = "no" ] && exit 0
# Start daemons functions.
start() {
#
# Start Tomcat
#
if [ -e $PID_FILE ];then
echo "$PID_FILE already running...."
exit 1
fi
echo -n $"Starting $PID_FILE: "
nohup $JAVA_HOME/bin/java /
-Dcatalina.home=$CATALINA_HOME /
-Dcatalina.base=$CATALINA_BASE /
-Djava.io.tmpdir=$TMP_DIR /
$CATALINA_OPTS /
-cp $CLASSPATH /
$JAVA_OPTS /
org.apache.catalina.startup.Bootstrap start >$CATALINA_HOME/logs/catalina.out &
RETVAL=$?
echo
[ $RETVAL = 0 ] && touch $PID_FILE
return $RETVAL
}
# Stop daemons functions.
stop() {
#
# Stop Tomcat
#
echo -n $"Stopping $PID_FILE: "
nohup $JAVA_HOME/bin/java /
-Dcatalina.home=$CATALINA_HOME /
-Dcatalina.base=$CATALINA_BASE /
-Djava.io.tmpdir=$TMP_DIR /
$CATALINA_OPTS /
-cp $CLASSPATH /
org.apache.catalina.startup.Bootstrap stop >$CATALINA_HOME/logs/catalina.out &
RETVAL=$?
echo
[ $RETVAL = 0 ] && rm -f $PID_FILE
return $RETVAL
}
# See how we were called.
case "$1" in
start)
start
;;
stop)
stop
;;
restart)
stop
start
;;
*)
echo $"Usage: $prog {start|stop|restart}"
exit 1
esac
exit $RETVAL

安装步骤
1. #vi tomcatd 输入以上脚本
2. #chmod +x tomcatd 设置有执行权限
3. #cp tomcatd /etc/init.d 复制到启动目录
4. #chkconfig --add tomcatd
5. #chkconfig tomcatd on
6. #service tomcatd start 启动
7. #service tomcatd stop 停止

一、刷bios 首先下载F.11C这个版本的BIOS。下载完解压,双击Winflash.bat,然后再点START开始刷BIOS,一分钟左右,刷完后本本自动重新启动。一定要确保刷BIOS过程中不要停电或死机。

BIOS地址: http://www.92windows.com/yingjian/picture_7747/200810/2008100522234104.rar

二、安装xp系统,推荐使用深度GHOSTV6.2精简版本,先进PE模式下进行分区,然后按正常方法安装GHOST系统。

三、安装驱动程序,见下面的地址,注意安装顺序。先安装主板INF驱动,然后安装UAA总线驱动,然后安装声卡、显卡、读卡器、红外线、网卡和无线网卡、快捷键驱动、3D硬盘保护工具(这个不安装的话,设备管理器里面会有个PCI BUS)、HDMI声卡驱动。

四、安装杀毒软件、U盘病毒防御、360打补丁和清除插件。

五、做系统备份。

注:

1、设备管理中常见的未知设备一般为快捷键、调制解调器、读卡器驱动等,如果出现未知设备,请首先尝试安装其驱动;

2、请确认您的系统版本为SP3版,否则可能与某些驱动有冲突,如果有驱动或软件无法安装,请您升级到SP3版本。

3、请注意:HP只支持原机标配的操作系统,如果用户自行安装了其他版本的操作系统,此驱动列表部分驱动并非官方提供,纯系HP工程师个人总结,仅供用户测试使用。

芯片组 ftp://ftp.hp.com/pub/softpaq/sp39001-39500/sp39316.exe

Intel Matrix Storage Manager(适用于Intel芯片组的机型)
http://h30445.www3.hp.com/pub/softpaq/sp39001-39500/sp39156.exe

显卡 ftp://file6.mydrivers.com/display/nvidia_gfgo_17637_xp32.zip

声卡 uaa ftp://ftp.hp.com/pub/softpaq/sp33501-34000/sp33566.exe

声卡驱动 ftp://ftp.hp.com/pub/softpaq/sp38501-39000/sp38558.exe

无线网卡 ftp://ftp.hp.com/pub/softpaq/sp39501-40000/sp39912.exe

网卡 ftp://file6.mydrivers.com/net/realtek_rtl8111b_698_xp.zip

读卡器驱动 ftp://ftp.hp.com/pub/softpaq/sp40001-40500/sp40221.exe

红外线驱动 http://www.icare.hp.com.cn/TechCenter_StaticArticle/45904/59728.zip

触摸板驱动程序 ftp://ftp.hp.com/pub/softpaq/sp31001-31500/sp31075.exe

快捷键 ftp://ftp.hp.com/pub/softpaq/sp39001-39500/sp39425.exe

HDVI Audio 声卡(HDMI驱动:thunder://QUFodHRwOi8vd3d3LjlpaHAuY24vYXR0YWNobWVudC5waHA/YWlkPTc4NDAmZG93bj0xWlo=

在安装完驱动后,如果有爆的声音,请进入控制面板,把控制面板切换到经典模式,点击“TDT Audio控制面板”,把“启用电源管理功能”的选项取消即可

1、禁用Windows自带防火墙服务

开始→设置→控制面板→管理工具→服务,打开后,在右边的窗口中右击“Application Layer Gateway Service”服务,选择“属性”,在弹出的窗口中设置“服务状态”为“停止”,把“启动类型”设为“已禁用”,相关截图如下所示:

2、删除Windows自带防火墙相关文件

找到C:/WINDOWS/system32下的firewall.cpl文件,将其删除或改名后即可

win10中设置synaptics触控板操作如下:

1、win10最常见的方法就是打开这个设备

2、就可以看到这样的界面

win10中怎么设置synaptics触控板?

3、找到触摸界面进行关闭

win10中怎么设置synaptics触控板?

4、也可以打开属性栏

5、找到触摸板的选项进行禁止就OK了

win10中怎么设置synaptics触控板?

6、这样桌面的触摸键盘就消失了!

7、这个方法关闭触摸 是最简单也是最好的方法

win10中怎么设置synaptics触控板?

在编写代码时,经常要引用工作表的名字、知道工作表在工作簿中的位置、增加工作表、删除工作表、复制工作表、移动工作表、重命名工作表,等等。下面介绍与此有关及相关的一些属性和方法示例。
--------------------------------------------------------------------------------
[示例04-01]增加工作表(Add方法)
Sub AddWorksheet()
MsgBox "在当前工作簿中添加一个工作表"
Worksheets.Add
MsgBox "在当前工作簿中的工作表sheet2之前添加一个工作表"
Worksheets.Add before:=Worksheets("sheet2")
MsgBox "在当前工作簿中的工作表sheet2之后添加一个工作表"
Worksheets.Add after:=Worksheets("sheet2")
MsgBox "在当前工作簿中添加3个工作表"
Worksheets.Add Count:=3
End Sub
示例说明:Add方法带有4个可选的参数,其中参数Before和参数After指定所增加的工作表的位置,但两个参数只能选一;参数Count用来指定增加的工作表数目。
--------------------------------------------------------------------------------
[示例04-02]复制工作表(Copy方法)
Sub CopyWorksheet()
MsgBox "在当前工作簿中复制工作表sheet1并将所复制的工作表放在工作表sheet2之前"
Worksheets("sheet1").Copy Before:=Worksheets("sheet2")
MsgBox "在当前工作簿中复制工作表sheet2并将所复制的工作表放在工作表sheet3之后"
Worksheets("sheet2").Copy After:=Worksheets("sheet3")
End Sub
示例说明:Copy方法带有2个可选的参数,即参数Before和参数After,在使用时两个参数只参选一。
--------------------------------------------------------------------------------
[示例04-03]移动工作表(Move方法)
Sub MoveWorksheet()
MsgBox "在当前工作簿中将工作表sheet3移至工作表sheet2之前"
Worksheets("sheet3").Move Before:=Worksheets("sheet2")
MsgBox "在当前工作簿中将工作表sheet1移至最后"
Worksheets("sheet1").Move After:=Worksheets(Worksheets.Count)
End Sub
示例说明:Move方法与Copy方法的参数相同,作用也一样。
--------------------------------------------------------------------------------
[示例04-04]隐藏和显示工作表(Visible属性)
[示例04-04-01]
Sub testHide()
MsgBox "第一次隐藏工作表sheet1"
Worksheets("sheet1").Visible = False
MsgBox "显示工作表sheet1"
Worksheets("sheet1").Visible = True
MsgBox "第二次隐藏工作表sheet1"
Worksheets("sheet1").Visible = xlSheetHidden
MsgBox "显示工作表sheet1"
Worksheets("sheet1").Visible = True
MsgBox "第三次隐藏工作表sheet1"
Worksheets("sheet1").Visible = xlSheetHidden
MsgBox "显示工作表sheet1"
Worksheets("sheet1").Visible = xlSheetVisible
MsgBox "第四隐藏工作表sheet1"
Worksheets("sheet1").Visible = xlSheetVeryHidden
MsgBox "显示工作表sheet1"
Worksheets("sheet1").Visible = True
MsgBox "第五隐藏工作表sheet1"
Worksheets("sheet1").Visible = xlSheetVeryHidden
MsgBox "显示工作表sheet1"
Worksheets("sheet1").Visible = xlSheetVisible
End Sub
示例说明:本示例演示了隐藏和显示工作表的各种情形。其中,使用xlSheetVeryHidden常量来隐藏工作表,将不能通过选择工作表菜单栏中的“格式”——“工作表”——“取消隐藏”命令来取消隐藏。
--------------------------------------------------------------------------------
[示例04-04-02]
Sub ShowAllSheets()
MsgBox "使当前工作簿中的所有工作表都显示(即将隐藏的工作表也显示)"
Dim ws As Worksheet
For Each ws In Sheets
ws.Visible = True
Next ws
End Sub
--------------------------------------------------------------------------------
[示例04-05]获取工作表数(Count属性)
[示例04-05-01]
Sub WorksheetNum()
Dim i As Long
i = Worksheets.Count
MsgBox "当前工作簿的工作表数为:" & Chr(10) & i
End Sub
--------------------------------------------------------------------------------
[示例04-05-02]
Sub WorksheetNum()
Dim i As Long
i = Sheets.Count
MsgBox "当前工作簿的工作表数为:" & Chr(10) & i
End Sub
示例说明:在一个包含图表工作表的工作簿中运行上述两段代码,将会得出不同的结果,原因是对于Sheets集合来讲,工作表包含图表工作表。应注意Worksheets集合与Sheets集合的区别,下同。
--------------------------------------------------------------------------------
[示例04-06]获取或设置工作表名称(Name属性)
[示例04-06-01]
Sub NameWorksheet()
Dim sName As String, sChangeName As String
sName = Worksheets(2).Name
MsgBox "当前工作簿中第2个工作表的名字为:" & sName
sChangeName = "我的工作表"
MsgBox "将当前工作簿中的第3个工作表名改为:" & sChangeName
Worksheets(3).Name = sChangeName
End Sub
示例说明:使用Name属性可以获取指定工作表的名称,也可以设置工作表的名称。
Sub ReNameSheet()
Dim xStr As String
Retry:
Err.Clear
xStr = InputBox("请输入工作表的新名称:" _
, "重命名工作表", ActiveSheet.Name)
If xStr = "" Then Exit Sub
On Error Resume Next
ActiveSheet.Name = xStr
If Err.Number <> 0 Then
MsgBox Err.Number & " " & Err.Description
Err.Clear
GoTo Retry
End If
On Error GoTo 0
'.........
End Sub
--------------------------------------------------------------------------------
[NextPage][示例04-07]激活/选择工作表(Activate方法和Select方法)
[示例04-07-01]
Sub SelectWorksheet()
MsgBox "激活当前工作簿中的工作表sheet2"
Worksheets("sheet2").Activate
MsgBox "激活当前工作簿中的工作表sheet3"
Worksheets("sheet3").Select
MsgBox "同时选择工作簿中的工作表sheet2和sheet3"
Worksheets(Array("sheet2", "sheet3")).Select
End Sub
示例说明:Activate方法只能激活一个工作表,而Select方法可以同时选择多个工作表。
--------------------------------------------------------------------------------
[示例04-07-02]
Sub SelectManySheet()
MsgBox "选取第一个和第三个工作表."
Worksheets(1).Select
Worksheets(3).Select False
End Sub
--------------------------------------------------------------------------------
[示例04-08]获取当前工作表的索引号(Index属性)
Sub GetSheetIndex()
Dim i As Long
i = ActiveSheet.Index
MsgBox "您正使用的工作表索引号为" & i
End Sub
--------------------------------------------------------------------------------
[示例04-09]选取前一个工作表(Previous属性)
Sub PreviousSheet()
If ActiveSheet.Index <> 1 Then
MsgBox "选取当前工作簿中当前工作表的前一个工作表"
ActiveSheet.Previous.Activate
Else
MsgBox "已到第一个工作表"
End If
End Sub
示例说明:如果当前工作表是第一个工作表,则使用Previous属性会出错。
--------------------------------------------------------------------------------
[示例04-10]选取下一个工作表(Next属性)
Sub NextSheet()
If ActiveSheet.Index <> Worksheets.Count Then
MsgBox "选取当前工作簿中当前工作表的下一个工作表"
ActiveSheet.Next.Activate
Else
MsgBox “已到最后一个工作表”
End If
End Sub
示例说明:如果当前工作表是最后一个工作表,则使用Next属性会出错。
--------------------------------------------------------------------------------
[示例04-11]工作表行和列的操作
[示例04-11-01]隐藏行
Sub HideRow()
Dim iRow As Long
MsgBox "隐藏当前单元格所在的行"
iRow = ActiveCell.Row
ActiveSheet.Rows(iRow).Hidden = True
MsgBox "取消隐藏"
ActiveSheet.Rows(iRow).Hidden = False
End Sub
--------------------------------------------------------------------------------
[示例04-11-02]隐藏列
Sub HideColumn()
Dim iColumn As Long
MsgBox "隐藏当前单元格所在列"
iColumn = ActiveCell.Column
ActiveSheet.Columns(iColumn).Hidden = True
MsgBox "取消隐藏"
ActiveSheet.Columns(iColumn).Hidden = False
End Sub
--------------------------------------------------------------------------------
[示例04-11-03]插入行
Sub InsertRow()
Dim rRow As Long
MsgBox "在当前单元格上方插入一行"
rRow = Selection.Row
ActiveSheet.Rows(rRow).Insert
End Sub
--------------------------------------------------------------------------------
[示例04-11-04]插入列
Sub InsertColumn()
Dim cColumn As Long
MsgBox "在当前单元格所在行的左边插入一行"
cColumn = Selection.Column
ActiveSheet.Columns(cColumn).Insert
End Sub
--------------------------------------------------------------------------------
[示例04-11-05]插入多行
Sub InsertManyRow()
MsgBox "在当前单元格所在行上方插入三行"
Dim rRow As Long, i As Long
For i = 1 To 3
rRow = Selection.Row
ActiveSheet.Rows(rRow).Insert
Next i
End Sub
--------------------------------------------------------------------------------
[示例04-11-06]设置行高
Sub SetRowHeight()
MsgBox "将当前单元格所在的行高设置为25"
Dim rRow As Long, iRow As Long
rRow = ActiveCell.Row
iRow = ActiveSheet.Rows(rRow).RowHeight
ActiveSheet.Rows(rRow).RowHeight = 25
MsgBox "恢复到原来的行高"
ActiveSheet.Rows(rRow).RowHeight = iRow
End Sub
--------------------------------------------------------------------------------
[示例04-11-07]设置列宽
Sub SetColumnWidth()
MsgBox "将当前单元格所在列的列宽设置为20"
Dim cColumn As Long, iColumn As Long
cColumn = ActiveCell.Column
iColumn = ActiveSheet.Columns(cColumn).ColumnWidth
ActiveSheet.Columns(cColumn).ColumnWidth = 20
MsgBox "恢复至原来的列宽"
ActiveSheet.Columns(cColumn).ColumnWidth = iColumn
End Sub
--------------------------------------------------------------------------------
[示例04-11-08]恢复行高列宽至标准值
Sub ReSetRowHeightAndColumnWidth()
MsgBox "将当前单元格所在的行高和列宽恢复为标准值"
Selection.UseStandardHeight = True
Selection.UseStandardWidth = True
End Sub
--------------------------------------------------------------------------------
[示例04-12]工作表标签
[示例04-12-01] 设置工作表标签的颜色
Sub SetSheetTabColor()
MsgBox "设置当前工作表标签的颜色"
ActiveSheet.Tab.ColorIndex = 7
End Sub
--------------------------------------------------------------------------------
[示例04-12-01]恢复工作表标签颜色
Sub SetSheetTabColorDefault()
MsgBox "将当前工作表标签颜色设置为默认值"
ActiveSheet.Tab.ColorIndex = -4142
End Sub
--------------------------------------------------------------------------------
[示例04-12-03]交替隐藏或显示工作表标签
Sub HideOrShowSheetTab()
MsgBox "隐藏/显示工作表标签"
ActiveWindow.DisplayWorkbookTabs = Not ActiveWindow.DisplayWorkbookTabs
End Sub
--------------------------------------------------------------------------------
[NextPage][示例04-13]确定打印的页数(HPageBreaks属性与VPageBreaks属性)
Sub PageCount()
Dim i As Long
i = (ActiveSheet.HPageBreaks.Count + 1) * (ActiveSheet.VPageBreaks.Count + 1)
MsgBox "当前工作表共" & i & "页."
End Sub
--------------------------------------------------------------------------------
[示例04-14]保护/撤销保护工作表
[示例04-14-01]
Sub ProtectSheet()
MsgBox "保护当前工作表并设定密码"
ActiveSheet.Protect Password:="fanjy"
End Sub
示例说明:运行代码后,当前工作表中将不允许编辑,除非撤销工作表保护。
--------------------------------------------------------------------------------
[示例04-14-02]
Sub UnprotectSheet()
MsgBox "撤销当前工作表保护"
ActiveSheet.Unprotect
End Sub
示例说明:运行代码后,如果原保护的工作表设置有密码,则要求输入密码。
--------------------------------------------------------------------------------
[示例04-14-03]保护当前工作簿中的所有工作表
Sub ProtectAllWorkSheets()
On Error Resume Next
Dim ws As Worksheet
Dim myPassword As String
myPassword = InputBox("请输入您的密码" & vbCrLf & _
"(不输入表明无密码)" & vbCrLf & vbCrLf & _
"确保您没有忘记密码!", "输入密码")
For Each ws In ThisWorkbook.Worksheets
ws.Protect (myPassword)
Next ws
End Sub
--------------------------------------------------------------------------------
[示例04-14-04]撤销对当前工作簿中所有工作表的保护
Sub UnprotectAllWorkSheets()
On Error Resume Next
Dim ws As Worksheet
Dim myPassword As String
myPassword = InputBox("请输入您的密码" & vbCrLf & _
"(不输入表示无密码)", "输入密码")
For Each ws In ThisWorkbook.Worksheets
ws.Unprotect (myPassword)
Next ws
End Sub
--------------------------------------------------------------------------------
[示例04-14-05]仅能编辑未锁定的单元格
Sub OnlyEditUnlockedCells()
Sheets("Sheet1").EnableSelection = xlUnlockedCells
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub
示例说明:运行本代码后,在当前工作表中将只能对未锁定的单元格进行编辑,而其它单元格将不能编辑。未锁定的单元格是指在选择菜单“格式——单元格”命令后所弹出的对话框中的“保护”选项卡中,未选中“锁定”复选框的单元格或单元格区域。
--------------------------------------------------------------------------------
[示例04-15]删除工作表(Delete方法)
Sub DeleteWorksheet()
MsgBox "删除当前工作簿中的工作表sheet2"
Application.DisplayAlerts = False
Worksheets("sheet2").Delete
Application.DisplayAlerts = True
End Sub
示例说明:本示例代码使用Application.DisplayAlerts = False来屏蔽弹出的警告框。
--------------------------------------------------------------------------------
<一些编程方法和技巧>
[示例04-16] 判断一个工作表(名)是否存在
[示例04-16-01]
Sub testWorksheetExists1()
Dim ws As Worksheet
If Not WorksheetExists(ThisWorkbook, "sheet1") Then
MsgBox "不能够找到该工作表", vbOKOnly
Exit Sub
End If
MsgBox "已经找到工作表"
Set ws = ThisWorkbook.Worksheets("sheet1")
End Sub
'- - - - - - - - - - - - - - - - - - -
Function WorksheetExists(wb As Workbook, sName As String) As Boolean
Dim s As String
On Error GoTo ErrHandle
s = wb.Worksheets(sName).Name
WorksheetExists = True
Exit Function
ErrHandle:
WorksheetExists = False
End Function
示例说明:在测试代码中,用相应的工作簿名和工作表名分别代替“ThisWorkbook”和“Sheet1”,来判断指定工作表是否在工作簿中存在。
--------------------------------------------------------------------------------
[示例04-16-02]
Sub testWorksheetExists2()
If Not SheetExists("<工作表名>") Then
MsgBox "<工作表名> 不存在!"
Else
Sheets("<工作表名>").Activate
End If
End Sub
'- - - - - - - - - - - - - - - - - - -
Function SheetExists(SheetName As String) As Boolean
SheetExists = False
On Error GoTo NoSuchSheet
If Len(Sheets(SheetName).Name) > 0 Then
SheetExists = True
Exit Function
End If
NoSuchSheet:
End Function
示例说明:在代码中,用实际工作表名代替<>。
--------------------------------------------------------------------------------
[示例04-16-03]
Sub TestingFunction()
'如果工作表存在则返回True,否则为False
'测试DoesWksExist1函数
Debug.Print DoesWksExist1("Sheet1")
Debug.Print DoesWksExist1("Sheet100")
Debug.Print "-----"
'测试DoesWksExist2函数
Debug.Print DoesWksExist2("Sheet1")
Debug.Print DoesWksExist2("Sheet100")
End Sub
‘- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Function DoesWksExist1(sWksName As String) As Boolean
Dim i As Long
For i = Worksheets.Count To 1 Step -1
If Sheets(i).Name = sWksName Then
Exit For
End If
Next
If i = 0 Then
DoesWksExist1 = False
Else
DoesWksExist1 = True
End If
End Function
‘- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Function DoesWksExist2(sWksName As String) As Boolean
Dim wkb As Worksheet
On Error Resume Next
Set wkb = Sheets(sWksName)
On Error GoTo 0
DoesWksExist2 = IIf(Not wkb Is Nothing, True, False)
End Function
--------------------------------------------------------------------------------
[示例04-17]排序工作表
[示例04-17-01]
Sub SortWorksheets1()
Dim bSorted As Boolean
Dim nSortedSheets As Long
Dim nSheets As Long
Dim n As Long
nSheets = Worksheets.Count
nSortedSheets = 0
Do While (nSortedSheets < nSheets) And Not bSorted
bSorted = True
nSortedSheets = nSortedSheets + 1
For n = 1 To nSheets - nSortedSheets
If StrComp(Worksheets(n).Name, Worksheets(n + 1).Name, vbTextCompare) > 0 Then
Worksheets(n + 1).Move Before:=Worksheets(n)
bSorted = False
End If
Next n
Loop
End Sub
示例说明:本示例代码采用了冒泡法排序。
--------------------------------------------------------------------------------
[示例04-17-02]
Sub SortWorksheets2()
'根据字母对工作表排序
Dim i As Long, j As Long
For i = 1 To Sheets.Count
For j = 1 To Sheets.Count - 1
If UCase$(Sheets(j).Name) > UCase$(Sheets(j + 1).Name) Then
Sheets(j).Move After:=Sheets(j + 1)
End If
Next j
Next i
End Sub
--------------------------------------------------------------------------------
[示例04-17-03]
Sub SortWorksheets3()
'以升序排列工作表
Dim sCount As Integer, i As Integer, j As Integer
Application.ScreenUpdating = False
sCount = Worksheets.Count
If sCount = 1 Then Exit Sub
For i = 1 To sCount - 1
For j = i + 1 To sCount
If Worksheets(j).Name < Worksheets(i).Name Then
Worksheets(j).Move Before:=Worksheets(i)
End If
Next j
Next i
End Sub
示例说明:若想排序所有工作表,将代码中的Worksheets替换为Sheets。
--------------------------------------------------------------------------------
[示例04-18]删除当前工作簿中的空工作表
Sub Delete_EmptySheets()
Dim sh As Worksheet
For Each sh In ThisWorkbook.Worksheets
If Application.WorksheetFunction.CountA(sh.Cells) = 0 Then
Application.DisplayAlerts = False
sh.Delete
Application.DisplayAlerts = True
End If
Next
End Sub

最近,不少电脑用户都在寻找wps2012专业版序列号。那么,有没有免费的wps2012专业版序列号呢。下面,小编就为大家整理一些可以免费使用的wps2012专业版的序列号,不过这一些序列号主要是90天试用期跟180天试用期,大家可以换着用,就可以永不过期了。希望可以帮到大家!

免费的wps2012专业版序列号汇总

wps

两个90天试用序列号

序列号:B87YU-U4TFP-4V29D-P7V29-QP39H

序列号:2N42F-Q9CD8-36CEW-DB38X-B2CTD

以下为180天试用序列号

序列号:TNTN3-KLFWG-2V47H-KE4AW-EHRCG

序列号:APD8E-LLMX7-K7GHM-BN3WE-VFQYE

序列号:P23YP-UEW2U-XA74H-CRFTG-RNL2E

序列号:7JJYF-U8J8B-RPT43-LWT7Q-8KBPF

序列号:QNBAU-3UYXL-ME69H-MF4FB-VD6KF

序列号:Q6TYQ-CNE6F-DFH6P-GATPK-G2YQB

序列号:X7A4C-2JT8P-UBCX4-EC2AD-44EPD

序列号:UUQWQ-VQAAE-JY49T-2T83M-CXT3F

序列号:NBPCG-XKGBW-4YLEM-PY9F8-N7JPA

序列号:7V4AX-QVALB-RKW24-LDGLE-2QYPD

序列号:3YCFV-QQWT3-MBVXF-BCU27-LKQMB

序列号:7Y4YG-QWUU4-T4BKT-P2UBD-JNCPA

序列号:RXT9U-VBTL9-BTTQU-UL763-WWDBD

序列号:X9UFE-384LY-ABM3Q-BAWXU-XRBKF

序列号:Y3TEW-NQUKE-NLRUC-3TUV6-T4TBA

序列号:RXT9U-VBTL9-BTTQU-UL763-WWDBD

序列号:7Y4YG-QWUU4-T4BKT-P2UBD-JNCPA

序列号:MRTQW-RVRG3-GEV6R-6V3KB-H6H8K

序列号:6JPJT-TPBFM-BPWE2-MCG4H-XQ4ND

序列号:RGUHL-AAL7F-H2TX8-AX9QH-DRKEG

序列号:ETNP7-4AL83-Q8JA4-6WDKY-LDG8J

序列号:RGW7J-TQVT2-FBKVK-CDJML-WTDTH

序列号:FWAXF-CA3MP-92QWR-6AQBJ-YJTFK

序列号:8R9AV-YXXEP-2JJRV-MR7RN-A7H9K

序列号:D6LFC-A8WRQ-R7244-4938A-NXEEH

序列号:RHKR3-VWN8P-4HFNM-4DBW4-FBUXB

序列号:3TTKV-MVUA3-X6CM6-V6KN2-KFMEJ

两个90天试用序列号

序列号:B87YU-U4TFP-4V29D-P7V29-QP39H

序列号:2N42F-Q9CD8-36CEW-DB38X-B2CTD

以下为180天试用序列号

序列号:TNTN3-KLFWG-2V47H-KE4AW-EHRCG

序列号:APD8E-LLMX7-K7GHM-BN3WE-VFQYE

序列号:P23YP-UEW2U-XA74H-CRFTG-RNL2E

序列号:7JJYF-U8J8B-RPT43-LWT7Q-8KBPF

序列号:QNBAU-3UYXL-ME69H-MF4FB-VD6KF

序列号:Q6TYQ-CNE6F-DFH6P-GATPK-G2YQB

序列号:X7A4C-2JT8P-UBCX4-EC2AD-44EPD

序列号:UUQWQ-VQAAE-JY49T-2T83M-CXT3F

序列号:NBPCG-XKGBW-4YLEM-PY9F8-N7JPA

序列号:7V4AX-QVALB-RKW24-LDGLE-2QYPD

序列号:3YCFV-QQWT3-MBVXF-BCU27-LKQMB

序列号:7Y4YG-QWUU4-T4BKT-P2UBD-JNCPA

序列号:RXT9U-VBTL9-BTTQU-UL763-WWDBD

序列号:X9UFE-384LY-ABM3Q-BAWXU-XRBKF

序列号:Y3TEW-NQUKE-NLRUC-3TUV6-T4TBA

序列号:RXT9U-VBTL9-BTTQU-UL763-WWDBD

序列号:7Y4YG-QWUU4-T4BKT-P2UBD-JNCPA

序列号:MRTQW-RVRG3-GEV6R-6V3KB-H6H8K

序列号:6JPJT-TPBFM-BPWE2-MCG4H-XQ4ND

序列号:RGUHL-AAL7F-H2TX8-AX9QH-DRKEG

序列号:ETNP7-4AL83-Q8JA4-6WDKY-LDG8J

序列号:RGW7J-TQVT2-FBKVK-CDJML-WTDTH

序列号:FWAXF-CA3MP-92QWR-6AQBJ-YJTFK

序列号:8R9AV-YXXEP-2JJRV-MR7RN-A7H9K

序列号:D6LFC-A8WRQ-R7244-4938A-NXEEH

序列号:RHKR3-VWN8P-4HFNM-4DBW4-FBUXB

序列号:3TTKV-MVUA3-X6CM6-V6KN2-KFMEJ

想不想一进入自己的名片时就可以听到好听的音乐呢?那么怎么才能一进到名片就能听到音乐呢?下面小编就来教大家米聊2015怎么开启进入自己的名片时播放主题曲的方法,不会的朋友可以参考本文,希望可以帮到大家。

1)首先先打开【米聊2015】,登录进去之后点击【圈子】。(如下图)

米聊2015怎么开启进入自己的名片时播放主题曲?
米聊2015怎么开启进入自己的名片时播放主题曲?

2)进去之后向上滑动一下点击【设置】,然后点击【通用】。(如下图)

米聊2015怎么开启进入自己的名片时播放主题曲?
米聊2015怎么开启进入自己的名片时播放主题曲?

3)最后一步把【进入名片时播放主题曲】打开就可以了。(如下图)

米聊2015怎么开启进入自己的名片时播放主题曲?

教程结束,以上就是米聊2015怎么开启进入自己的名片时播放主题曲的方法介绍,希望能帮到大家,谢谢大家阅读!

当我们看到自己非常喜欢非常好看的电影或者电视剧或者其他视频的时候,我们通常都希望也分享给好友,推荐他们观看,搜狐影音播放器提供了快捷截屏的功能,让你可以方便快捷的将视频画面截下来,保存到本地电脑上,然后可以分享给你的好友,或者发布到博客论坛等地方。下面我们就来看一下,搜狐影音播放器具体如何截图吧。

在使用搜狐影音播放器观看视频的时候,当你需要截图时,最方便快捷的方式就是使用截图快捷,默认是Ctrl+Alt+P(具体你可以进入进行查看与修改),同时按下键盘上的这几个键,就可以对当前视频当前帧进行截图了。

另外,你可以鼠标右键搜狐影音播放器窗口,在弹出的菜单中选择“截图”,或者将鼠标移动到搜狐影音播放器窗口中,在顶部就会弹出一排小按钮,点击右上角的“截屏”按钮,也可以进行截图操作。

搜狐影音播放器如何截图截屏使用图解

截图成功后,默认会在播放器左下角可以看到提示,点击提示信息里的“查看保存目录”链接就可以打开搜狐影音保存截图的文件夹查看所有截图。

搜狐影音播放器如何截图截屏使用图解

Xposed 框架是个神器,在其基础上增加一些模块可实现各种强大的功能,比如绿色守护、XPrivacy等,本教程从基础开始,详细说下Xposed 框架的安装及使用。Xposed框架是一款可以在不修改APK的情况下影响程序运行(修改系统)的框架服务,基于它可以制作出许多功能强大的模块,且在功能不冲突的情况下同时运作。 当前,Per APP Setting(为每个应用设置单独的dpi或修改权限)、Cydia、XPrivacy(防止隐私泄露)、对原生Launcher替换图标等应用或功能均基于此框架。

软件名称:XPrivacy(X隐私) Xposed框架模块 for android v3.6.9 安卓版软件大小:1.65MB更新时间:2015-04-19

软件名称:Xposed框架 v2.7 experimental1 安卓版软件大小:770KB更新时间:2014-07-09

xposed框架是什么意思?xposed框架有什么作用?

xposed框架是一个由xda开发的框架,安装之后,让许多软件在此框架里面运行,比如绿色守护借助这个框架可以获得更多的功能,gravitybox必须在这个框架里面运行,需要root,MIUI禁止使用。

Xposed 就好比是 Google 模块化手机的主体,只是一个框架的存在,在添加其他功能模块(Modules)之前,发挥不了什么作用,但是没了它也不行。也正因为如此,Xposed 具有比较高的可定制化程度。Moto X 用户可定制手机的外观、壁纸、开机动画等,Xposed 则允许用户自选模块对手机功能进行自定义扩充。

Xposed的优点

Xposed 是基于 AOSP 开发的,对源代码改动不大的 ROM 的兼容性较好,这也就使得某一功能可借由 Xposed 移植到不同的 ROM 上。

作为 Android 用户,你可能喜欢现有 ROM 的界面,同时羡慕其他 ROM 的一些特色功能。有了 Xposed,大可不必为了追求某些特色功能而换掉现有 ROM,使 ROM 的美观性与功能性兼备。不过前提是仓库中存在相应的功能模块。

若要使 ROM 恢复原状,只需取消勾选所有模块或停用 Xposed 即可,无需复杂的刷机操作。

安装 Xposed 框架安装器

  Xposed 框架需要Android 4.0.3及更高版本才能安装,目前还不支持Android 4.4,以后的版本应该会支持。Xposed 框架也需要有ROOT授权才能安装,安卓的一切高级应用都需要ROOT权限,所以如果你想痛快的玩机,去ROOT吧!

xposed框架是什么?xposed框架有什么作用及功能

xposed框架是什么?xposed框架有什么作用及功能

  Xposed 框架需要使用安装器进行安装,所以我们需要先安装Xposed 框架安装器,安装完成打开后点击框架(如图中红框位置),进行框架的安装。

安装 Xposed 框架

xposed框架是什么?xposed框架有什么作用及功能

xposed框架是什么?xposed框架有什么作用及功能

  点击后进入框架安装、升级界面,我们点击“安装/更新”,会出现ROOT授权提示,许可即可。这里小编给大家个提醒,为了Xposed 框架及以后各种模块的良好运行建议使用好的授权管理,目前各种一键root生成的各种授权管理程序可能无法满足Xposed 框架及以后各种模块的需求。建议使用SuperSU Pro。Xposed 框架安装完成后重启手机才能激活,可直接点击重启也可手动重启。

选用模块

xposed框架是什么?xposed框架有什么作用及功能

xposed框架是什么?xposed框架有什么作用及功能

  我们安装Xposed 框架是为了使用各种模块,而增强手机的各种功能。在Xposed 框架安装器中可以点击“下载”进入模块仓库下载自己需要的模块,不过这里全是英文,可能与小编一样英文不好的朋友用起来有难度。还有个方法就是,直接安装需要的模块后,在Xposed 框架安装器中点击“模块”进入模块界面进行勾选,这里以红色守护的试验性功能为例,勾选后模块就开始发挥作用了。

总结

  Xposed 框架安装器可以看成是个Xposed 框架的管理工具,在这里可以安装、更新Xposed 框架,也可以卸载Xposed 框架,查看安装日志。也可设置Xposed 框架安装器是否联网更新框架及模块。