例3-1文字与背景颜色搭配(程序名：Color.html)。
<Html>
<Head><Title>文字与背景颜色的搭配</Title>
<Script Language=“VBScript”>
<!--
Sub bchange(choice)
If choice=1 Then
document．bgcolor=“yellow”
ElseIf choice=2 Then
document．fgcolor=“blue”
ElseIf choice=3 Then
document．bgcolor=“pink”
ElseIf choice=4 Then
document．fgcolor=“red”
ElseIf choice=5 Then
document．bgcolor=“green”
Else
document．fgcolor=“black”
End If
End Sub
-->
</Script>
</Head>
<Body>
<Center><H2><font color=“blue”>文字与背景颜色的搭配</font></H2>
<Table border=3>
<Tr>
<Th>背景颜色<Th>选择<Th>文字颜色<Th>选择
</Tr>
<Tr>
<Td>黄色
<Td><Input type=radio onclick=“bchange(1)”>
<Td>蓝色
<Td><Input type=radio onclick=“bchange(2)”>
</Tr>
<Tr>
<Td>粉红色</Td>
<Td>
<Input type=radio onclick=“bchange(3)”>
</Td>
<Td>红色</Td>
<Td>
<Input type=radio onclick=“bchange(4)”>
</Td>
</Tr>
<Tr>
<Td>绿色</Td>
<Td>
<Input type=radio onclick=“bchange(5)”>
</Td>
<Td>黑色</Td>
<Td>
<Input type=radio onclick=“bchange(6)”>
</Td>
</Tr>
</Table>
</Center>
</Body>
</Html>