两天打鱼三天晒网

摘要： Code Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/-->Option Explicit Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination... 阅读全文

摘要： Private Sub Command1_Click() Dim buf As String, msg As String, idx As Integer idx = 1 Do buf = Environ(idx) msg = msg & buf & vbCrLf idx = idx + 1 Loop Until ... 阅读全文