OptionExplicitPrivateDeclareFunctionSendMessageLibuser32AliasSendMessageA(ByValhwndAsLong,ByValwMsgAsLong,ByValwParamAsLong,lParamAsAny)AsLongPrivateConstTV_FIR...

win7刪除一個(gè)空白文件夾總是顯示：找不到該項(xiàng)目，該項(xiàng)目不在e盤中，請(qǐng)確認(rèn)該項(xiàng)目的位置，然后重試。怎么辦？[img]http://a.ikafan.com/image/smiley/default/12.gif[/img][img]http://a.ikafan.com/image/smiley/default/12....

1、獲得瀏覽器信息：PrivateSubCommand1_Click()WebBrowser1.Navigatehttp://www.applevb.comEndSubPrivateSubCommand2_Click()DimoWindowDimoNavSetoWindow=WebBrowser1.Document.p...

setobjdoc=webbrowser1.document[br]objdoc.getelementsbytagname(input)(0).value=name[br]objdoc.getelementsbytagname(input)(1).value=password[br]objdoc.getelements...

我的vb程序有很多form，每個(gè)form里有很多command，我想按一個(gè)按鈕之后，讓所有的command的enabled屬性都為true，這個(gè)怎么實(shí)現(xiàn)呢？對(duì)于已經(jīng)可以看見的窗體，可以用下列代碼：VisualBasiccode?123456789101112131415PrivateSubCommand1_Click(...

比如用到了一個(gè)swf文件，如何在生成可執(zhí)行文件時(shí)包含它，注意：不是制作安裝程序!我用的是vb6.0可以把你的代碼解釋下嗎？我是新手！制成資源文件：1、（菜單欄）外接程序——外接程序管理器——加載VB6資源編輯器2、點(diǎn)菜單欄下的綠色圖標(biāo)調(diào)出資源管理器3、點(diǎn)添加自定義資源（在問號(hào)左邊）4、選擇保存好的文本文檔，OK！調(diào)出該...

我想要在VB窗口中設(shè)一按鈕，點(diǎn)擊之后，能調(diào)用另一程序，并且該程序不會(huì)出現(xiàn)它自己的程序窗口，而是在VB主窗口中顯示，也就是調(diào)用程序后直接就把程序顯示在VB的窗口中，這該如何才能實(shí)現(xiàn)，望高手們幫幫忙啊~~謝謝ljl88900的回答，按你的做法可以實(shí)現(xiàn)在窗口里打開程序，但如果要把打開的程序固定在VB主窗口的中間，該怎么做？另...

ListBox1.Items.Add(...)貌似LISTBOX每個(gè)ITEM的TEXT和VALUE的值是一樣的如果用ListBox1.Items.Add(...)來增加列表項(xiàng)的話怎么分別設(shè)置它的text和value??------解決方案--------------------ListBox1.Items.Add(ne...

就是我在listbox中合并了信息寫入了，在怎么拿出來寫入分開啊！因?yàn)槲蚁氚阉谥饤l展示！謝謝代碼:PrivateSubForm_Load()DimiAsLongWithList1Fori=1To9.AddItemi&*&i*i&.ListCountNextiEndWithEndSubPriva...

在TEXTBOX里面每輸入一個(gè)字符，listbox就自動(dòng)搜索相似的內(nèi)容類似VB幫助那種效果用Instr函數(shù)就可以實(shí)現(xiàn)您要的程式。PrivateSubText1_Change()Fori=0ToList1.ListCount-1IfInStr(1,List1.List(i),Text1.Text,vbTextCompar...

OptionExplicitPrivateTypeTPointxAsLongyAsLongEndTypePrivateTypeTVHITTESTINFOptAsTPointflagsAsLonghItemAsLongEndTypePrivateTypeTVITEMmaskAsLongHTreeItemAsLongsta...

建窗體，窗體放置1個(gè)ComBox,命名為cbDrive，1個(gè)ListBox,命名為lstMain，一個(gè)CommandButton,命名為cmdGo,添加如下代碼:DimhAsclsMainInfoPrivateSubcmdGo_Click()DimhTAsLongDimuW()AsByteDimdW()AsByteDi...

OptionExplicitPrivateSubCommand1_Click()ResumeNextDimMsgValueAsStringDimobjWMIServiceAsObjectDimobjItemAsObject,colItemsAsObjectSetobjWMIService=GetObject(winmg...

在窗體中插入一個(gè)WebBrowser1，然后在代碼頁寫入：DimStatusTextAsStringPrivateSubForm_Load()WebBrowser1.Navigatehttp://moqie.clicksun.cnEndSubPrivateSubWebBrowser1_NewWindow2(ppDisp...

得到當(dāng)前browser的頁面字體內(nèi)容PublicFunctiongetWebContent()FunctiongetWebContent(browserAsWebBrowser)AsStringDimdocAsObjectDimiAsObjectDimstrHtmlAsStringSetdoc=browser.Docu...

為什么用WebBrowser控件的LocationName方法顯示出來的是地址而不是標(biāo)題呢？PrivateSubCommand1_Click()W.Navigate(Text1.Text)EndSubPrivateSubW_StatusTextChange(ByValTextAsString)Label2.Captio...

我有webbowser做了一個(gè)瀏覽器，但每次在點(diǎn)擊webbrowser中的超鏈接時(shí)，卻是用IE打開的新窗口，請(qǐng)問怎么才能捕獲webbrowser中鼠標(biāo)的單擊事件.假定你的窗體叫Form1PrivateSubWebBrowser1_NewWindow2(ppDispAsObject,CancelAsBoolean)Set...

如題，我就是想做一個(gè)仿軟件，在VB窗體里面載入另外一個(gè)程序，當(dāng)我運(yùn)行窗體的時(shí)候另外一個(gè)程序也會(huì)一起啟動(dòng)，但是另外一個(gè)程序要它隱藏，我應(yīng)該怎么做？求助，人格保證，絕對(duì)不是Mu馬，只是單純的想做一個(gè)仿軟件！謝謝，在線等，或者加QQ交流，！Shell另外程序打開的路徑,VBHide不用分開打包的，在vb里面有個(gè)工具很好用，“...

下面給你的代碼是百分之百可以連接成功的，它也是我正在使用中的代碼片段哦。PrivateSubCommand1_Click()DimcnAsNewADODB.Connection創(chuàng)建數(shù)據(jù)庫對(duì)象DimrsAsNewADODB.Recordset創(chuàng)建表對(duì)象DimstrCnAsString連接字符串Dimdb_hostAsSt...

怎么讓生成VB程序執(zhí)行文件只在后臺(tái)運(yùn)行？只能在進(jìn)程中看到1,窗體的ShowInTaskBar值設(shè)為False2,在Form_Load事件中，添加App.TaskVisible=False3,窗體的Visible屬性設(shè)為False

如何利用VB編寫NT服務(wù)程序-NTSVC.OCX一、NT服務(wù)程序 所謂NT服務(wù)，實(shí)際上就是一個(gè)可以在系統(tǒng)啟動(dòng)時(shí)自動(dòng)在一定身份下啟動(dòng)的伴隨系統(tǒng)長(zhǎng)時(shí)間存在的進(jìn)程。象FTPserver、HTTPserver、脫機(jī)打印等都是采用NT服務(wù)的形式提供的。這實(shí)際上類似Unix的rootdaemon進(jìn)程。NT服務(wù)歸納起來，NT服務(wù)又...

微軟在上周剛剛發(fā)布了用于Windows8.1上的首個(gè)InternetExplorer11的預(yù)覽版。我們已經(jīng)確認(rèn)InternetExplorer11中的一些新特性，包括對(duì)WebGL的支持、預(yù)抓取、預(yù)渲染、flexbox、mutationobservers以及其他一些Web標(biāo)準(zhǔn)的支持。但是更有趣的是，雖然被叫為Intern...

我做了一個(gè)WebRtf的控件，主要是封裝了RichtextBox控件，增加一些方法，如打印等，用來實(shí)現(xiàn)在Web上顯示RTF文檔的功能。編譯成WebRtf.ocx，在VB中測(cè)試成功，為了能在Web上使用，我們需要做兩個(gè)工作： 一是將其打包成Internet發(fā)布包 二是將這個(gè)包進(jìn)行數(shù)字簽名 我一步一步抓圖進(jìn)行...

看到過很多調(diào)整表格行順序的例子（包括自己以前做過的），基本都是每一次上下移動(dòng)都要向服務(wù)器提交，在移動(dòng)很多次的時(shí)候，很浪費(fèi)資源，因此想用JavaScript在客戶端實(shí)現(xiàn)對(duì)表格行順序調(diào)整，最后才向服務(wù)器提交。 費(fèi)了近一上午的時(shí)間，才做出這么一個(gè)例子： <html> <head> <...

若使用SQL2000附加SQL2005的數(shù)據(jù)庫時(shí)在附加時(shí)會(huì)出現(xiàn)了錯(cuò)誤602，提示“對(duì)sysindexes運(yùn)行DBCCCHECKTABLE”因?yàn)閿?shù)據(jù)庫附加到2005的時(shí)候,數(shù)據(jù)庫文件已經(jīng)自動(dòng)升級(jí)到2005,所以在2000下是無法再附加的(沒有向上兼容的)具體步驟： 1.生成for2000版本的數(shù)據(jù)庫腳本2005的man...