【正文】
If x 500 Then y = * x Else y = * x End If End If End If End If = yEnd Sub 2. Private Sub Form_Load() Dim x As Integer x = 100 Do Until x 200 If x Mod 3 0 Then = amp。Visual Basic程序設(shè)計(jì)作業(yè)答案作業(yè)2一、選擇題1.B 2.C 3.D 4.B 5.D 6.A 7.B 8.C 9.A 10.D 11.C 12.B 13.D 14.C 15.A 16.B 17.C 18.B 19.D 20.B二、填空題 1.下拉式菜單 彈出式菜單 2.打開(kāi) 另存為 顏色 字體 打印 3.文本框 列表框 4.Option Base 1 5.Call語(yǔ)句 6.工程 工程屬性 通用 7.08.Sub過(guò)程的過(guò)程名不能返回值,而Function過(guò)程能通過(guò)過(guò)程名返回值9.窗體模塊 標(biāo)準(zhǔn)模塊 類(lèi)模塊10.移出內(nèi)存 無(wú)效狀態(tài)11.(1)2*Cosa*Sina/(2*a) (2) Sqr(s*(sa)*(sb)*(sc)) (3