今天突然想到这个问题,于是上网搜了一下.获益非浅,将代码拿出来与大家分享.定义一个窗体变量Dim tmpForm as Form产生一个名字为"窗体名"的窗体并赋予tmpForm变量Set tmpForm = Forms.Add("窗体名")这样就得到了一个Form窗体引用,之后该如何操作应该就不用我多说了吧.

得到当前browser的页面字体内容Public Function getWebContent()Function getWebContent(browser As WebBrowser) As String    Dim doc As Object    Dim i As Object    Dim strHtml As String        Set doc = browser.Do

工程->引用->Microsoft   ActiveX   Data   Objects   2.X   Library  Access数据库连接字符串"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=*.mdb;Persist Security Info=False"有密码的"Provider=Microsoft.Jet.OLEDB.4.0;Dat

这段代码是我无意中在网上发现的,虽然代码很短,但其所实现的功能却是很强大的.有了这个函数的帮助可以使我们程序的灵活性大大的提升,但编码难度会有一定提高,所以请慎用.Private Declare Function EbExecuteLine()Function EbExecuteLine Lib "vba6.dll" (ByVal pStringToExec As Long, ByVal