backgroud1_word.htm

来自「VBSCRIPT的源码,相信很多html程序员都会用到,这些源码小小变动一下,可」· HTM 代码 · 共 70 行

HTM
70 行
字号 
<html>
<head>
<title>改变背景和文字的颜色</title>
<script LANGUAGE="VBScript">
<!---
sub bchange(choice)
       if choice=1 then
          document.bgcolor="lightblue"
        elseif choice=2 then
          document.fgcolor="brow"
        elseif choice=3 then
          document.bgcolor="pink"
        elseif choice=4 then
          document.fgcolor="blue"
        elseif choice=5 then
          document.bgcolor="yellow"
         elseif choice=6 then
          document.fgcolor="orange"
          elseif choice=7 then
          document.bgcolor="darkorchid"
   else
         document.fgcolor="red"
   end if
end sub
-->
</script>
</head>

<body bgcolor="#C0C0C0">
<center>
<font size="5" color="#008000">选择背景和文字的颜色
</font></p>
</center>
<div align="center"><center>
<table border="2" width="55%">
  <tr>
    <td width="35%">背景颜色</td>
    <td width="19%">选择</td>
    <td width="30%">字体颜色</td>
    <td width="17%">选择</td>
  </tr>
  <tr>
    <td width="35%">浅蓝色</td>
    <td width="19%"><input type="radio" onclick="bchange(1)"></td>
    <td width="19%">浅红色</td>
    <td width="17%"><input type="radio" onclick="bchange(2)"></td>
  </tr>
  <tr>
    <td width="35%">浅红色</td>
    <td width="19%"><input type="radio" onclick="bchange(3)"></td>
    <td width="30%">蓝色blue</td>
    <td width="17%"><input type="radio" onclick="bchange(4)"></td>
  </tr>
  <tr>
    <td width="35%">黄色</td>
    <td width="19%"><input type="radio" onclick="bchange(5)"></td>
    <td width="30%">橘色</td>
    <td width="17%"><input type="radio" onclick="bchange(6)"></td>
  </tr>
  <tr>
    <td width="35%">浅紫色</td>
    <td width="19%"><input type="radio" onclick="bchange(7)"></td>
    <td width="30%">红色</td>
    <td width="17%"><input type="radio" onclick="bchange(8)"></td>
  </tr>
</table>
</center></div>
</body>
</html>

backgroud1_word.htm - 源码说明

本页面展示了「VBSCRIPT的源码,相信很多html程序员都会用到,这些源码小小变动一下,可以用在很多地方,尤其在DHTML中!」中的 backgroud1_word.htm 源码文件，采用 HTM 编程语言编写，共 70 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与VBScript相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?