[VB.Net] 程式段行、跳行、註解

 1.段行:_(底線) 

Dim FileNotExistMsg As String = "File Not Exist, Please Check !!"
Dim FileNotExistMsg As String = _
    "File Not Exist, Please Check !!"
2.換行:vbCrLf 
Dim statusFileCheck = "FileStatus: " + vbCrLf + FileNotExistMsg
3.註解:'(單引號) 
'註解
參考網址: 

By Hao★

留言

張貼留言

歡迎留言

熱門文章

[C#] 使用Gmail發送信件

使用Gmail發送信件   using System; using System.Collections.Generic; public void SendMail(string Subject, string Body, IEnumerable ToUser) { string account = "XXX@gmail.com";//登入Mail Server的帳號 string password = "*******";//登入Mail Server的密碼 string from = "XXX@gmail.com";//實際發送信件的Mail地址 string host = "smtp.gmail.com";//發Mail的Server位置 string port = "587";//發Mail的Server位置使用的Port bool enableSsl = true;//是否啟用SSL憑證 System.Net.Mail.MailMessage MyMail = new System.Net.Mail.MailMessage(); MyMail.From = new System.Net.Mail.MailAddress(from); foreach (var i in ToUser) { MyMail.To.Add(i.ToString());//設定收件者Email } MyMail.Subject = Subject; MyMail.Body = Body; //設定信件內容 MyMail.IsBodyHtml = true; //是否使用html格式 System.Net.Mail.SmtpClient MySMTP = new System.Net.Mail.SmtpClient(host, Int32.Parse(port)); MySMTP.Credentials = new System.Net.NetworkCredential(account, password); MySMTP...
閱讀完整內容

[C#] 使用 ClosedXML將DataGridView 匯出至 Excel

     使用 ClosedXML將DataGridView 匯出至 Excel   using ClosedXML.Excel; public void ExportToExcel() { var wb = new XLWorkbook(); var ws = wb.Worksheets.Add("Sheet1"); // 匯出 DataGridView 標題 for (int col = 0; col < dataGridView1.Columns.Count; col++) { ws.Cell(1, col + 1).Value = dataGridView1.Columns[col].HeaderText; } // 匯出 DataGridView 內容 for (int row = 0; row < dataGridView1.Rows.Count; row++) { for (int col = 0; col < dataGridView1.Columns.Count; col++) { var cellValue = dataGridView1.Rows[row].Cells[col].Value; ws.Cell(row + 2, col + 1).Value = cellValue != null ? cellValue.ToString() : ""; } } // 儲存 Excel wb.SaveAs(@"C:\Temp\Data.xlsx"); MessageBox.Show("Excel 匯出完成！"); } 參考網址:  By Hao★
閱讀完整內容

[MS SQL] 使用 PIVOT 扭轉資料，由直列轉為橫向資料

圖片
PIVOT使用   --【簡易版】 SELECT * FROM ( SELECT l.MasterLangId, l.LangType, l.ShowText FROM dbo.Lang l ) t PIVOT ( -- 設定彙總欄位及方式 MAX(ShowText) -- 設定轉置欄位，並指定轉置欄位中需彙總的條件值作為新欄位 FOR LangType IN ([zh-TW], [zh-CN], [en-US]) ) p; --【動態生成欄位】 -- 使用 FOR XML PATH 動態生成轉置列清單 DECLARE @cols NVARCHAR(MAX), @query NVARCHAR(MAX); SELECT @cols = STUFF(( SELECT ',' + QUOTENAME(LangType) FROM ( SELECT DISTINCT LangType FROM dbo.Lang ) AS Sub ORDER BY CASE WHEN LangType = 'zh-TW' THEN 1 WHEN LangType = 'zh-CN' THEN 2 ELSE 3 END, LangType FOR XML PATH(''), TYPE ).value('.', 'NVARCHAR(MAX)'), 1, 1, ''); -- 動態 PIVOT 查詢 SET @query = ' SELECT * FROM ( SELECT l.MasterLangId, l.LangType, l.ShowText FROM dbo.Lang l ) t PIVOT ( MAX(ShowText) FOR LangType IN (' + @cols + ') ) p; '; -- 執行動態 SQL EXEC sp_executesql @query; 參考網址:  https://dotb...
閱讀完整內容