VB题,懂的进。

[复制链接]
查看11 | 回复4 | 2009-4-6 22:54:27 | 显示全部楼层 |阅读模式
1.在窗体上画两个文本框,两个命令按钮,两个标签。编制加减运算程序,实现的功能是:任意输入两个数,按命令按钮“相加”得到两数之和,按命令按钮“相减”得到两数之差,两个数的输入在两个文本框中进行,结果通过两个标签分别输出。
对要代码。本来有个示意图,发不上来

回复

使用道具 举报

千问 | 2009-4-6 22:54:27 | 显示全部楼层
Dim A As Single, B As SinglePrivate Sub Command1_Click()
A = Val(Text1.Text)
B = Val(Text2.Text)
If IsNumeric(Text1.Text) And IsNumeric(Text2.Text) Then
Label1.Caption = Str(A + B)
Else
MsgBox "请在两个窗口中全部输入数字!"
End IfEnd SubPrivate Sub Command2_Click()
A = Val(Text1.Text) ...
回复

使用道具 举报

千问 | 2009-4-6 22:54:27 | 显示全部楼层
Dim a, b As LongPrivate Sub Command1_Click()a = Val(Text1.Text): b = Val(Text2.Text)Label1.Caption = a & "+" & b & "=" & a + bEnd SubPrivate Sub Command2_Click()a = V...
回复

使用道具 举报

千问 | 2009-4-6 22:54:27 | 显示全部楼层
我的神,你这也要贴出来问?...
回复

使用道具 举报

千问 | 2009-4-6 22:54:27 | 显示全部楼层
你是想要这样的程序代码?...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行