随笔分类 - VB.NET
摘要：1.提前使用NuGet程序包导入Log4Net.dll 2.在AssemblyInfo.vb文件中，写入如下配置(注意如果是放到文件夹内，需要加入文件路径地址)。 如果无法打印信息，看log4net.config文件是否在Debug文件夹内 <Assembly: log4net.Config.Xml
阅读全文
摘要：首先要添加自定义的Enum 1 Enum WeekDays 2 3 周日 = 1 4 5 周一 = 2 6 7 周二 = 3 8 9 周三 = 4 10 11 周四 = 5 12 13 周五 = 6 14 15 周六 = 7 16 17 End Enum 调用: Dim weekStr As Str
阅读全文
摘要：首先要添加 .IsBodyHtml = True 1 ''' <summary> 2 ''' SFC系统发送邮件 3 ''' </summary> 4 ''' <param name="MailTitle">邮件标题</param> 5 ''' <param name="MailContent">邮
阅读全文
摘要：记得提前先使用NeGet程序包提前导出NPOI相关dll引用 DataGridView导出Excel 1 ''' <summary> 2 ''' 获取EXCEL表格真正的值 3 ''' </summary> 4 ''' <param name="cell"></param> 5 ''' <retur
阅读全文
摘要：原先自带是英文样式: 更改之后的样式: 一.先新增MyGridLocalizer.vb类 1 Imports DevExpress.XtraGrid.Localization 2 3 Public Class MyGridLocalizer 4 Inherits GridLocalizer 5 6
阅读全文
摘要：1、首先，将chart控件添加到窗口。 2、设置chart - series 主要t属性： 2.1 IsXValueIndexed = true; 2.2 XValueType = Time; 3、编写初始化函数： Private Sub InitChart() Dim r As Random =
阅读全文
摘要：Dim X34 As String ="0123456789ABCDEFGHJKLMNPQRSTUVWXYZ" '34进制,去除I和O Private Function CovvertTo34(ByVal val As Integer) As String Dim Result As String
阅读全文
摘要：与SAP RFC连接，电脑上必须要安装SAP软件，否则会报错ActiveX 输入工单号，无法带出SAP内接口RFC信息。 确认原因为：RFC接口需求的工单参数需要在前面加两位00，例如:1000541078（10个字符）改为 001000541078(12个字符)，解决办法:使用string.Pad
阅读全文
摘要：Private Sub savefile(ByVal dgv2 As DataTable) Dim app As Object = CreateObject("Excel.Application") Dim xlbook As Object = app.workbooks.add() Dim xR
阅读全文
