04 2020 档案

杂项
摘要：检查文件夹是否存在，若不存在则创建 If Not Directory.Exists("E:\Test456") Then Directory.CreateDirectory("E:\Test456") System.IO.File.Create("E:\Test456\1.txt").Dispose 阅读全文
posted @ 2020-04-22 15:57 revgin 阅读(115) 评论(0) 推荐(0)
VB.NET读写txt文件
摘要：来源：http://blog.sina.com.cn/s/blog_af1320c70102yfi7.html '写文件 Dim mStreamWriter As New System.IO.StreamWriter(Application.StartupPath & "\1.txt") mStre 阅读全文
posted @ 2020-04-21 16:56 revgin 阅读(2693) 评论(0) 推荐(0)
VB.NET 判断键盘是否按下
摘要：Private Sub btn_Save_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_Save.Click If My.Computer.Keyboard.CtrlKeyDown And 阅读全文
posted @ 2020-04-21 15:49 revgin 阅读(538) 评论(0) 推荐(0)
vb.net BulkCopy的使用方法
摘要：'Create a new StopWatch to measure the' amount of time it takes to perform the' insertDim swatch As New Stopwatch()swatch.Start()'Configure the connec 阅读全文
posted @ 2020-04-21 15:47 revgin 阅读(503) 评论(0) 推荐(0)
XML文档读取
摘要：XML类 Public Class XMLHelperDim mXmlDoc As New System.Xml.XmlDocumentPublic XmlFile As String Public Sub New(ByVal File As String)MyClass.XmlFile = Fil 阅读全文
posted @ 2020-04-21 15:46 revgin 阅读(188) 评论(0) 推荐(0)
SQL Server常用语句
摘要：一、复制表 1.只复制表结构到一张新表 select * into [New Table] from [Old Table] where 1=2 2.复制表结构和数据到一张新表 select * into [New Table] from [Old Table] 二、日期函数 昨天：select * 阅读全文
posted @ 2020-04-21 15:44 revgin 阅读(204) 评论(0) 推荐(0)