VB
hellostory
这个作者很懒,什么都没留下…
展开
-
VB的webbrowser控件捕获网页关闭事件
使用VB的WebBrowser控件捕获页面关闭事件代码(适用于window.close()事件):Private Sub WebBrowser1_WindowClosing(ByVal IsChildWindow As Boolean, Cancel As Boolean)Cancel = TrueUnload MeEnd Sub原创 2009-12-10 09:14:00 · 4102 阅读 · 0 评论 -
VB的文本框得到焦点时,自动选中里面的文字
参考代码如下:txtUserName.SelStart = 0txtUserName.SelLength = Len(txtUserName.Text)txtUserName.SetFocus原创 2010-01-08 09:10:00 · 9142 阅读 · 1 评论 -
VB利用异或运算加密文件
说明:1、由于采用二进制读取文件的方式,因此加密时一般可以不考虑文件类型。 2、这里只进行一次异或运算,如有需要可以进行多次异或运算。 3、此加密算法速度快,当然加密强度也低 :)'-----------------------------------------------------------------------'作者: hellostory'日期: 2011-05-26'函数名称: XOR_Encrypt'函数说明: 使用异或运算加原创 2011-05-26 11:46:00 · 5446 阅读 · 0 评论 -
调用程序并等待程序返回运行结果
=========================================================================创建日期: 2011-06-01,hellostory函数说明: 运行并等待程序执行完毕,同时返回程序运行结果参数说明: strCommand - 需要被执行的命令或程序返回值: 被执行的命令或程序自身返回的运行结果原创 2011-06-22 16:30:00 · 1308 阅读 · 0 评论 -
VB“Automation 错误” 或 “无法定位程序输入点 DoOpenPipeStream 于动态链接库ScrRun.dll上”
说明:“Automation 错误”其实是VB调用程序或组件时,程序或组件返回的错误,因此需要考虑这些组件是否能正确运行如在某些机器上运行以下代码时:Dim WshShell As Object Set WshShell = CreateObject("wscript.shell") runAndWaitExe = WshShell.Run(strCommand, 0, T原创 2011-06-30 22:44:00 · 6034 阅读 · 0 评论