開?錯誤?GoTo?錯誤句柄
選擇?案子?Combo1。列表索引
案子?0
短信3。文字?=?Val(Text1。正文)?+?Val(文本2。正文)
案子?1
短信3。文字?=?Val(Text1。正文)?-?Val(文本2。正文)
案子?2
短信3。文字?=?Val(Text1。正文)?*?Val(文本2。正文)
案子?三
短信3。文字?=?Val(Text1。正文)?/?Val(文本2。正文)
結束?挑選
退出?潛水艇
錯誤句柄:
退出?潛水艇
結束?潛水艇
私人?Sub?Form_Load()
Combo1。清楚的
Combo1。AddItem?"+"
Combo1。AddItem?"-"
Combo1。AddItem?"*"
Combo1。AddItem?"/"
Combo1。ListIndex?=?0
結束?潛水艇