[求助]求一个在几个文本框里自己输入数字,然后在另一个结果文本框内输出加减乘除的 - VB6论坛

编程论坛 → 开发语言 → 『 VB6论坛』 → [求助]求一个在几个文本框里自己输入数字,然后在另一个结果文本框内输出加减乘除的

标题：[求助]求一个在几个文本框里自己输入数字,然后在另一个结果文本框内输出加减 ...

只看楼主

白展堂

等　级：新手上路
帖　子：62
专家分：0
注　册：2007-1-2

问题点数：0 回复次数：5

[求助]求一个在几个文本框里自己输入数字,然后在另一个结果文本框内输出加减乘除的

求一个在几个文本框里自己输入数字,然后在另一个结果文本框内输出加减乘除的结果

如第一个是22 第2个是3 第3个是4

结果输出 22+3*4即34

这样的源码

谢谢

本人刚学自己弄不明白请多指教

搜索更多相关主题的帖子: 文本框　结果文本　加减乘除　数字　输出　

2007-06-05 18:45

b13690976754

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9

得分:0

Private Sub Command1_Click()
Label1.Caption = Val(Text1.Text) + Val(Text2.Text) * Val(Text3.Text)
End Sub

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If

2007-06-05 20:07

西山居士

等　级：贵宾
威　望：11
帖　子：581
专家分：0
注　册：2007-4-21

得分:0

以下是引用b13690976754在2007-6-5 20:07:26的发言：
Private Sub Command1_Click()
Label1.Caption = Val(Text1.Text) + Val(Text2.Text) * Val(Text3.Text)
End Sub

乘不用val，代码可简单化为：
Label1.Caption = Text1.Text + Val(Text2.Text) * Text3.Text

学海无涯

2007-06-05 21:07

b13690976754

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9

得分:0

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If

2007-06-05 21:16

黑暗公爵

等　级：新手上路
威　望：1
帖　子：46
专家分：0
注　册：2007-5-31

得分:0

是的

头发遮住眼睛，身心坠入冥冥，世间万千烦扰，我自成竹在胸。

2007-06-06 11:15

s40860

等　级：新手上路
帖　子：7
专家分：0
注　册：2006-8-30

得分:0

以下是引用西山居士在2007-6-5 21:07:22的发言：

乘不用val，代码可简单化为：
Label1.Caption = Text1.Text + Val(Text2.Text) * Text3.Text

同意。

2007-06-06 12:29