1、如何使網頁不出現滾動條：
private sub mnuscroll1_click()
'注意：必須在網頁完全顯示之後才可以執行
webbrowser1.document.body.scroll = "no" '不顯示滾動條的辦法
end sub
private sub mnuscroll2_click()
'注意：必須在網頁完全顯示之後才可以執行
webbrowser1.document.body.scroll = "auto" '顯示滾動條的辦法
end sub
2、如何獲得網頁中被選中部分的html：
private sub command1_click()
dim objselection
dim objtxtrange
set objselection = webbrowser1.document.selection
if not (objselection is nothing) then
set objtxtrange = objselection.createrange
if not (objtxtrange is nothing) then
debug.print objtxtrange.htmltext
set objtxtrange = nothing
end if
set objselection = nothing
end if
end sub
vb呼叫儲存過程
public sub procexe byval procname as string,byval pch as string dim cn as adodb.connection dim cmd as adodb.command cn.connectionstring cn.open set cm...
vb呼叫vc dll檔案
關於dll的建立與呼叫使用vc 的嚮導即可。具體操作如下 開啟選單 file new 選擇 projects win32 dynamic link library 選擇 a dll project 即可。這時系統會自動生成3個檔案 cpp，stdafx.cpp，stdafx.h。之後將入口函式dll...
VB呼叫儲存過程
dim adocomm as new adodb.command dim prmretval as adodb.parameter dim prmid as adodb.parameter adocomm.activeconnection conn adocomm.commandtype adcmd...