btformat.htm
来自「小游戏网站演示www.4399.io 拥有4万条游戏数据」· HTM 代码 · 共 320 行 · 第 1/2 页
HTM
320 行
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style>TD {FONT-SIZE: 12px}</style>
<title>设置标题格式</title>
<script language="javascript">
function setcolor()
{
myfont.style.color=co.value;
T1.value=sylr();
}
function setsize()
{
myfont.style.fontsize=fs.value;
T1.value=sylr();
}
function setfon()
{
//abc="font-family";
myfont.style.fontFamily=font1.value;
T1.value=sylr();
}
function seok(){
window.returnValue=T1.value;
window.close();
}
</SCRIPT>
<script language="vbscript">
function setsy()
syname=SY.value
select case syname
case "W"
myfont.style.fontweight="" '加粗
myfont.style.textdecoration="" '下线
myfont.style.fontstyle="" '斜体
case "B"
myfont.style.fontweight="bold" '加粗
myfont.style.textdecoration="" '下线
myfont.style.fontstyle="" '斜体
case "U"
myfont.style.fontweight="" '加粗
myfont.style.textdecoration=" underline" '下线
myfont.style.fontstyle="" '斜体
case "I"
myfont.style.fontweight="" '加粗
myfont.style.textdecoration="" '下线
myfont.style.fontstyle="italic" '斜体
case "BU"
myfont.style.fontweight="bold" '加粗
myfont.style.textdecoration=" underline" '下线
myfont.style.fontstyle="" '斜体
case "BI"
myfont.style.fontweight="bold" '加粗
myfont.style.textdecoration="" '下线
myfont.style.fontstyle="italic" '斜体
case "UI"
myfont.style.fontweight="" '加粗
myfont.style.textdecoration=" underline" '下线
myfont.style.fontstyle="italic" '斜体
case "BUI"
myfont.style.fontweight="bold" '加粗
myfont.style.textdecoration=" underline" '下线
myfont.style.fontstyle="italic" '斜体
end select
T1.value=sylr()
end function
function sylr()
SYB="font-weight:"& myfont.style.fontweight &";"
if myfont.style.fontweight = "" then SYB=""
SYI="font-style:"&myfont.style.fontstyle&";"
if myfont.style.fontstyle = "" then SYI=""
SYU="text-decoration:"&myfont.style.textdecoration&";"
if myfont.style.textDecoration = "" then SYU=""
SYFONT="font-family:"&myfont.style.fontfamily&";"
if myfont.style.fontfamily = "" then SYFONT=""
SYCOLO="color:"&myfont.style.color&";"
if myfont.style.color = "" then SYCOLO=""
SYSIZE="font-size:"&myfont.style.fontsize&";"
if myfont.style.fontsize = "" then SYSIZE=""
sylr="style="&chr(34) & syb & syi & syu & syfont & sycolo & sysize & chr(34)
end function
</SCRIPT>
</head>
<body bgcolor="ECE9D8" topmargin="2" leftmargin="0">
<table border="0" cellspacing="0" width="100%" id="AutoNumber2" cellpadding="0" height="100%">
<tr>
<td width="10"></td>
<td>
<table border="1" cellspacing="0" width="100%" id="AutoNumber1" bordercolorlight="#000000" bordercolordark="#FFFFFF" cellpadding="0" height="100%">
<tr>
<td width="100%" valign="top">
<table border="0" cellspacing="1" width="100%" id="AutoNumber3">
<tr>
<td width="79%" align="center">
<table border="0" cellspacing="1" id="AutoNumber5">
<tr>
<td width="66%" colspan="2"><input type="hidden" name="T1" ></td>
</tr>
<tr>
<td width="33%"><select onchange="vbscript:setsy()" size="4" name="SY" multiple>
<option value="W">无</option>
<option value="B">加粗</option>
<option value="U">下线</option>
<option value="I">倾斜</option>
<option value="BU">加粗 下线</option>
<option value="BI">倾斜 加粗</option>
<option value="UI">倾斜 下线</option>
<option value="BUI">加粗 倾斜 下线</option>
</select></td>
<td width="33%">
<select onchange="javascript:setfon()" id="font1" name="font1" multiple >
<option value="宋体">宋体<option value="黑体">黑体<option value="楷体_GB2312">楷体<option value="仿宋_GB2312">仿宋<option value="隶书">隶书<option value="幼圆">幼圆<option value="新宋体">新宋体<option value="细明体">细明体<option value="Arial">Arial<option value="Arial Black">Arial
Black<option value="Arial Narrow">Arial Narrow<option value="Bradley Hand ITC">Bradley
Hand ITC<option value="Brush Script MT">Brush Script MT<option value="Century Gothic">Century
Gothic<option value="Comic Sans MS">Comic Sans MS<option value="Courier">Courier<option value="Courier New">Courier
New<option value="MS Sans Serif">MS Sans Serif<option value="Script">Script<option value="System">System<option value="Times New Roman">Times
New Roman<option value="Viner Hand ITC">Viner Hand ITC<option value="Verdana">Verdana<option value="Wide Latin">Wide
Latin<option value="Wingdings">Wingdings</option></select></td>
</tr>
<tr>
<td width="33%">文字颜色 </td>
<td width="33%"> <select name="co" id="co" size="1" onchange="javascript:setcolor()">
<option style="BACKGROUND-COLOR: #f0f8ff; COLOR: #f0f8ff" value="F0F8FF">#F0F8FF</option>
<option style="BACKGROUND-COLOR: red; COLOR: red" value="red">red</option>
<option style="BACKGROUND-COLOR: blue; COLOR: blue" value="blue">blue</option>
<option style="BACKGROUND-COLOR: green; COLOR: green" value="green">green</option>
<option style="BACKGROUND-COLOR: #faebd7; COLOR: #faebd7" value="FAEBD7">#FAEBD7</option>
<option style="BACKGROUND-COLOR: #00ffff; COLOR: #00ffff" value="00FFFF">#00FFFF</option>
<option style="BACKGROUND-COLOR: #7fffd4; COLOR: #7fffd4" value="7FFFD4">#7FFFD4</option>
<option style="BACKGROUND-COLOR: #f0ffff; COLOR: #f0ffff" value="F0FFFF">#F0FFFF</option>
<option style="BACKGROUND-COLOR: #f5f5dc; COLOR: #f5f5dc" value="F5F5DC">#F5F5DC</option>
<option style="BACKGROUND-COLOR: #ffe4c4; COLOR: #ffe4c4" value="FFE4C4">#FFE4C4</option>
<option style="BACKGROUND-COLOR: #000000; COLOR: #000000" value="000000">#000000</option>
<option style="BACKGROUND-COLOR: #ffebcd; COLOR: #ffebcd" value="FFEBCD">#FFEBCD</option>
<option style="BACKGROUND-COLOR: #0000ff; COLOR: #0000ff" value="0000FF">#0000FF</option>
<option style="BACKGROUND-COLOR: #8a2be2; COLOR: #8a2be2" value="8A2BE2">#8A2BE2</option>
<option style="BACKGROUND-COLOR: #a52a2a; COLOR: #a52a2a" value="A52A2A">#A52A2A</option>
<option style="BACKGROUND-COLOR: #deb887; COLOR: #deb887" value="DEB887">#DEB887</option>
<option style="BACKGROUND-COLOR: #5f9ea0; COLOR: #5f9ea0" value="5F9EA0">#5F9EA0</option>
<option style="BACKGROUND-COLOR: #7fff00; COLOR: #7fff00" value="7FFF00">#7FFF00</option>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?