以下是一个VB程序设计的题，急需解决

显示全部楼层 · 2011-1-4 17:09:53

、基本设计（必做）：按下列运行界面，设计（四则运算）窗体文件。

1．初始化：4个label、3个text、1个组合框、3个command
2．(1)form_load()
Combo1.list(0)=”+”combo1.list(1)=”-“combo1.list(2)=”*” combo1.list(3)=”/”

(2)command1_click()
Da1=val(text1.text) da2=val(text2.text)
Select case combo1.listindex

Case 0
Da3=da1+da2
Case 1
Da3=da1-da2
Case 2
Da3=da1*da2
Case 3
Da3=da1/da2
Endselect
Text3.text=da3
(3)command2_click()
Text1.text=””text2.text=””text3.text=”” text1.setfocus
(4)command3_click()
end

千问 · 2011-1-4 17:09:53

Private Sub Command1_Click()Dim St As String
St = Trim(Text3)Select Case St
Case "+": Text4.Text = Val(Text1.Text) + Val(Text2.Text)
Case "-": Text4.Text = Text1.Text - Text2.Text
Case "*": Text4.Text = Text1.Text * Text2.Text

千问 · 2011-1-4 17:09:53

Private Sub Form_Load()
Combo1.List(0) = "+"
Combo1.List(1) = "-"
Combo1.List(2) = "*"

千问 · 2011-1-4 17:09:53

注意符号不能是全角的 "+”， "和“不要搞错

千问 · 2011-1-4 17:09:53

一个简单的计算器，但是不知道你想问什么

千问 · 2011-1-4 17:09:53

要问什么呢