摘要：
1 取单元格数据：Range("M5") 或 cells(5,2) 2 取一个连续的区域：Range("a1", "b4").Select 或 Range("a2:b4").Select 3 取整行或整列：Range("1:1").Select 或 Range("a:a").Select 4 区域复制：Range("a1:b4").Copy 5 打印工作表：ActiveSheet.PrintOu... 阅读全文
摘要：
1、由于目标计算机积极拒绝，无法连接。127.0.0.1：443 在网络设置中关闭IPv6。2、服务器提交了协议冲 突. Section=ResponseStatusLine 最大连接数设置为integer.maxvalue 阅读全文
摘要：
Private Sub output(ByVal str As String, ByVal color As Color) '默认色 SystemColors.WindowText，灰色 Color.Gray，红色 Color.Red，绿色 Color.Green，橘红 Color.OrangeRed richTextBox.SelectionColor = color richTextBox.AppendText(str & vbCrLf) richTextBox.ScrollToCaret() End Sub 阅读全文
摘要：
Imports System.Text.RegularExpressionsModule Module_Regex'判断是否是数字（不带 + - 号）Public Function IsNum(ByVal value As String) As Boolean Return Regex.IsMatch(value, "^\d*[.]?\d*$")End Function'判断是否是数字（带 + - 号）Public Function IsNumeric(ByVal value As String) As Boolean Return Regex.IsMatc 阅读全文
摘要：
'Win32 API Declare Auto Function ReleaseCapture Lib "user32.dll" Alias "ReleaseCapture" () As Boolean Declare Auto Function SendMessage Lib "user32.dll" Alias "SendMessage" (ByVal hWnd As IntPtr, ByVal wMsg As Integer, ByVal wParam As Integer, ByVal lParam 阅读全文
摘要：
添加一个类，第二个效果更好，然后修改Form1.Designer.vb如果修改程序集名称的话，先F5调试程序，然后就可以打开Form1窗口了。第一个Public Class DoubleBufferListView Inherits System.Windows.Forms.ListView ... 阅读全文
摘要：
部分取不到主板序列号，是什么原因？ 阅读全文