版权声明：可以任意转载，转载时请务必以超链接形式标明如下文章原始出处和作者信息及本声明作者：xixi出处：http://blog.youkuaiyun.com/slowgrace/archive/2008/10/03/3013171.aspx共分4步：首先生成快捷菜单；然后在快捷菜单中加上快捷菜单项；然后为这个快捷菜单项指明所关联的函数或宏；最后把这个快捷菜单栏指定给某窗体或某控件。详述如下：

 假设ChkCnd类中有如下方法：ChkCndPublic Sub test(nn As MSComctlLib.ImageCombo, cc As ChkCnd) Debug.Print "nncc" & m_lngFatherIdEnd Sub 在其他模块要用callbyname调用这个test方法的话，就这么些：Public Sub testcall()

 以下来自http://topic.youkuaiyun.com/u/20090331/10/03f3d808-660e-4f1f-b827-c89729927976.html?seed=1021143466的讨论。我写了一些测试用的函数，我想最终版本不要包括这些函数。但是怕自己没小心在其他不是测试的地方用它。有什么办法来限制我的这些测试函数只能在测试的地方用，不许在其他的地方用呢？最好的办法是用条件

版权声明：可以任意转载，转载时请务必以超链接形式标明如下文章原始出处和作者信息及本声明作者：xixi出处：http://blog.youkuaiyun.com/slowgrace/archive/2009/03/25/4022632.aspx1、生成随机数的方法 Function SetEmpId() As String    Dim ref As String    Rand

Technorati 标签: Randomize,vba,随机数The Randomize statement initializes the random number generator. The instruction Int((maxNum – minNum + 1) * Rnd + minNum) uses the Rnd function to generate a random

Technorati 标签: accESS,声音有3种方法。一种是用winmm中的playsound函数，貌似这种只能播放wav文件；一种是用shellexecute；一种是用Microsoft Office 11.0 Object Library里的媒体播放器。我只用了头一种，后两种暂时记录在这里备忘。第一种：用winmm中的playsound函数Declare Functi

Technorati 标签: ACCESS,定时提醒,timeInterval,timer 这里说的“到时提醒”功能指按照用户事先设置的时间，到时弹出对话框提醒用户。步骤如下： 首先，把要做的事情和时间放到一个表里，时间是一个字段，事情是一个字段； 其次，设置在窗体的LOAD事件中设置窗体的timeinterval为60000ms（即一分钟）。这样窗体会每隔一分钟触发一次timer事件。

Technorati 标签: 瞎猫撞着死耗子,重启版权声明：可以任意转载，转载时请务必以超链接形式标明如下文章原始出处和作者信息及本声明        作     者：xixi        出     处：http://blog.youkuaiyun.com/slowgrace/archive/2008/10/30/3185834.aspx 前几天看到篇文章说VC++是垃圾，如果非要用，就用

Technorati 标签: 字符串,vbCrLf,VBA,SPLIT如下： 几个字符Chr(9) Tab  vbTabChr(10) Line FeedChr(13) Carriage Return  vbCrLfChr(32) 空格，也可以是Space(1) MsgBox cities(1) & Chr(13) & cities(2)

    把sng传给子窗体     Set frmX = Forms.Item("FrmWeekFood").Form    Set frmChild = frmX.chdFrmRecipeFood.Form    If frmChild.ActiveControl Is frmChild.数量 Then frmChild.数量 = sngQuant    If frmC

Technorati 标签: FollowHyperlink,Follow,VBAFollowHyperlink 方法可打开由超链接地址指定的文档或网页。Application.FollowHyperlink Me.txtHtml, , True另外，可以使用 Follow 方法来跟随与控件相关联的超链接。

Technorati 标签: InputBox,VBA来自：Julitta Korol，“Access.2003.Programming.by.Example.with.VBA.XML.and.ASP”，by Wordware Publishing, Inc. 2005, p67-p69The InputBox function displays a dialog box with

Technorati 标签: 小数变分数,算法,VB把小数sngX变为分数，以string形式给出。digit表示最后输出的分数的分母的位数。在立即窗口的测试结果如下：?SngToFricStr(500.33, 1)500又1/3?SngToFricStr(-500.4, 1)-500又2/5核心算法是加黑加下划线那一行，来自http://topic.youkuaiyun.com/t/

 http://topic.youkuaiyun.com/u/20090420/21/4823cb82-2139-4d55-ac3c-749ef8460a80.html?seed=1411474197 以下来自http://topic.youkuaiyun.com/t/20061027/11/5113265.html#52楼通过堆栈调用解析多线程                         首先说明一下，