ArrayList mylist=new ArrayList();
mylist.add("dddd");
listbox.DataSource=mylist;

解决方案 »

  1.   

    这个市 asp的 写法
    dim 什么的要写在
    <script runat...>
    下面
    </script>
      

  2.   

    前台代码:
    <%@ Page Language="vb" AutoEventWireup="false" Codebehind="WebForm1.aspx.vb" Inherits="WebApplication1.WebForm1"%>
    <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
    <HTML>
    <HEAD>
    <title>WebForm1</title>
    <meta name="GENERATOR" content="Microsoft Visual Studio .NET 7.1">
    <meta name="CODE_LANGUAGE" content="Visual Basic .NET 7.1">
    <meta name="vs_defaultClientScript" content="JavaScript">
    <meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5">
    </HEAD>
    <body MS_POSITIONING="GridLayout">
    <form id="Form1" method="post" runat="server">
         my name is <%# strname %>
            <asp:Listbox datasource='<%# myarray %>' runat="server" ID="Listbox1" NAME="Listbox1"/>
            <asp:Textbox text='<%# mystring.tostring %>' runat="server" ID="Textbox1" NAME="Textbox1"/> </form>
    </body>
    </HTML>
    后台代码:
    Public Class WebForm1
        Inherits System.Web.UI.Page#Region " Web 窗体设计器生成的代码 "    '该调用是 Web 窗体设计器所必需的。
        <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()    End Sub
        Protected WithEvents Listbox1 As System.Web.UI.WebControls.ListBox
        Protected WithEvents Textbox1 As System.Web.UI.WebControls.TextBox    '注意: 以下占位符声明是 Web 窗体设计器所必需的。
        '不要删除或移动它。
        Private designerPlaceholderDeclaration As System.Object    Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
            'CODEGEN: 此方法调用是 Web 窗体设计器所必需的
            '不要使用代码编辑器修改它。
            InitializeComponent()
        End Sub#End Region    Public strname As String = "chris"
        Public myarray() As String = {"hello", "world"}
        Public mystring As String = "chirs"    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            '在此处放置初始化页的用户代码
            Page.DataBind()
        End SubEnd Class另外说一下:1、下次这样的问题不要给太多分
    2、最后学习时使用代码分离
      

  3.   

    <%@ Import Namespace="System.Data" %>
    <HTML>
    <HEAD>
    <%@ Page Language="vb"  %>
     <script runat="server">
        Dim strname As String = "chris"
        Dim myarray() As String = {"hello", "world"}
        Dim mystring As String = "chirs"
        
        Sub Page_Load(obj as Object,e as EventArgs)         Page.DataBind()    End Sub </script>
    </head>
    <body>
     <form id="form1" runat="server">
        my name is <%# strname %>
        <asp:Listbox datasource='<%# myarray %>' runat="server" />
        <asp:Textbox text='<%# mystring.tostring %>' runat="server" />
       </form>
     <body>
    </html>
      

  4.   

    建议:
    用vs.net生成页面
    然后到对应的.aspx.vb文件的page_load中去填你的代码
    那里写代码的位置都给你放好了
      

  5.   

    谢谢各位发帖子的朋友,我的MSN是[email protected],如果有兴趣的话我们可以讨论讨论。
      

  6.   

    改成代码隐藏好些,littlehb(网际浪子) ( ) 的很正确,也是潮流。有些参考书是利用混合代码形式写的,这样不好目的只是为了教学。你可以把他改写成代码隐藏。