locked
[tanya] menampilkan datagridview menjadi vertikal RRS feed

  • Pertanyaan

  • selamat malam, saya ingin bertanya  bagaimana cara membuat data yang masuk ke datagridview menjadi vertikal

    contoh

    datagridview standart

    bagaimana caranya untuk menjadi seperti ini

    Mohon bantuannya


    • Diedit oleh aaik Selasa, 14 Januari 2014 03.07
    Jumat, 10 Januari 2014 18.41

Jawaban

  • Hi aaik

    Selamat datang di Forum MSDN

    Kamu bisa coba contoh thread berikut untuk merubah datagrid view menjadi vertikal

    http://social.msdn.microsoft.com/Forums/windows/en-US/e748d003-e71c-4c0a-93e6-492d54487ef0/datagridview-vertical-text?forum=winformsdatacontrols

    http://notesbyparth.wordpress.com/2013/07/10/display-datagridview-vertical-vb-net/

    Terima kasih

    This response contains a reference to a third party World Wide Web site. Microsoft is providing this information as a convenience to you. Microsoft does not control these sites and has not tested any software or information found on these sites; therefore, Microsoft cannot make any representations regarding the quality, safety, or suitability of any software or information found there. There are inherent dangers in the use of any software found on the Internet, and Microsoft cautions you to make sure that you completely understand the risk before retrieving any software from the Internet.


    Andy Nugraha

    TechNet Community Support

    Senin, 13 Januari 2014 05.47
    Moderator
  • Hi aaik

    Mohon maaf atas keterlambatan membalas forum ini

    Saya buatkan contoh

    Public Class Form1
    
        Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
            Dim dt As New DataTable
            With dt.Columns
                .Add("Name")
                .Add("Phone1")
                .Add("Phone2")
                .Add("Phone3")
                .Add("Phone4")
                .Add("Phone5")
                .Add("Phone6")
                .Add("Phone7")
            End With
            For index = 0 To 5
                Dim strA(7) As String
                For i = 0 To 7
                    strA(i) = index.ToString() & i.ToString()
                Next
                dt.Rows.Add(strA)
            Next
    
    
            Dim dt2 As New DataTable()
            For i As Integer = 0 To dt.Rows.Count
                dt2.Columns.Add()
            Next
            For i As Integer = 0 To dt.Columns.Count - 1
                dt2.Rows.Add()
                dt2.Rows(i)(0) = dt.Columns(i).ColumnName
            Next
            For i As Integer = 0 To dt.Columns.Count - 1
                For j As Integer = 0 To dt.Rows.Count - 1
                    dt2.Rows(i)(j + 1) = dt.Rows(j)(i)
                Next
            Next       
            DataGridView1.DataSource = dt2
        End Sub
    End Class
    

    Output

    Terima kasih


    Andy Nugraha

    TechNet Community Support

    Selasa, 21 Januari 2014 08.32
    Moderator

Semua Balasan

  • Hi aaik

    Selamat datang di Forum MSDN

    Kamu bisa coba contoh thread berikut untuk merubah datagrid view menjadi vertikal

    http://social.msdn.microsoft.com/Forums/windows/en-US/e748d003-e71c-4c0a-93e6-492d54487ef0/datagridview-vertical-text?forum=winformsdatacontrols

    http://notesbyparth.wordpress.com/2013/07/10/display-datagridview-vertical-vb-net/

    Terima kasih

    This response contains a reference to a third party World Wide Web site. Microsoft is providing this information as a convenience to you. Microsoft does not control these sites and has not tested any software or information found on these sites; therefore, Microsoft cannot make any representations regarding the quality, safety, or suitability of any software or information found there. There are inherent dangers in the use of any software found on the Internet, and Microsoft cautions you to make sure that you completely understand the risk before retrieving any software from the Internet.


    Andy Nugraha

    TechNet Community Support

    Senin, 13 Januari 2014 05.47
    Moderator
  • Hi andy,

    Terimakasih atas jawabannya. setelah saya coba-coba saya berhasil membuat datagridview menjadi vertikal. namun saya menemui kendala bagaimana agar kolom ke enam dan seterus y masuk ke baris selanjutnya (jika dalam satu baris saya batasi hanya ada 5 kolom).

    saya coba dengan code berikut:

      Dim dt2 As New DataTable()
            For i As Integer = 0 To dt.Rows.Count
                dt2.Columns.Add()
            Next
            For i As Integer = 0 To dt.Columns.Count - 1
                dt2.Rows.Add()
                dt2.Rows(i)(0) = dt.Columns(i).ColumnName
            Next
            For i As Integer = 0 To dt.Columns.Count - 1
                For j As Integer = 0 To dt.Rows.Count - 1
                    dt2.Rows(i)(j + 1) = dt.Rows(j)(i)
                Next
            Next

    Selasa, 14 Januari 2014 03.29
  • Hi aaik

    Mohon maaf atas keterlambatan membalas forum ini

    Saya buatkan contoh

    Public Class Form1
    
        Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
            Dim dt As New DataTable
            With dt.Columns
                .Add("Name")
                .Add("Phone1")
                .Add("Phone2")
                .Add("Phone3")
                .Add("Phone4")
                .Add("Phone5")
                .Add("Phone6")
                .Add("Phone7")
            End With
            For index = 0 To 5
                Dim strA(7) As String
                For i = 0 To 7
                    strA(i) = index.ToString() & i.ToString()
                Next
                dt.Rows.Add(strA)
            Next
    
    
            Dim dt2 As New DataTable()
            For i As Integer = 0 To dt.Rows.Count
                dt2.Columns.Add()
            Next
            For i As Integer = 0 To dt.Columns.Count - 1
                dt2.Rows.Add()
                dt2.Rows(i)(0) = dt.Columns(i).ColumnName
            Next
            For i As Integer = 0 To dt.Columns.Count - 1
                For j As Integer = 0 To dt.Rows.Count - 1
                    dt2.Rows(i)(j + 1) = dt.Rows(j)(i)
                Next
            Next       
            DataGridView1.DataSource = dt2
        End Sub
    End Class
    

    Output

    Terima kasih


    Andy Nugraha

    TechNet Community Support

    Selasa, 21 Januari 2014 08.32
    Moderator
  • Mas Andy salam kenal..maaf mas mau tanya,kalau untuk menampilkan data dari databasenya bagaimana ya mas ? saya ingin menampilkan data ke gridview dengan tampilan datanya jadi vertikal, saya punya 29 field ..saya sudah coba listing yg dari mas tapi ada kendala di soapwrappernya mas..itu index dan i nya dideklarasi dulu ya mas menjadi integer ? terimakasih  mas :)
    Selasa, 26 Januari 2016 01.24
  • Hi Ayuu

    Sudah di konekkan database menggunakan connection string?

    Tapi sebaiknya kamu membuat thread baru, supaya memudahkan follow up dan anggota komunitas yang lain untuk membantu menyelesaikan masalah kamu

    Sertakan kode yang sudah kamu buat, error code (jika ada), dan langkah langkah yang sudah kamu coba lakukan


    Andy Nugraha

    TechNet Community Support

    Selasa, 26 Januari 2016 07.11
    Moderator
  • Selamat Pagi Mas Andy

    Sudah saya koneksikan mas..mas saya sudah buat thread baru tapi saya belum bisa upload gambar disini ..itu kenapa ya mas ?

    terimakasih mas sebelumnya


    • Diedit oleh Ayuu Rabu, 27 Januari 2016 04.55
    Rabu, 27 Januari 2016 03.50