ex4vb.aspx

来自「这是该书上的所有源代码,不错」· ASPX 代码 · 共 50 行

ASPX

50 行

<html>
  <head>
    <title>第四例  根据下拉选单的内容修改文字的颜色</title>
    <script language="VB" runat="server">

	Sub Button1_Click(Sender As Object, E As EventArgs)
	
          div1.Style("color") = select1.Value

	 end Sub
	Sub Button2_Click(Sender As Object, E As EventArgs)

          select1.Items.Add(text1.Value)

	end Sub

    </script>
  </head>
  <body>
	<div align=center>

    <form id="form1" runat="server" >
	
		<SELECT id="select1" runat="server">
		<OPTION>Red</OPTION>
		<OPTION>Blue</OPTION>
		<OPTION>Green</OPTION>
		</SELECT>
		<input type="button" runat="server" Value="改变控制字符的颜色"
				OnServerClick="Button1_Click" ID=Button1>
			
		<br>
		<br>
		<br>
		<input type="text" runat="server" id="text1">
		<input type="button" runat="server" Value="加入控制颜色"
			OnServerClick="Button2_Click" ID=Button2>
	
    </form>
	</div>
		<br>
		<br>
	<div id="div1" runat="server" align=center>
	<font color=<%= select1.Value%>>您选择的颜色是: 
	<%= select1.Value%></font>
	</div>
	
  </body>
</html>

ex4vb.aspx - 源码说明

本页面展示了「这是该书上的所有源代码,不错」中的 ex4vb.aspx 源码文件，采用 ASPX 编程语言编写，共 50 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

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

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?