vb.net datagridview 데이터 내보내기 Excel 구현
데이터gridview의 데이터를 Excel, 즉 디스플레이층으로 내보내는 작업은 업무 논리층과 데이터 접근층과 관련이 없고 비교적 쉬운 편이다.vb.net에서 이걸 실현하는 건 나로서는 낯설다.하지만 다 하고 나면 vb에서 엑셀을 내보내는 것과 비슷하다고 느낀다.
1. 참조 추가
우선 인용을 추가합니다. vb를 열 때.net에서 인용할 때 익숙하다. vb판 기계실을 두드릴 때 우리도 비슷한 인용을 추가했다. 아래의 두 그림을 보면 두 그림이 사실 큰 차이가 없다는 것을 알 수 있다.참조에서 Microsoft Excel 14.0 object library를 선택합니다.
인용을 추가하려면 코드 창에 인용 대상의 코드를 추가하는 것이 필요합니다. 다음과 같습니다.
<span style="font-family:KaiTi_GB2312;font-size:24px;"> Imports Excel = Microsoft.Office.Interop.Excel</span>2. 데이터gridview의 속성 수정
이 부분을 두드린 학생들은 데이터gridview의 Allow User ToAdd Rows의 속성을false로 바꾸지 않으면 코드가 실행될 때 오류가 발생한다는 것을 알고 있다.데이터gridview의 AllowUserToAddRows 속성은 데이터gridview의 기본 디스플레이 헤더를 보장하는 것이지 임의의 줄이 아닙니다.
3. 코드 부분
<span style="font-family:KaiTi_GB2312;font-size:24px;"> Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
</span><span style="font-family:KaiTi_GB2312;font-size:24px;"><span style="white-space:pre"> </span>Microsoft.Office.Interop.Excel.Application() '
Dim myExcel As New Excel.Application()
myExcel.Application.Workbooks.Add(True)
myExcel.Visible = True
Dim n As Integer
For n = 0 To datagridview1.ColumnCount - 1
myExcel.Cells(1, n+ 1) = Me.datagridview1.Columns(n).HeaderText
Next n
' Excel
Dim i As Integer
For i = 0 To dgvMoney.RowCount - 1
Dim j As Integer
For j = 0 To datagridview1.ColumnCount - 1
If Me.datagridview1(j, i).Value Is System.DBNull.Value Then
MyExcel.Cells(i + 2, j + 1) = ""
Else
MyExcel.Cells(i + 2, j + 1) = datagridview1(j, i).Value.ToString
End If
Next j
Next i
End Sub</span>이 내용에 흥미가 있습니까?
현재 기사가 여러분의 문제를 해결하지 못하는 경우 AI 엔진은 머신러닝 분석(스마트 모델이 방금 만들어져 부정확한 경우가 있을 수 있음)을 통해 가장 유사한 기사를 추천합니다:
다양한 언어의 JSONJSON은 Javascript 표기법을 사용하여 데이터 구조를 레이아웃하는 데이터 형식입니다. 그러나 Javascript가 코드에서 이러한 구조를 나타낼 수 있는 유일한 언어는 아닙니다. 저는 일반적으로 '객체'{}...
텍스트를 자유롭게 공유하거나 복사할 수 있습니다.하지만 이 문서의 URL은 참조 URL로 남겨 두십시오.
CC BY-SA 2.5, CC BY-SA 3.0 및 CC BY-SA 4.0에 따라 라이센스가 부여됩니다.
좋은 웹페이지 즐겨찾기
