非常风气网www.verywind.cn
首页
vb设计计算器加减乘除
我的作业!想要
用VB
做一个
计算器
!!谢谢
答:
' --- ' 版权所有 (C) 1994 Microsoft Corporation '' 您可以免费以任何方式使用、修改、复制并分发您认为有用的 ' 示例应用程序文件 (或任何修改过的版本)。Microsoft 对任何 ' 示例应用程序文件不做任何保证,不负任何责任和义务。' --- Option Explicit Dim Op1, Op2 ...
用vb
编写一个模拟建议
计算器
的程序。急~~
答:
以前写的,你再修改一下:Option Explicit Dim Op1, Op2 ' 前面输入的操作数 Dim DecimalFlag As Integer ' 小数点仍然存在吗?Dim NumOps As Integer ' 操作数个数 Dim LastInput ' 指示上一次按键事件的类型 Dim OpFlag ' 指示未完成的操作 Dim TempReado...
如何用
VB程序设计
出一个简单的
计算器
答:
简单的做法是设全局变量记录
计算
中的数值和上一步的运算符号,然后每个按钮设置数据处理和输出。
vb
怎么
制作
一个
计算器
?
答:
Private Sub Command5_Click() '开始
加减乘除
的运算 shu2 = Val(Text1.Text)Select Case suanfu Case "+"Text1.Text = shu1 + shu2 Case "-"Text1.Text = shu1 - shu2 Case "*"Text1.Text = shu1 * shu2 Case "/"If shu2 = 0 Then Text1.Text = "被除数不可为0"Else ...
vb制作计算器
答:
'
加减乘除
——控件数组 num2 = num1 Text.Text = ""num1 = ""c = Index End SubPrivate Sub Command2_Click()'结果键 Select Case c Case 0 If Val(Text.Text) = 0 Then MsgBox "被除数不能为零", vbExclamation, "错误"Else Text.Text = Str(Val(num2) / Val(num1))End If C...
VB制作计算器
的代码
答:
Option Explicit Dim Op1, Op2 ' 预先输入操作数。Dim DecimalFlag As Integer ' 小数点存在吗?Dim NumOps As Integer ' 操作数个数。Dim LastInput ' 指示上一次按键事件的类型。Dim OpFlag ' 指示未完成的操作。Dim TempReadout ' C (取消) 按钮的 Click 事件过程 ' 重新设置...
用vb设计
一个简单的
计算器
,上面是文本框可以输入算式,点击计算可以
答:
这个需求有点特殊,恐怕得一段时间
...大神可以帮我
用VB
做一个简易
计算器
啊,能
加减乘除
,退格、倒数等功能就...
答:
)Calculate()End Sub
计算
用的函数 Sub Calculate()x2 = Val(Text1.Text)Select Case OperateID Case 1 TextBox1.Text = x1 + x2 Case 2 TextBox1.Text = x1 - x2 Case 3 TextBox1.Text = x1 * x2 Case 4 TextBox1.Text = x1 / x2 End Select OperateID = 0 End Sub ...
vb
简单
计算器
代码 只要
加减
即可
答:
private command11.click()text1.text=str(val(command1。caption)&command2.caption下面随便点,注意数值转换就行))
求简单
计算器vb程序
代码,及界面
设计
。要有界面设计的,不要不带小数点...
答:
’shu1在通用里要申明一下变量 shu1 as string,本句是将text1的texts属性赋值给shu1 Text1.Text = Sqr(shu1) ’Sqr(shu1) 是
VB
数学函数用来开方的,也可直接写为Text1.Text = Sqr(Text1.Text) ,这样可以省去上面shu1的赋值语句 End Sub 其他部分晚上回家后给发现在有事 ...
棣栭〉
<涓婁竴椤
12
13
14
15
16
17
18
19
21
涓嬩竴椤
20
你可能感兴趣的内容
本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
©
非常风气网