摘要：
使用TB的人，时常在对TB升级后或者安装插件后出现两个窗口的情况，并且关闭后重新打开TB问题依旧。打开任务管理器，也只发现一个TB进程。原因：基本上是由于安装了MinimizeToTray或者类似的最小化插件引起的，在启动的时候，虽然只有一个实例，但是同时启动了两个窗口。细 心的会发现，在最小化的时候，任务栏会有两个图标。猜测可能是因为程序中有时会要求弹出两个窗口，而Minimize插件禁止关闭其中的一个，从而导致问 题。解决方法：在插件管理器中“禁用”MinimizeToTray类似的最小化插件，没必要卸载，毕竟最小化到任务栏还是挺好用的退出TB打开TB（第一次会仍然会出现两个窗口的情况）关 阅读全文
摘要：
IMAP 和 POP3 使用入门什么是 POP 和 IMAP？通过 POP 和 IMAP，您可以将邮件从 Gmail 服务器下载到您的本地计算机，这样即使您没有连接到互联网，也可以通过 Microsoft Outlook 或 Thunderbird 等程序访问这些邮件。POP 和 IMAP 如何收费？Gmail 用户可以免费使用 POP 和 IMAP 进行访问。POP 与 IMAP 有什么区别？如果您尚未决定使用 POP 还是 IMAP，我们建议您使用 IMAP。与 POP 不同，IMAP 可在网络 Gmail 与电子邮件客户端之间提供双向通信。这意味着当您使用网络浏览器登录到 Gmail 时 阅读全文
摘要：
http://www.adlinktech.com/big5/news/products/p4_2.htm 阅读全文
摘要：
Option Explicit'直接F5:)Private Const lDir As Long = -1 '方向,+1与-1分别为右转与左转Dim WithEvents Timer1 As TimerPrivate Sub Form_Load() '用代码添加控件并设置控件的初始状态.'这样方便点,可以直接粘贴+F5:) With Me.Controls .Add "VB.Label", "Label1" .Add "VB.Label", "Label2" .Add "V 阅读全文
摘要：
Function cipher(stext As String) '密码加密程序 Const min_asc = 32 Const max_asc = 126 Const num_asc = max_asc - min_asc + 1 Dim offset As Long Dim strlen As Integer Dim i As Integer Dim ch As Integer Dim ptext As String offset = 123 Rnd (-1) Randomize (offset) strlen... 阅读全文
摘要：
http://www.iplaysoft.com/vimium-and-vimperator.html 阅读全文
摘要：
台湾摩莎MOXA交换机 阅读全文
摘要：
Private Declare Function SendMessage Lib "USER32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As LongPrivate Declare Function capCreateCaptureWindow Lib "avicap32.dll" Alias "capCreateCaptureWindowA" (ByVa 阅读全文
摘要：
Option Explicit'================================================================='功能:屏蔽任意键'用法:Form_Load-->Call HooK Form_Unload-->Call UnHooK'说明:要屏蔽某键,请修改LowLevelKeyboardProc函数中p.vkCode的值'================================================================='================ 阅读全文
摘要：
'ByVal 与 ByRef(默认值) 的区别'ByVal 按值传递 不改变实参'ByRef 按地址传递 改变实参Private Sub Form_Load()Me.ShowDim A As Integer, B As IntegerA = 1B = 2Call AAA(A, B)Print A, B '得到的结果是2,3A = 1B = 2Call BBB(A, B)Print A, B '得到的结果是1, 2End SubSub AAA(I As Integer, J As Integer) '默认,则按址传递I = I + 1J = J + 阅读全文