[VB.Net] msgbox用法

  


留言

張貼留言

歡迎留言

熱門文章

[VB.Net] 使用 ClosedXML將DataGridView 匯出至 Excel

     使用 ClosedXML將DataGridView 匯出至 Excel   Imports ClosedXML.Excel Public Sub ExportToExcel() Using stream As FileStream = New FileStream("D:\01.Project\Template.xlsx", FileMode.Open, FileAccess.ReadWrite) Using memoryStream As New MemoryStream() ' 初始化ExcelPackage，並讀取模板' Using workbook As New XLWorkbook(stream) Dim ws As IXLWorksheet = workbook.Worksheet(1) ' 假設操作第一個工作表' ' 匯出 DataGridView 標題' For col As Integer = 0 To DataGridView1.Columns.Count - 1 ws.Cell(1, col + 1).Value = DataGridView1.Columns(col).HeaderText Next ' 匯出 DataGridView 內容' For row As Integer = 0 To DataGridView1.Rows.Count - 1 For col As Integer = 0 To DataGridView1.Columns.Count - 1 Dim cellValue = DataGridView1.Rows(row).Cells(col).Value ws.Cell(row + 2, c...
閱讀完整內容

[Java] equals()、equalsIgnoreCase()

equals( ) Code: public static void main(String[] args) { String s1 = "hello"; if(s1.equals("hello")) System.out.println("s1 equals hello"); else System.out.println("s1 not equals hello"); } 輸出： s1 equals hello equalsIgnoreCase( )  Code: public static void main(String[] args) { String s1 = "hello"; String s2 = "Hello"; if(s1.equalsIgnoreCase(s2)) System.out.println("s1 equals s2"); else System.out.println("s1 not equals s2"); } //equalsIgnoreCase會忽略大小寫 輸出： s1 equals s2 By Hao★
閱讀完整內容

[VB.Net] 連接資料庫並將資料顯示在DataGride中

    連接資料庫並將資料顯示在DataGride中   Imports System.Data.SqlClient Public Class Form1 Private connectionString As String = "Server=YOUR_SERVER;Database=YOUR_DATABASE;User Id=YOUR_USER;Password=YOUR_PASSWORD;" Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load Using conn As New SqlConnection(connectionString) conn.Open() Dim query As String = "SELECT TOP 10 * FROM YourTable" Dim cmd As New SqlCommand(query, conn) Dim reader As SqlDataReader = cmd.ExecuteReader() ' 直接將 DataReader 轉為 DataSource' Dim dt As New DataTable() dt.Load(reader) DataGridView1.DataSource = dt End Using End Sub End Class 參考網址:  By Hao★
閱讀完整內容