Forgot Password ??

PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone

	Registered : 109,037

HOME > .NET Framework > Forum > เลือกสั่ง Print จาก DataGridView มีโค๊ด VB แต่อยากแปลงเป็นโค๊ด C# รบกวนแปลงให้ด้วยครับท่านพี่ .....

เลือกสั่ง Print จาก DataGridView มีโค๊ด VB แต่อยากแปลงเป็นโค๊ด C# รบกวนแปลงให้ด้วยครับท่านพี่ .....

เริ่มหัวข้อใหม่

โบโน

โพสกระทู้ ( 27 )
บทความ ( 0 )

Code (VB.NET)

Imports System.Data

Imports System.Data.SqlClient

 

Public Class Form1

Dim cn As SqlConnection

Dim da As SqlDataAdapter

Dim ds As New DataSet

Dim dv As New DataView

Dim rpt As rpt1

 

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        cn = New SqlConnection("Data Source=.;Initial Catalog=test;Integrated Security=True")

End Sub

 

Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown

        If e.KeyCode = Keys.F6 Then

        rpt = New rpt1

        dgv.CommitEdit(DataGridViewDataErrorContexts.Commit)

        ds.AcceptChanges()

        ds.Tables("Data").DefaultView.RowFilter = "Column1 = 1"

        rpt.SetDataSource(ds.Tables("Data").DefaultView)

        crv.ReportSource = rpt

        End If

End Sub

 

Private Sub btn_Show_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_Show.Click

        da = New SqlDataAdapter("Select * from test", cn)

        ds.Reset()

        da.Fill(ds, "Data")

        If ds.Tables("Data").Columns.Contains("Column1") Then ds.Tables("Data").Columns.Remove("Column1")

        ds.Tables("Data").Columns.Add(New DataColumn("Column1", GetType(Boolean)))

        dgv.DataSource = ds.Tables("Data")

End Sub

 

Private Sub btn_Filter_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_Filter.Click

        rpt = New rpt1

        ds.Tables("Data").DefaultView.RowFilter = "Column1 = 1"

        rpt.SetDataSource(ds.Tables("Data").DefaultView)

        crv.ReportSource = rpt

End Sub

 

Private Sub btn_Clear_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_Clear.Click

        ds.Tables("Data").DefaultView.RowFilter = ""

End Sub

End Class

Tag : .NET, LINQ, VB.NET, C#

ประวัติการแก้ไข
2012-09-03 10:50:15
2012-09-03 10:51:35
2012-09-03 10:52:12

Date : 2012-09-03 10:47:33

By : โบโน

View : 1544

Reply : 2

No. 1

TC Admin

โพสกระทู้ ( 74,058 )
บทความ ( 838 )

Code (C#)

using System.Data;
using System.Data.SqlClient;
public class Form1 {
    
    private SqlConnection cn;
    
    private SqlDataAdapter da;
    
    private DataSet ds = new DataSet();
    
    private DataView dv = new DataView();
    
    private rpt1 rpt;
    
    private void Form1_Load(object sender, System.EventArgs e) {
        cn = new SqlConnection("Data Source=.;Initial Catalog=test;Integrated Security=True");
    }
    
    private void Form1_KeyDown(object sender, System.Windows.Forms.KeyEventArgs e) {
        if ((e.KeyCode == Keys.F6)) {
            rpt = new rpt1();
            dgv.CommitEdit(DataGridViewDataErrorContexts.Commit);
            ds.AcceptChanges();
            ds.Tables["Data"].DefaultView.RowFilter = "Column1 = 1";
            rpt.SetDataSource(ds.Tables["Data"].DefaultView);
            crv.ReportSource = rpt;
        }
    }
    
    private void btn_Show_Click(object sender, System.EventArgs e) {
        da = new SqlDataAdapter("Select * from test", cn);
        ds.Reset();
        da.Fill(ds, "Data");
        if (ds.Tables["Data"].Columns.Contains("Column1")) {
            ds.Tables["Data"].Columns.Remove("Column1");
        }
        ds.Tables["Data"].Columns.Add(new DataColumn("Column1", typeof(bool)));
        dgv.DataSource = ds.Tables["Data"];
    }
    
    private void btn_Filter_Click(object sender, System.EventArgs e) {
        rpt = new rpt1();
        ds.Tables["Data"].DefaultView.RowFilter = "Column1 = 1";
        rpt.SetDataSource(ds.Tables["Data"].DefaultView);
        crv.ReportSource = rpt;
    }
    
    private void btn_Clear_Click(object sender, System.EventArgs e) {
        ds.Tables["Data"].DefaultView.RowFilter = "";
    }
}

Date : 2012-09-03 21:07:31

By : mr.win

No. 2

โบโน

โพสกระทู้ ( 27 )
บทความ ( 0 )

เมื่อวานลางานครับไม่ค่อยสบาย...

ขอบคุณพี่วินครับ จะลองนำไปปรับแต่งใช้ เพื่อให้เข้ากับงานตัวเองครับ...

ถ้าพี่วินมาอุบล บอกผมล่วงหน้านะครับ จะเลี้ยงก๋วยจั๋บ หมูยอ อุบลครับ อร่อยนะครับ

Date : 2012-09-05 09:01:51

By : โบโน

ค้นหาข้อมูล

แสดงความคิดเห็น

Re : เลือกสั่ง Print จาก DataGridView มีโค๊ด VB แต่อยากแปลงเป็นโค๊ด C# รบกวนแปลงให้ด้วยครับท่านพี่ .....

รายละเอียด

เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

อัพโหลดแทรกรูปภาพ

Notice

เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ
อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง

เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง

โดย

อีเมล์

บวกค่าให้ถูก

<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)

Exchange: นำเข้าสินค้าจากจีน, Taobao, เฟอร์นิเจอร์, ของพรีเมี่ยม, ร่ม, ปากกา, power bank, แฟลชไดร์ฟ, กระบอกน้ำ

Load balance : Server 01