VB
关注
分享
扫一扫
greystar
人的一切表现，只不过是大脑的神经牵动。相同的一件事，你的大脑处理的结果也不同。它决定着你是笑是哭，是成是败。每个人，都没什么不同，充其量是个木偶，只看你的大脑懂不懂得把你向良好的方向牵动罢了。如果用计算机术语来描述，那就是说，我们需要一条最佳算法。
展开
-
VBA中的一些代码
让OFFICE能识别文档中的文字如果要让此程序能运行，要添加EXCEL的引用，只有EXCEL才有此功能Sub SpeakIt() Set x = New Excel.Application x.Speech.Speak (ActiveWindow.Selection) Set x = NothingEnd Sub让PPT能随机出题。Slides 一个代表指定演示文稿中所有幻原创 2004-10-20 12:54:00 · 1777 阅读 · 0 评论 -
VB6实现网络连通检测
Private Sub Form_Load() If IsConnected = TRUE Then MsgBox (“您已经连通了Internet!”) End If If IsConnected = FALSE Then MsgBox (“您还没有连通 Internet!”) End If End Sub Option Explicit /＊有关的API声明和定义＊/ Public Dec原创 2004-10-20 12:32:00 · 4147 阅读 · 0 评论 -
VB6判断某一个连接是否保存在Cache中下
Public Function GetCacheEntryInfo(ByVal hWnd As Long, ByVal lpszUrl As String) As Boolean Dim dwEntrySize As Long Dim lpCacheEntry As INTERNET_CACHE_ENTRY_INFO Dim dwTemp As Long Dim lErr As Long If (原创 2004-10-20 12:35:00 · 1516 阅读 · 0 评论 -
在VB中实现异步调用
VB本身是不支持多线程的。但是VB中的部件有进程内及进程外的区分，因此这里我使用进程外部件来实现异步调用。服务器端代码,新建一个ActiveEXE工程,加入一个窗体，窗体中存放一个Timer控件添加一个类模块。代码如下Private WithEvents m_Timer As TimerPublic Event MyTaskResult(result As Long)Private j As Lo原创 2005-01-04 11:11:00 · 5426 阅读 · 0 评论 -
建立注册DLL和反注册DLL文件的快捷方式
我们经常要注册或者反注册自己写的dll文件，加一个快捷方式会减少自己的工作量：[HKEY_CLASSES_ROOT/dllfile/shell/Unregister]"Command"="regsvr32 %1 /u"[HKEY_CLASSES_ROOT/dllfile/shell/Register]"Command"="regsvr32 %1"当我们需要注册或者反注册dll时，只要在原创 2006-08-25 12:19:00 · 2004 阅读 · 0 评论