正在加载图片...
【例3-1】文字与背景颜色搭配。 <Head><Titl文字与背景颜色搭配示例</rite> Sub change(choice) If ch document bgcolor Elself choice=2 Then document. fgcolor="blue document bgcolor="pink document. fgcolor="yellow' Else document. fgcolor-=bla End If < Center><H2>< Font color="bue">文字与背景颜色搭配示例</Font></H2> <Table borde <Th>背景颜色<Th>选择<Th>文字颜色<Th>选择 <Td> <Input name="w"type="radio"onclick="change(1)"> <Td>蓝色</d> <Td> </Id> <Td黄色</Td【例 3-1】文字与背景颜色搭配。 <Html> <Head><Title>文字与背景颜色搭配示例</Title> <Script Language="VBScript"> <!-- Sub bchange(choice) If choice=1 Then document.bgcolor="red" ElseIf choice=2 Then document.fgcolor="blue" ElseIf choice=3 Then document.bgcolor="pink" ElseIf choice=4 Then document.fgcolor="yellow" ElseIf choice=5 Then document.bgcolor="white" 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> <Td> <Input name="w" type="radio" onclick="bchange(1)"> <Td>蓝色</Td> <Td> <Input name="b" type="radio" onclick="bchange(2)"> </Tr> <Tr> <Td>粉红色</Td> <Td> <Input name="w" type="radio" onclick="bchange(3)"> </Td> <Td>黄色</Td>