文字添加删除线方法有两种，一种是使用html删除线标签<s>；另外一种是使用css删除线样式text-decoration：line-through。

html标签实现删除线样式

1，使用标签

< s > 我被加删除线</ s >

2，css删除线样式实现删除线效果

使用css实现删除线样式属性单词text-decoration：line-through

使用CSS text-decoration 属性 可以添加删除线

text-decoration定义和用法：

text-decoration 属性规定添加到文本的修饰。

注释：修饰的颜色由 “color” 属性设置。

说明：这个属性允许对文本设置某种效果，如加下划线。如果后代元素没有自己的装饰，祖先元素上设置的装饰会“延伸”到后代元素中。不要求用户代理支持 blink。

text-decoration可能的值：

none默认。定义标准的文本。

underline定义文本下的一条线。

overline定义文本上的一条线。

line-through定义穿过文本下的一条线。

blink定义闪烁的文本。

inherit规定应该从父元素继承 text-decoration 属性的值。

前端设计模式-面试题

分享成果，随喜正能量】我们毕生的任务就是做一个优秀的普通人。这个优秀的普通人，热爱世界，热爱万物，热爱众生，然后踏踏实实地去寻找到一个自己内心喜欢又有时代价值的事情。一个人一辈子能够做好一两件事就很好了。。

我给VBA的定义：VBA是个人小型自动化处理的有效工具。利用好了，可以大大提高自己的劳动效率，而且可以提高数据的准确度。我推出的VBA系列教程共十套(本文的最后附有VBA教程目录和VBA工具目录)，现在已经全部完成。

如果您VBA是入门阶段，可以打包选择7.1.3.9教程，第7套教程是入门，第1套教程是入门后的提高，第3套教程字典是必备的VBA之精华，第9套教程是实用的典型案例讲解。如果您有了一定的VBA基础可以根据自己的需要，进行教程的选择。教程提供的程序源码文件就如一座大型的代码库支持着大家的工作。同时还有实用的资料送给学员。

VBA是面向对象编程的语言，博大精深。很多朋友咨询英语和VBA的关系，这套《VBA即用型代码手册（汉英）》集合了众多的案例，案例我用汉语和英语同时发布，学员从中可以更好的领会和掌握VBA中用到的一些英语。今日的内容：WORD_VBA文本框的添加、删除、写入及保存为html文件

第六章 Word对象及示例

Word Objects and Macro Examples

7 文本框的添加、删除、写入 TextBox: Add, Delete, Write

Sub mynzAddTextBox()

ActiveDocument.Shapes.AddTextBox Orientation:=msoTextOrientationHorizontal, _

Left:=100, Top:=180, Width:=300, Height:=100

End Sub

Sub mynzDeleteTextBox()

'我们需要检查 oShape 是否属于 msoShapeRectangle 类型，并且它的文本框是否包含书写位置

Dim oShape As Shape

If ActiveDocument.Shapes.Count > 0 Then

For Each oShape In ActiveDocument.Shapes

If oShape.AutoShapeType = msoShapeRectangle Then

If oShape.TextFrame.HasText = True Then

oShape.Delete

End If

End If

Next oShape

End If

End Sub

Sub mynzWriteInTextBox()

Dim oShape As Shape

If ActiveDocument.Shapes.Count > 0 Then

For Each oShape In ActiveDocument.Shapes

If oShape.AutoShapeType = msoShapeRectangle Then

If oShape.TextFrame.HasText = True Then

oShape.TextFrame.TextRange.InsertAfter "VBA Case"

Exit For

End If

End If

Next oShape

End If

End Sub

8 另存为html文件SaveAs .Html File

Sub mynzSaveMewithDateName()

'将当前活动文档保存为过滤后的 html，并以当前时间命名

Dim strTime As String

strTime = Format(Now, "hh-mm")

ActiveDocument.SaveAs FileName:=ActiveDocument.Path & "\" & strTime, FileFormat:=wdFormatFilteredHTML

End Sub

【分享成果，随喜正能量】我20多年的VBA实践经验，全部浓缩在下面的各个教程中：

【分享成果，随喜正能量】总有一段时光，让我们深感痛苦，但不是所有的时光都这样，我们要学会在黑暗中，找到一丝光芒，这束光来自于内心，它会让我们重新找到好日子。。

闽南网]

很多人在平时浏览网页的时候，或许都会发现一些事情，当你发现一篇好文章或者是一些有趣的东西时，想复制却不能复制，相信很多人遇到不少这样的问题，那么这种情况该怎么解决呢，下面就和小编一起来看看吧!

方法1

1打开目标网页，选中网页的地址栏。(这里以360浏览器为例)

2在地址栏输入下行代码，全部输入。

javascript：void($={});

按下回车键(Enter)，破解完成。(回车后不会跳转网页)

3注意，如果网页被刷新，限制会恢复，需要重新输入代码。

方法2

1打开右上角工具，选择最后的选项

2选择 高级设置-网页设置，点击 网页内容高级设置

3找到 JavaScript选项-不允许任何网站运行 JavaScript

4完成，关闭选项标签页。(做完之后可以调回去)

方法3

用浏览器随便打开一个网页，添加到收藏夹，最好放到浏览器的标签栏，方便使用。这里以百度为例

添加之后右键选择编辑，修改名字为【破解限制】，在地址栏粘贴以下代码

javascript：(function{eval(function(p,a,c,k,e,r){e=function(c){return(c35?String.fromCharCode(c+29):c.toString(36))};if(!''.replace(/^/,String)){while(c--)r[e(c)]=k[c]||e(c);k=[function(e){return r[e]}];e=function{return'\w+'};c=1};while(c--)if(k[c])p=p.replace(new RegExp('\b'+e(c)+'\b','g'),k[c]);return p}('5 2=8;5 3=2.K;3.7=3.k=3.e=3.9=3.6=3.y=3.7=3.z=2.7=2.k=2.e=2.9=2.6=4;2.7=2.6=2.c=2.9=p{r t};g(8.n||8){d=4;c=4;6=4}5 a=8.15(\'*\');o(5 i=a.q-1;i>=0;i--){5 b=a[i];g(b.n||b){d=4;c=4}}s(h(\'%u%v%w%x%j%17%A%B%C%j%D\')+\'\E\'+h(\'%F%G%H%I%J%l%L%l%M%N%O%P%Q%R%S%T%U%V%W%X%Y\')+\'\Z.10.11\');3.m.13=\'14!f\';3.m.16=\'12!f\';',62,70,'||doc|bd|null|var|oncontextmenu|onselectstart|document|onkeydown|arAllElements|elmOne|onmousedown|onmouseup|onpaste|important|with|unescape||u5236|oncopy|u7528|style|wrappedJSObject|for|function|length|return|alert|true|u5DF2|u89E3|u9664|u590D|onmousemove|ondragstart|u53F3|u952E|u9650|uFF01|u000d|u66F4|u591A|u7CBE|u5F69|u5B9E|body|u5e94|uFF0C|u8BF7|u5173|u6CE8|u300E|u0065|u5f27|u5ea6|u7535|u5b50|u5546|u52a1|u300F|u000dwww|ehudu|com|text|webkitUserSelect|auto|getElementsByTagName|MozUserSelect|u4E0E'.split('|'),0,{}))})

保存，完成。打开需要破解的网页，点一下刚才创建的标签，破解完成，但每次打开网页都需要点一下破解的标签。要求：浏览器必须能执行javascript代码，其它浏览器添加书签类似。

方法4

使用Ctrl+A选择网页全部文字，Ctrl+C复制，新建文本档案，Ctrl+V粘贴，删除不需要的文字。(这个方法只适用于网页内容无法选中的网页，有时候会无法复制，这时候就需要用到上面的方法了)