VB.NET怎么編模擬袖珍計算器的完整程序？

Public C護激篙刻蕻灸戈熏恭抹lass Form1

創(chuàng)新互聯(lián)主打移動網(wǎng)站、網(wǎng)站設計、做網(wǎng)站、網(wǎng)站改版、網(wǎng)絡推廣、網(wǎng)站維護、域名與空間、等互聯(lián)網(wǎng)信息服務，為各行業(yè)提供服務。在技術(shù)實力的保障下，我們?yōu)榭蛻舫兄Z穩(wěn)定，放心的服務，根據(jù)網(wǎng)站的內(nèi)容與功能再決定采用什么樣的設計。最后，要實現(xiàn)符合網(wǎng)站需求的內(nèi)容、功能與設計，我們還會規(guī)劃穩(wěn)定安全的技術(shù)方案做保障。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim c As Char

c = Trim(TextBox3.Text)

Select Case c

Case "+"

TextBox4.Text = Val(TextBox1.Text) + Val(TextBox2.Text)

Case "-"

TextBox4.Text = Val(TextBox1.Text) - Val(TextBox2.Text)

Case "*"

TextBox4.Text = Val(TextBox1.Text) * Val(TextBox2.Text)

Case "\"

If Val(TextBox2.Text) = 0 Then

MsgBox("分母為0")

Else

TextBox4.Text = Val(TextBox1.Text) \ Val(TextBox2.Text)

End If

Case "/"

If Val(TextBox2.Text) = 0 Then

MsgBox("分母為0")

Else

TextBox4.Text = Val(TextBox1.Text) / Val(TextBox2.Text)

End If

End Select

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

End

End Sub

End Class

vb.net中 我們都知道 shell函數(shù)可以打開 *.exe文件 比如說打開系統(tǒng)自帶的 計算器

這個不屬于VB的問題，而是操作系統(tǒng)使用問題。

以計算器為例：點開始，程序，附件。

看到計算器，用鼠標右健單擊，點 屬性 ，點 快捷方式，你就看到了。

怎樣在VB .NET中調(diào)用記事本和計算器

這個啊，呵呵，應該不難吧

先找到你要打開的應用程序的文件

然后用一個調(diào)用代碼：

System.Diagnostics.Process.Start("C:\WINDOWS\system32\notepad.exe")

這是要開記事本的

System.Diagnostics.Process.Start("C:\WINDOWS\system32\calc.exe")

這是打開計算器的

應該也可以把這兩個應用程序復制到你的程序的默認目錄下，就是BIN下吧！

呵呵，試試?。∫o我加分哦?。?！