From c84a2df5be6dbf8ed4263d8ff2067cb60b7944bd Mon Sep 17 00:00:00 2001
From: YoumuKon <38815081+YoumuKon@users.noreply.github.com>
Date: Sun, 29 Apr 2018 13:48:07 +0800
Subject: [PATCH] =?UTF-8?q?=E6=9B=B4=E6=96=B0=E6=96=87=E4=BB=B6?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

鏇存柊3.1浠ｇ爜
---
 ClickForSecond/Main.frm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ClickForSecond/Main.frm b/ClickForSecond/Main.frm
index 5e6c52d..53710ca 100644
--- a/ClickForSecond/Main.frm
+++ b/ClickForSecond/Main.frm
@@ -166,7 +166,7 @@ Option Explicit
 
 Private Sub CopyE_Click()
     Clipboard.Clear
-    Clipboard.SetText EventS
+    Clipboard.SetText "当前日期:" & Date & vbCrLf & EventS
     MsgBox "已复制成功!", 0, "复制成功"
 End Sub