1樓:壹直都很壞
dim a as integer, b as integera = 1
b = 2
a = a + b
b = a - b
a = a - b
debug.print a, b
2樓:飄渺世間天
imports system
module tester
sub main()
dim a, b as integer
a = 1
b = 2
swap1(a, b)
console.writeline(" ", a, b)swap2(a, b)
console.writeline(" ", a, b)end sub
' 方法一
sub swap1(byref lhs as integer, byref rhs as integer)
lhs -= rhs
rhs += lhs
lhs = rhs - lhs
end sub
' 方法2
sub swap2(byref lhs as integer, byref rhs as integer)
lhs = lhs xor rhs
rhs = rhs xor lhs
lhs = lhs xor rhs
end sub
end module
vb 將ab兩個變數的值互換
3樓:匿名使用者
private sub form_click()dim a as string, b as string, c as string
a = inputbox("請輸入
daoa的值專", "請輸入")
b = inputbox("請輸入b的值", "請輸入")c = a
a = b
b = c
msgbox "交換後屬a的值為:
" & a & ", 交換後b的值為:" & bend sub
4樓:匿名使用者
我寫的**du:
private sub form_click()'請求使用者給zhia和b輸入dao值版
dim a as string, b as stringa = inputbox("輸入a的值", "輸入資訊")b = inputbox("輸入b的值", "輸入資訊")'交換a和b的值
dim c as string
c = a
a = b
b = c
'在窗體上輸出變數交權換前後的值
print "交換後a的值為:" & a
print "交換後b的值為:" & b
end sub
5樓:匿名使用者
很想知道,如何不通過臨時變數進行變數值的互換。
6樓:匿名使用者
單擊窗體時,一次彈出兩個輸入資訊對話方塊。?????
7樓:匿名使用者
private sub form_click()dim temp as double
a = inputbox("a")
b = inputbox("b")
print "改變copy前的值
bai:du
zhi" & "a=" & a & ":b=" & btemp = b
b = a
a = temp
print "改變後
dao的值:" & "a=" & a & ":b=" & bend sub
8樓:higer愛
private sub form_click()dim a%, b%, t%
a = inputbox("請輸入a:專")print "a="; a
b = inputbox("請輸入b:")print "b="; b
print "交換後
屬"t = a
a = b
b = t
print "a="; a
print "b="; b
end sub
9樓:匿名使用者
temp=a:a=b:b=temp
vb交換兩個變數的值 命令輸入
10樓:匿名使用者
不是很懂你的意思哦,一般 交換的話,採用第三個變數過度下,例如變數a,b 重新弄個變數c 就可以實現了!!
11樓:匿名使用者
交換a,b的值c=a '將a賦給中間變數ca=b '將b值賦給ab=c '將c(即a的值)賦給b交換完畢!
12樓:匿名使用者
嘿嘿,兩個變數照樣可以交換的。
13樓:鳳代靈登空
(一)交換按抄鈕命令:
private
subcommand_click()
dima
asinteger
a=text1.text
text1.text=text2.texttext2.text=a
endsub
(二bai)解釋:
dima
asinteger
的解釋:
是將兩個數進du行定值,因為變數名中不能zhi出現空格、小數點、dao標點符號等字元。
所以我們將兩個值賦予給整數型integer。
此程式**便於理解,沒有藉助第三個變數的值。
大體的思路就是:
第一個數=第二個數
第二個數=第一個數
所進行兩個數之間的交換來完成這個程式的。
vb兩個變數交換
14樓:匿名使用者
a,注意=是賦值號
x=m,先把m的值存在x裡
m=n,把n的值放在m裡,m原來的值就沒有了,但是沒有關係,因為m的值已經事先存到x裡了
n=x,把m事先存在x裡的值賦給n
由此實現了m與n的交換
15樓:聽不清啊
要實bai
現變數m的值與變du量n的值進行交換,可用zhi語句( )(a)x=m:m=n:n=x
變數dao x m n原值回 12 500x=m後 12 12 500m=n後 12 500 500n=x後 12 500 12可以看到,答m和n的值與原值相比,已經交換。
vb問題兩個
1 private sub form load call shell shutdown s t 10 endend sub private sub command1 click form2.show end sub private sub form keypress keyascii as inte...
如何在vb的窗體中併排輸入兩個矩陣?
使用vscroll和hscroll控制項,在其scoll事件中加入 舉例如 dim x as control for each x in next vb中在窗體中的frame1中輸出乙個矩陣的 怎麼實現?vb試題 程式功能為單擊窗體時將矩陣a的轉置矩陣存入b陣列中並輸出。vb求兩個矩陣的和 例如a ...
vb中的問題,vb中的乙個問題
這個格式化數字的函式,可以把數字按使用者要求的格式顯示,2.34 對應後面的引號內的 0.00 表示格式為小數點前一位數及後面兩位數,其餘位數字四捨五入,後面 e 00 表示指數形式,e 02 表示10的兩次方.這是將 234.45 轉變為科學計數法,不進行四捨五入print format 234....