1樓:冷仁王淳靜
一、vb讀寫excel表:
vb本身提自動化功能可以讀寫excel表,其方法如下:
1、在工程中引用microsoft
excel型別庫:
從"工程"選單中選擇"引用"欄;選擇microsoftexcelobject
library(excel2000),然後選擇"確定"。表示在工程中要引用excel型別庫。
2、在通用物件的宣告過程中定義excel物件:
dimxlbook
dimxlsheet
3、在程式中操作excel表常用命令:
createobject("")
建立excel物件。
setxlbook
檔名")彎則開啟已經存在的excel工件簿檔案。
true設定excel物件可見(或不可見)setxlsheet
表名")設定活動工作表。
col)值。給單元格(row,col)賦值。
列印工作表。
true)關閉工作簿。
結束excel物件。
nothing
xlautoopen)
執行excel啟動巨集。
xlautoclose)
執行excel關閉巨集。
4、在運用以上vb命令操作excel表時,除非設定excel物件不可見,否則vb程式可繼續執行其它操畝鬧慶作,也能夠關閉excel,同時也可對excel進行操作。但在excel操作過程中關閉excel物件迅握時,vb程式無法知道,如果此時使用excel物件,則vb程式會產生自動化錯誤。形成vb程式無法完全控制excel的狀況,使得vb與excel脫節。
excel vba和vb6先學哪個好?
2樓:網友
我是做vb6的,個人覺得學比較好,雖然說vb6和語法很像但區別還有很多的,如果學會了的話其他的。net語言你就基本上都會了。因為。net的類是通用的可以說是跨語言了。
3樓:網友
vb易上手。
第一步,先將書上的知識搞清楚。
第二步,照著書上敲程式。
第三步,試著自己編寫程式,並進行除錯。
最重要的一點是,在除錯時遇到錯誤要及時解決。
4樓:網友
1、語法是相近的。
2、跟c#比沒什麼 優勢的,因為。net的官方語言就是c#。但是它繼承了vb的優點,那就是好學易用。
3、先學vb吧,這樣學習vba幾乎是水到渠成的事情,至於vb6和就無所謂順序了,不一定必須先學vb6,可以直接學習的。
5樓:網友
先學vb6比較好,教程比較多,開發簡單,和vba語法都近似,同門語言,通一門,其他的就很容易上手了。
比c#要簡單很多。
6樓:大熊女
如果是主要在excel中用選vba,如果程式設計用,選vb6吧。
請問怎麼用vb6操作已經開啟的excel**檔案
7樓:常山大寶
一、檢查是否你局臘塌已經手動開啟了c:\檔案?
set xlbook = "c:\") 語句的意思是開啟c:\檔案,因此,對於已經開啟的c:\檔案局雹,不能執行 set xlbook = "c:\") 語句。
如果不關閉**開啟的物件,也會像上面說的那樣,出現已經開啟檔案的錯誤桐圓提示。
在你的事例中,set xlsheet = , 2) =11111" 是最後一句。
處理 excel 工作表的語句,因此應把關閉物件**放到這句後面。即:
private sub command2_click()
dim xlbook as
dim xlsheet as
set xlbook = "c:\")
set xlsheet =
set xlbook = nothing
end sub
vb6怎麼使用excel的**
8樓:網友
excel_ filename:=
判讀最新版本。
if val(excel_ >8 thenset excel_sheet = excel_else set excel_sheet = excel_append if
*開啟工作表***
set xls = new
trueset xlbook =
*寫入內容***
dim i as integer
i = 3 'i控制行。
dim j as integer 'j控制列dim countpage as integercountpage = 0 '控制頁。
do while not rst_
18 '控制行高。
for j = 1 to 10
j) =rst_ '將工程理庫中的一條記錄的第乙個欄位寫入工作表中。
next 每18行為一頁,如果資料超出一頁時進行特殊處理if i > 18 then
down:=1 '活動視窗內容向下滾動1行end if
if i mod 18 = 0 then
if countpage = 0 then, 1), 10)).= xlcontinuous '首頁加邊框。
else + countpage - 1) *18, 1), 10)).= xlcontinuous '中間頁加邊框。
end if
i = i + 2 '加一條空行。
9樓:創意木子
使用vb6使用excel輸入**:
excel_ filename:=
判讀最新版本。
if val(excel_ >8 thenset excel_sheet = excel_else set excel_sheet = excel_append if
*開啟工作表***
set xls = new
trueset xlbook =
*寫入內容***
dim i as integer
i = 3 'i控制行。
dim j as integer 'j控制列dim countpage as integercountpage = 0 '控制頁。
do while not rst_
18 '控制行高。
for j = 1 to 10
j) =rst_ '將工程理庫中的一條記錄的第乙個欄位寫入工作表中。
next 每18行為一頁,如果資料超出一頁時進行特殊處理if i > 18 then
down:=1 '活動視窗內容向下滾動1行end if
if i mod 18 = 0 then
if countpage = 0 then, 1), 10)).= xlcontinuous '首頁加邊框。
else + countpage - 1) *18, 1), 10)).= xlcontinuous '中間頁加邊框。
end if
i = i + 2 '加一條空行。
vb6操作excel,但是找不到2013的引用怎辦?
10樓:摘星聖手
我載入了下面兩個dll檔案就出現了,但是都有提示錯誤,不管他,最終還是得到想要的效果。
microsoft excel ojbect library,microsoft wordl ojbect library,microsoft powerpoint ojbect library都出現了。
11樓:yyyyyy一二三
不同的版本是不同的。2010 office excel 是microsoft excel ojbect library
vb6中如何往excel裡寫資料
12樓:網友
比如這樣,把當前開啟的excel工作表的a1的值改成34324set xlsobject = getobject( ,set sh =
a1") = 34324
13樓:蒲公英花開丶
開啟excel 2003,其它版本的軟體,比如excel 2013,方法一樣。
具體步驟:「開始」-「程式」-「microsoft office 2003 」-excel 2003";或者如果桌面上有快捷方式的話直接雙擊開啟。
點選「資料」選單 ,選擇「選擇外部資料」,開啟「匯入資料」對話方塊。
利用vb6查詢excel**資料
14樓:c絕跡
首先要在vb中 引用 excel
在form 中 繪製 textbox ×2 commandbutton × 1
先開啟 excel 第一列輸入 查詢欄位 第二列 輸入 結果內容。
先點選command1 連線excel
在text1中 輸入查詢欄位 點選command2 text2中顯示結果。
在vb6 excel 2003測試通過。
option explicit
dim i, j, k, l as long
dim row_count, col_count as long
private sub command1_click()
end sub
private sub command2_click()
row_count = excel_ '查詢有多少行資料被使用,以獲得最小的查詢範圍。
excel_ -excel_, 1 - excel_ '定位於 左上角。
for i = 1 to row_count
if excel_, 1).value = then
excel_, 2).value
i = 100 + row_count
end if
next i
end sub
15樓:網友
首先建立excel物件,使用comobj: (所有操作都是針對這個物件來操作的)
dim excelid as //定義物件。
set excelid as new //設定物件。
c:\excel\') //開啟。
設定活動工作表,至於是哪個就看具體情況了,你可以列舉來判斷符合要求的或者直接定義。
框。內容= ,4].value //查詢對應的,直接指定或者在vb裡面加入時鐘迴圈讀取,至於怎麼用就是你的事了。
視窗銷燬的時候別忘了關閉。
大概就是這個過程,具體寫法你測試一下,我寫的時候沒有vb,沒辦法測試。
怎麼用vb6 0獲得文字的行號,怎麼用vb6 0獲得txt文字的行號
在vb中如何獲取textbox的行數?const em getlinecount 186 private declare function sendmessageaslong lib user32 alias sendmessagea byval hwnd as long,byval wmsg as...
VB6如何使用ftp上傳到伺服器
好好看看 inet internet transfer control 文件 vb 上傳檔案到指定ftp伺服器 採用ezftp控制項 ftp.remoteaddress 位址ftp.username 使用者名稱 ftp.password 密碼 ftp.connect ftp.localfile 檔案...
VB6想讓提示框的標題是Text
msgbox prompt buttons title helpfile,context msgbox 函式的語法具有以下幾個命名引數 部分描述prompt 必需的。字串表示式,作為顯示在對話方塊中的訊息。prompt 的最大長度大約為 1024 個字元,由所用字元的寬度決定。如果 prompt 的...