真实的国产乱ⅩXXX66竹夫人,五月香六月婷婷激情综合,亚洲日本VA一区二区三区,亚洲精品一区二区三区麻豆

成都創(chuàng)新互聯(lián)網(wǎng)站制作重慶分公司

vb.net異或計算器 vb或運算

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

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

網(wǎng)站建設(shè)哪家好,找創(chuàng)新互聯(lián)!專注于網(wǎng)頁設(shè)計、網(wǎng)站建設(shè)、微信開發(fā)、重慶小程序開發(fā)、集團企業(yè)網(wǎng)站建設(shè)等服務(wù)項目。為回饋新老客戶創(chuàng)新互聯(lián)還提供了香格里拉免費建站歡迎大家使用!

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中調(diào)用記事本和計算器

這個啊,呵呵,應(yīng)該不難吧

先找到你要打開的應(yīng)用程序的文件

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

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

這是要開記事本的

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

這是打開計算器的

應(yīng)該也可以把這兩個應(yīng)用程序復(fù)制到你的程序的默認目錄下,就是BIN下吧!

呵呵,試試??!要給我加分哦!??!

有關(guān)vb.net制作計算器的問題

判斷吧,如果點擊+按鈕,則一個全局變量為1,-按鈕,則全局變量為2.以此類推,然后if或case判斷哪個數(shù),如果為1,就兩個數(shù)相加。

如何用VB.NET編寫計算器

簡單的說拖出一些控件,設(shè)置相應(yīng)的caption和屬性等等,雙擊每個button控件,進行相應(yīng)的處理,即可


文章名稱:vb.net異或計算器 vb或運算
鏈接分享:http://weahome.cn/article/doippps.html

其他資訊

在線咨詢

微信咨詢

電話咨詢

028-86922220(工作日)

18980820575(7×24)

提交需求

返回頂部