疑問 - 我想做個計算機請大大幫看怎麼做?

[╰。超凡者〃☆]

以下是我的構圖:



但我不曉得該怎麼做出這個數值計算機??

我用的vb軟體是免費的
Microsoft Visual Basic 2008 Express版

請會的大大教一下怎麼製作，謝謝

[飛鳥]

基本教學網路上都是

你應該是要問如何解決那一些的問題

你應該寫點什麼，想怎麼個加法，大家才知道你要怎麼加

比如
1 + 2 會得到 6
1 - 4 會得到 0

[╰。超凡者〃☆]

計算機的輸入數字欄就是最少要10　　最高是32767
這樣才能跟基本數值參考(預設對應資料),計算出來的結果一樣
當數字欄輸入10　數值欄選擇力量　則按下計算按鈕後會顯示 12物攻

例如: 10力量 = 12物攻　　那100力量就是120物攻
在程式碼上預設每一種最少輸入值是10,若低於10的話會跳出小方塊提醒。


不知道這樣做出來會不會很複雜..！




以下是我臨時製作的優惠計算機，只是不曉得該怎麼改成數值計算機！？

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim buy As Integer, pay As Integer
        Dim msg As String
        buy = Val(TextBox1.Text)
        If buy > 1000 Then
            pay = buy * 0.8
            If buy > 2000 Then
                pay = pay - 100
            Else
                pay = pay - 50

            End If
        Else
            If buy > 500 Then
                pay = buy * 0.95
            End If
        End If
        TextBox2.Text = pay


        buy = Val(TextBox1.Text)
        If buy > 1000 Then
            pay = pay * 0.8
            If buy > 2000 Then
                msg = "超過 2000 元, 先打 8 折再減 100 元。"
                pay = pay - 100

            Else

                msg = "超過 1000 元, 先打 8 折再減 50 元。"
                pay = pay - 50
            End If

        Else
            If buy > 500 Then
                msg = "金額未超過 500 元打 95 折。"
                pay = pay * 0.95
            End If
        End If
        TextBox2.Text = pay
        Label3.Text = msg
        TextBox1.Focus()
        TextBox1.SelectAll()

    End Sub
End Class

[Living]

作者: ╰。超凡者〃☆

計算機的輸入數字欄就是最少要10　　最高是32767
這樣才能跟基本數值參考(預設對應資料),計算出來的結果一樣
當數字欄輸入10　數值欄選擇力量　則按下計算按鈕後會顯示 12物攻

例如: 10力量 = 12物攻　　那100力量就是120物攻
在程式碼上預設每一種最少輸入值是10,若低於10的話會跳出小方塊提醒。


不知道這樣做出來會不會很複雜..！




以下是我臨時製作的優惠計算機，只是不曉得該怎麼改成數值計算機！？

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim buy As Integer, pay As Integer
        Dim msg As String
        buy = Val(TextBox1.Text)
        If buy > 1000 Then
            pay = buy * 0.8
            If buy > 2000 Then
                pay = pay - 100
            Else
                pay = pay - 50

            End If
        Else
            If buy > 500 Then
                pay = buy * 0.95
            End If
        End If
        TextBox2.Text = pay


        buy = Val(TextBox1.Text)
        If buy > 1000 Then
            pay = pay * 0.8
            If buy > 2000 Then
                msg = "超過 2000 元, 先打 8 折再減 100 元。"
                pay = pay - 100

            Else

                msg = "超過 1000 元, 先打 8 折再減 50 元。"
                pay = pay - 50
            End If

        Else
            If buy > 500 Then
                msg = "金額未超過 500 元打 95 折。"
                pay = pay * 0.95
            End If
        End If
        TextBox2.Text = pay
        Label3.Text = msg
        TextBox1.Focus()
        TextBox1.SelectAll()

    End Sub
End Class

先打八折再減50 這是數學問題吧

200*0.8-50=1550

[╰。超凡者〃☆]

臨時製作的..一時沒去核對是否正確，謝謝你的修正提醒。
我只想知道該怎麼把簡易版的計算機改成我要的那個數值計算機。

[Living]

作者: ╰。超凡者〃☆

計算機的輸入數字欄就是最少要10　　最高是32767
這樣才能跟基本數值參考(預設對應資料),計算出來的結果一樣
當數字欄輸入10　數值欄選擇力量　則按下計算按鈕後會顯示 12物攻

例如: 10力量 = 12物攻　　那100力量就是120物攻
在程式碼上預設每一種最少輸入值是10,若低於10的話會跳出小方塊提醒。

我還是不清楚你的問題在哪裡 只能猜你的問題是語法與指令的不熟悉

小方塊可以用IF來寫 指令是msgbox(你要的訊息)
IF XXX THEN MSGBOX
ELSE
XXX

數字加對應資料是TEXT+COMBOBOX

至於COMBO怎麼加資料
應該是COMBO.ADDITEM

COMBO裡的值則應該是
COMBO.ITEMDATA(XXX)=XXX

建議你問問題時最好能詳述你不懂的地方在哪裡
這樣比較容易幫你解釋

[╰。超凡者〃☆]

您說的一點也沒錯，以我目前的技術來看是超級初學者，
我只能作些簡單的小程式..大部份實用性不大都是練習用的。


那我再多爬爬文，試著製作…若語法上有問題的話，我再po出來請各位大大檢查看看。