stock.aspx

来自「本书通过100个精彩实例」· ASPX 代码 · 共 29 行

ASPX
29
字号
<script language="VB" runat=server>
Sub ChartBtn_Click(Sender as Object, E as EventArgs) 
chart.ImageUrl = "ImageGenerator_Vb.aspx?"
chart.Visible = true
For i=0 to Stocks.Items.Count-1
If (Stocks.Items(i).Selected = true) Then
chart.ImageUrl = chart.ImageUrl & "symbols=" & Stocks.Items(i).Value & "&"
End If
Next
End Sub
</script>
<html>
<body>
   <H3>使用HyperLink控件<Hr></H3>
<form runat=server>
<Center><h1> 虚拟股票图形生成系统Virtual Stock Picker</h1>
<h2> 编写日期:2001年WTO Entry</h2></center>
<asp:checkboxlist id="Stocks" runat=server>
<asp:listitem>MSFT</asp:listitem>
<asp:listitem>SUN</asp:listitem>
</asp:checkboxlist>
<asp:button text="Chart Your Selected Stocks" OnClick="ChartBtn_Click" runat=server/>
<hr>
<asp:Image id="chart" ImageUrl="" Visible=false runat=server/>
</form>
</body>
</html>

⌨️ 快捷键说明

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