我收藏的歌曲视频（mkv）

摘要： 阅读全文
posted @ 2017-07-22 15:42 石龙软件园 阅读(114) 评论(0) 推荐(0)

VB 窗体始终在前

摘要： Private Declare Function SetWindowPos& Lib "user32" (ByVal hwnd As Long, _ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, _ByVal cx A 阅读全文
posted @ 2017-07-14 20:16 石龙软件园 阅读(119) 评论(0) 推荐(0)

VB 删除txt文件的最后一行

摘要： Private Sub Command1_Click()DelTxt App.Path & "\1.txt"End SubSub DelTxt(ByVal Path As String) '删除txt文件的最后一行On Error GoTo eHandler:Dim Fc As String, Fn 阅读全文
posted @ 2017-07-14 19:57 石龙软件园 阅读(439) 评论(0) 推荐(0)