摘要: 一、VB语言,开发工具VB6.0 Private Sub AppendToFile(ByVal fn As String, ByVal msg As String) Dim lFileHandle As Long lFileHandle = FreeFile On Error GoTo Append 阅读全文
posted @ 2017-09-16 18:06 式圣2012 阅读(503) 评论(0) 推荐(0) 编辑