C# と VB.NET の質問掲示板

わんくま同盟

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト


(過去ログ 11 を表示中)
■1946 / )  Re[6]: テーブルのtdタグの中にRadioButton
□投稿者/ かのかの (3回)-(2007/03/09(Fri) 17:39:24)
ぼのぼのさん>
 ItemDataBoundにコンテナをうめこんで表示をすることはできました!
 でも、何番目のデータが選択されたかを取得するにはどうしたらよいのでしょうか?
 質問ばかりで恐縮です。よろしくお願いします。

■ASP.VBのソース
Imports System
Imports System.IO
Public Class WebForm8
    Inherits System.Web.UI.Page

#Region " Web フォーム デザイナで生成されたコード "

    'この呼び出しは Web フォーム デザイナで必要です。
    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()

    End Sub
  Protected WithEvents Repeater1 As System.Web.UI.WebControls.Repeater
  Protected WithEvents btnData As System.Web.UI.WebControls.Button
  Protected WithEvents Label1 As System.Web.UI.WebControls.Label

    'メモ : 次のプレースホルダ宣言は 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

    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        ' ページを初期化するユーザー コードをここに挿入します。

        Dim values As New ArrayList

        values.Add(New setData("00001", "かのかの"))
        values.Add(New setData("00002", "たろう"))
        values.Add(New setData("00003", "次郎"))

        Repeater1.DataSource = values
        Repeater1.DataBind()
    End Sub

  Private Sub btnData_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnData.Click
      '’誰が選択されたをラベルに表示する


  End Sub
End Class
Public Class setData
  Private s_intValue As String
  Private s_strName As String

  Public Sub New(ByVal newIntValue As String, ByVal newStrName As String)

      Me.s_intValue = newIntValue
      Me.s_strName = newStrName
  End Sub

  Public ReadOnly Property intValue() As String
    Get
    Return s_intValue
  End Get
  End Property

  Public ReadOnly Property strName() As String
    Get
    Return s_strName
  End Get
  End Property
End Class

■ASPXのソース
<%@ Page Language="vb" AutoEventWireup="false" Codebehind="WebForm8.aspx.vb" Inherits="WebApplication2.WebForm8"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
 <HEAD>
  <title>WebForm8</title>
  <meta content="Microsoft Visual Studio .NET 7.1" name="GENERATOR">
  <meta content="Visual Basic .NET 7.1" name="CODE_LANGUAGE">
  <meta content="JavaScript" name="vs_defaultClientScript">
  <meta content="http://schemas.microsoft.com/intellisense/ie5" name="vs_targetSchema">
 </HEAD>
 <body MS_POSITIONING="GridLayout">
  <form id="Form1" method="post" runat="server">
   <asp:repeater id="Repeater1" runat="server">
    <HeaderTemplate>
     <table border="1">
      <tr>
       <td>
        選択
       </td>
       <td>
        データ
       </td>
      </tr>
    </HeaderTemplate>
    <ItemTemplate>
     <tr>
      <td>
       <asp:Literal ID="ltlSelect">
        <input runat="server" type=radio name = "select"  value ='<%# DataBinder.Eval(Container.DataItem, "intValue") %>'/>
       </asp:Literal>
      </td>
      <td>
       <%# DataBinder.Eval(Container.DataItem, "strName") %>
      </td>
     </tr>
    </ItemTemplate>
    <FooterTemplate>
     </table>
    </FooterTemplate>
   </asp:repeater>
   <asp:Button id="btnData" Text="何番目?" runat="server"></asp:Button><br>
   <asp:Label id="Label1" runat="server">が選択されました</asp:Label>
  </form>
 </body>
</HTML>

THREE-ONEさん>
 必ず1件のみの選択としたいのでぼのぼのさん方式!でいきたいと思います。

返信 編集キー/


管理者用

- Child Tree -