09 2016 档案
摘要:Private Sub Command1_Click()s = "我是剪贴板中的内容"Clipboard.Clear '清空剪贴板Clipboard.SetText s '将变量s文本赋给剪贴板Text1 = Clipboard.GetText '将剪贴板中文本赋给text1Clipboard.Cl...
阅读全文
摘要:今天为大家介绍一个vb拍照的方法,该方法简单实用,充分体现出visual basic 的实用性。该工程由两个窗体form1,form2,一个标准模块module1组成。其中模块的代码如下(module1):Option ExplicitPublic Const WS_CHILD = &H400000...
阅读全文
摘要:Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) A...
阅读全文