1樓：聽不清啊
private sub command1_click()dim a as integer, b as integera = text1
b = text2
text3 = a + b
end sub
private sub form_load()text1 = ""
text2 = ""
text3 = ""
end sub
3.在窗體上畫兩個名稱分別為 text1、text2的文字框和一個名稱為 command1的命令按鈕，然後編寫如下事件過程
2樓：雪中櫻花雨
第一輪：x=1;n=0 while x<20 x=1*3;n=0+1
第二輪：x=3;n=1 while x<20 x=3*3;n=1+1
第三輪：x=9;n=2 while x<20 x=9*3;n=2+1
第四輪：x=27;n=3 while x<20 x=27;n=3所以，最後的答案是b 27和3。
在名稱為form1的窗體上，畫一個文字框和兩個命令按鈕。
3樓：風至羽
這個圖看不到，應用程式包也不知道在**。只能先說下第一小題。
1.新建窗體，新增文字框和命令按鈕，改命令按鈕標題為「輸入」，「取消」。
2.新建巨集，在「操作」欄中選擇「setvalue」，在巨集設計檢視下方的操作引數內的「專案」欄輸入[forms]![form1]!
[text1]，在「表示式」欄輸入「"祝你考試成功！"（注意文字前後有加英文的前後引號）」。儲存巨集為「巨集1」
3.新建巨集，同樣選擇「setvalue」，在「專案」欄中同樣輸入[forms]![form1]![text1]，在表示式欄中輸入「""（英文的前後引號）」。儲存為「巨集2」
4.回到窗體中，進入「輸入」命令按鈕的屬性，在「事件」一欄的「單擊」中選擇「巨集1」，同理開啟「取消」命令的屬性，在「事件」的「單擊」中選擇「巨集2」。
5.儲存窗體（程式執行介面的圖看不到，就自己調整吧）
vb在窗體上畫一個文字框和一個命令按鈕(命令按鈕的標題設定為"顯示資訊"),執行
4樓：
（1）private sub command1_click()print "aaaaaaa"
text1.text = "bbbbbb"
end sub
（2）private sub command1_click()text1.move 0, 0
text1.text = "歡迎使用"
end sub
（3）private sub form_load()me.move 1000, 2000, 6000, 3000end sub
vb中怎麼編寫 單擊命令按鈕，則窗體顯示文字框內的內容？
5樓：
1、首先，雙擊窗體空白處進入**視窗。
2、然後我們在事件中找到click事件。
3、這個時候開始編寫**測試【print "我是click單擊屬性！"】。
4、然我們開始執行測試。
5、啟動後，我們在窗體空白處單擊。
6、這個時候我們將可以看到測試的效果。
6樓：
private sub command1_click()
form1.print text1.text
end sub
7樓：匿名使用者
option explicit
private sub command1_click()print text1.text
end sub
private sub form_load()text1 = "問題：vb中怎麼編寫 單擊命令按鈕，則窗體顯示文字框內的內容？"
end sub
vb題：在窗體上畫一個名稱為command1的命令按鈕，然後編寫如下事件過程：
8樓：匿名使用者
第一次單擊按鈕，x=0,
開始執行for 迴圈，i=1 時，執行y=y+x=0+0=0，x=x+2=0+2=2
i=2時，執行y=y+x=0+2=2，x=x+2=2+2=4i=3時，迴圈結束。
第二次單擊按鈕，x=4,
開始執行for 迴圈，i=1 時，執行y=y+x=0+4=4，x=x+2=4+2=6
i=2時，執行y=y+x=4+6=10，x=x+2=6+2=8i=3時，迴圈結束。
第三次單擊按鈕，x=8,
開始執行for 迴圈，i=1 時，執行y=y+x=0+8=8，x=x+2=8+2=10
i=2時，執行y=y+x=8+10=18，x=x+2=10+2=12i=3時，迴圈結束。
執行print x,y輸出12,18
注意：for i=1 to 2 不是l to 2
vb窗體畫兩個文字框
9樓：匿名使用者
do while<50
當然應該是 do while x<50
答案是：b
10樓：匿名使用者
do while<50
這句話有缺失吧？
vb試題：在窗體上畫一個命令按鈕 command1 和一個文字框text1 然後編寫如下事件過程
11樓：匿名使用者
你的程式打錯了。
private sub command1_click()for i = 1 to 4
for j = 1 to i
for k = j to i
xhs = xhs + 1
next k
next j
xhs = xhs - 1
next i
text1.text = str$(xhs)end sub
這個才是16
這個程式有3個迴圈，i（1-4） j（1-i） k（j-i）其實這個程式是要計算 (1)-1+(1+2)-1+(1+2+3)-1+(1+2+3+4)-1
每個括號是一個i的迴圈，所以有4個
每個括號是一個累加求和，由（j和k兩個迴圈獲得）其中括號的數的個數由j迴圈來決定，而數字的初值是i，終值是j，這個有k迴圈來決定
每次-1是由於j迴圈結束後要把求和變數xhs的值-1所以最後結果是 20-4=16
vb程式設計題 在窗體花兩個命令按鈕，標題分別設定為「隱藏文字框」和「顯示文字框」，當單擊第一個命令按鈕時
12樓：匿名使用者
private sub command1_click()text1.visible = false '隱藏文字框end sub
private sub command2_click()text1.text = "vb程式設計" '設定文字框內容text1.visible = true '顯示文字框end sub
13樓：匿名使用者
建立標準exe 貼上下面**就可以了
private sub command1_click()text1.visible = true
end sub
private sub command2_click()text1.visible = falseend sub
private sub form_load()command1.caption = "顯示文字框"
command2.caption = "隱藏文字框"
end sub
VB中有兩個form窗體，在form1裡彈出form2,只有form2有效
load form2 form2.show vbmodal,meshow的用法 aform.show modal owner modal的預設值為非模態，vbmodal是模態owner代表父窗體。用上面的兩條語句即可調出 form2 且，form2位於form1前端，本程式中有且只有form2可以操...
怎樣用vb程式將兩個文字框中的不同的數字找出來顯示在另文字框中
用兩個陣列儲存兩個文字框中的數字 然後套嵌兩個迴圈 外層迴圈用陣列1 內層迴圈用陣列2 找到相同的就忽略 不同的就記錄 假設文字框1中有10個數字 文字框2中有10個數字 文字框1用陣列a 9 記錄 文字框2用陣列b 9 記錄 下面是舉例說明 dim a as int32 dim b as int3...
求大神幫忙，用VB設計程式，有兩個題目
dim a as integer,b as integer,t as integer,s as integer private sub command1 click if option1.value true then msgbox a b str a b else if option2.value...