1樓：
問題是該描述詳細些，具體要做什麼。是不是要加入到某一列，還是放入到某一個單元格？
如果是加入到某個單元格： cell(i,j)=cel(i,j)+text
如果要加入到某一列，你要先判斷從那一行可開始存放資料，從該列第一個空單元格放起，
存放前先檢測第一個空單元格位置：
i=1do while cell(i,j)<>""
i=i+1
loop
這樣，從第i+1行開始存放資料。
2樓：
在公用模組中定義一個全域性變數，
public temtxts as string每次單擊前，將文字框中的內容累計合併到這個變數中，temtxts=temtxts & text1.text這樣就不會覆蓋，而是累加了。
3樓：匿名使用者
sub addtext()
dim strtextbox as stringdim mystr as string
mystr=textbox1.text
strtextbox=range("a2").textstrtextbox=strtextbox+mystrend sub
如何將vb中的text顯示的資料存入到excel中，並在後面加上存入資料時的時...
4樓：匿名使用者
使用timer控制元件，將interval設成10000,即可實現10s觸發一次，
然後在timer的timer事件裡，把存資料程式填進去
在vb中健個命令按鈕和一個文字框單擊按鈕時文字框消失
5樓：
1、首先，在窗體上面新增一個文字框。
2、單擊文字框，在屬性視窗設定文字框的屬性，清空文字內容。
3、將文字框的enabled屬性設定為false。
4、在窗體上新增一個命令按鈕，如下圖所示。
5、在屬性視窗，設定命令按鈕的caption屬性為「允許輸入」。
6、雙擊命令按鈕，編輯其**。
6樓：匿名使用者
假設按鈕是「command1」，文字框是「text1」，在按鈕單擊事件下輸入以下**：
private sub command1_click（） ——指明過程，單擊按鈕觸發。
text1.visible=false ——指明觸發程式，文字框不可見
end sub ——結束過程。
7樓：俄聯邦
text1.visible=false
8樓：
private sub command1_click()
text1.visible = false
end sub
急！vb 文字框中的內容匯入excel
9樓：嗯那就好
1、將command3_click內的**全放到command1_click裡，
同時修改其中一句的錯誤，將
set xlsheet = book.worksheets(text1.text)
修改為set xlsheet = xlbook.worksheets(text1.text)
2、然後在command1_click裡的for迴圈語句塊（next i )後面的下一行，新增如下語句即可。
xlsheet.range("a1").resize(a,a) = arr
10樓：匿名使用者
沒看明白你遇到什麼問題
11樓：匿名使用者
什麼樣的內容呢？你的**裡面壓根沒有excel操作啊
VB題在窗體上建立文字框和兩個命令按鈕 在前兩個文字框
交換 strw text1.text text1.text text2.texttext2.text strw 合併 text3.text text1.text text2.text vb語言 在窗體上建立三個文字框和兩個命令按鈕。在前兩個文字框輸入文字，單擊 交換 按鈕，將 text3.text ...
窗體上有文字框tet命令按鈕分別為
dim n 9 as variant,max as integer,min as integer,sum as integer private sub command1 click dim i as integer randomize for i 0 to 9 n i int rnd 90 10if...
設計程式，窗體包含文字框，標籤和按鈕。當使用者在文字框中輸入一些字母（小寫 大寫或大小混
option explicit private declare function sendmessage lib user32 alias sendmessagea byval hwnd as long,byval wmsg as long,byval wparam as long,lparam a...