Visual Basic的一個小問題

想請問一下...
我想寫個東西例如
----------------
| CM ______| ←三個都是text box
| M ______|
| KM ______|
|(Calculate) | ←計算的按鈕
----------------
(不好意思畫不好

)
只要隨便在任何一個單位打,其他兩個單位就會算出來
但目前已經先卡在我要怎麼設定我要打的那個數字呢?
例如下面的語法中, 那個"數字"應該是要打什麼呢?

dim cm as integer
dim m as integer
dim km as integer

if cm = "數字" then
m = "數字" * 0.01
km = "數字" * 0.00001

Else

m = "數字" then
cm = "數字" * 100
km = "數字" * 0.0001

.
.
.
.

不過我想這個語法應該也是錯的吧... orz

搞了好久希望有高人可以來幫我解答一下感激不盡阿

2009-03-03 16:24 #1

文章關鍵字

Visual Basic 問題

isakira

217分

2樓

isakira

個人積分：217分

文章編號：10644667

use "val"
cm -> text1.text
m -> text2.text
km -> text3.text

ex:
if text1.text<>"" then
text2.text = val(text1.text) * 0.01
text3.text = val(text1.text) * 0.00001

http://blog.isakira.com 為了部落~

dearandy

1分

3樓

dearandy

個人積分：1分

文章編號：10645502

' 避免使用者輸入空白鍵
text1.text = trim(text1.text)
text2.text = trim(text2.text)
text3.text = trim(text3.text)

' 確認使用者輸入的是一個數值
if str(val(text1.text)) = text1.text then
text2.text = val(text1.text) * 0.01
text3.text = val(text1.text) * 0.00001
end if

RayChao

25分

樓主

RayChao

個人積分：25分

文章編號：10648377

真是太感謝了

不過我想問, 這有辦法用IF,ELSE寫出來嗎?
如何用簡單一點的語法寫出來?
不過除此之外, 我還是學到了兩位大大的語法

leochengz

1分

5樓

leochengz

個人積分：1分

文章編號：10754809

嗯，如果照你的問題來看你需要的是

1、輸入其中一個按計算則其他就會算出來。
所以照理說其他的數值應該要被清空，或著再加入一個變數來確定目前是那一格輸入，但我想前者比較容易做。
則規則可寫成
一、輸入其中一個按計算則其他就會算出來
二、當任一格輸入時清空其它格的內容

2、你想用if else的寫法完成
當然是可以，這個想法換句話說，就是要寫在[Calculate]按下去的判斷裡。
三、當按下[Calculate]算出值
3、格子裡輸入的數值
上面的高手們，有很多解決格子是否為數字的判斷方法，當然我也來提出一個讓你參考好了。
四、確定輸入為數字
---------------------------------------------------------------------------------------
接下來說一下你程式奇怪的地方，一開始你宣告了三個integer(整數)的變數，但你的運算式中卻是要做小數點的運算？！
所以，如果要宣告可以宣告成Double(浮點小數)

另外關於你的判斷式想法也是對，但判斷條件就怪怪的，如果你想要用這樣的寫法，那麼配合規則限制的條件可以簡單的寫成if text1.text <> "" then，意思就是當輸入格不為空的時就利用這格去處理其它格的數字。
然後，接下來開始實現規則
一、輸入其中一個按計算則其他就會算出來
三、當按下[Calculate]算出值