用VB.net编计算器的问题

1、把文本框的属性TextAlign设置为Right，数字就可以在文本框的右边显示了；

创新互联建站是专业的祁阳网站建设公司，祁阳接单;提供成都网站设计、网站制作、外贸营销网站建设,网页设计,网站设计,建网站,PHP网站建设等专业做网站服务;采用PHP框架,可快速的进行祁阳网站开发网页制作和功能扩展;专业做搜索引擎喜爱的网站,专业的做网站团队,希望更多企业前来合作!

2、FormBordetStyle的值设置为FixedSingle窗口的大小就不可调整了。

3、给文本框添加先面的方法，就可以禁止文本框输入字符。

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged

Dim tpu

If Not IsNumericRegex(TextBox1.Text) Then

tpu = MsgBox("此框中只允许输入数字！", , "错误")

If Len(TextBox1.Text) 0 Then

TextBox1.Text = Microsoft.VisualBasic.Left(TextBox1.Text, Len(TextBox1.Text) - 1)

Else

TextBox1.Text = 0

End If

TextBox1.Focus()

TextBox1.SelectAll()

End If

End Sub

有关vb.net制作计算器的问题

判断吧，如果点击+按钮，则一个全局变量为1，-按钮，则全局变量为2.以此类推，然后if或case判断哪个数，如果为1，就两个数相加。

怎样在VB .NET中调用记事本和计算器

这个啊，呵呵，应该不难吧

先找到你要打开的应用程序的文件

然后用一个调用代码：

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

这是要开记事本的

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

这是打开计算器的

应该也可以把这两个应用程序复制到你的程序的默认目录下，就是BIN下吧！

呵呵，试试！！要给我加分哦！！！

VB.NET怎么编模拟袖珍计算器的完整程序？

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

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 计算器使用
本文链接：http://azwzsj.com/article/dohesce.html