在窗体上画一个命令按钮（其名称为Command1)，然后编写如下事件过程：Private Sub Command1_Click（)

在窗体上画两个标签和一个命令按钮，其名称分别为Labell、Label2和Command1，然后编写如下程序： Private Sub func(L As Label，ByVal a As Integer) L.Caption="1234" a=a*a End Sub Private Sub Form_Load() Label1.Caption="ABCD" Label2.Caption=10 End Sub Private Sub Command1_Click() a=Val(Label2.Caption) Call func(Labell，A)Label2.Caption=a End Sub 程序运行后，单击命令按钮，在两个标签Label1和Label2中显示的内容分别是 ______。

A．ABCD和10

B．1234和100

C．ABCD和100

D．1234和10

假定程序中有以下语句： answer=MsgBox("String1",,"String2","String3",2) 执行该语句后，将显示一个信息框，此时如果单击“确定”按钮，则answer的值为 ______。

A．String1

B．String2

C．String3

D．1

设窗体Form1中有一名为mnuFile的菜单，它只有一个标题为Open的子菜单。为使程序运行时，按下Alt+F键窗体中能够显示如下图所示的菜单项，则mnuFile的标题应为 ______.

A．File(F)

B．：File(F)

C．：File(&F)

D．File(-F)

设a=5，b=6，c=7，d=8，则执行下列语句后，x的值为 ______。 x=IIF((a＞B)And(c＜d)，10,20)

A．10

B．20

C．30

D．300

在窗体上画一个命令按钮，然后编写如下程序： Sub S1(ByVal x As Integer,ByVal y As Integer) Dim t As Integer t=x x=y y=t End Sub Private Sub Command1_Click() Dim a As Integer,b As Integer a=10 b=30 S1 a，b Print"a="；a；"b="；b End Sub 程序运行后，单击命令按钮，输出结果是 ______。

A．a=30 b=10

B．a=30 b=30

C．a=10 b=30

D．a=10 b=10

能够获得一个文本框中被选取文本的内容的属性是 ______。

A．Text

B．SelLength

C．SelText

D．SelStart

设置复选框中或单选按钮的标题对齐方式的属性是 ______。

A．Align

B．Style

C．Sorted

D．Alignment

下列程序段的执行结果为 ______。 X=5 Y=-20 If Not X＞0 Then X=Y-3 Else Y=X+3 Print X-Y; Y-X

A．-3 3

B．5 -8

C．39875

D．25 -25

改变驱动器列表框的Drive属性值将激活 ______ 事件。

A．Change

B．Scroll

C．KeyDown

D．KeyUp

某企业为增值税一般纳税企业，适用的增值税税率为17％，适用的消费税税率为 10％。该企业委托其他单位(增值税一般纳税企业)加工一批属于应税消费品的原材料(非金银首饰），该批委托加工原材料收回后用于继续生产应税消费品。发出材料的成本为180万元，支付的不含增值税的加工费为90万元，支付的增值税为15．3万元。该批原料已加工完成并验收入库，其实际成本为()万元。

A．270

B．280

C．300

D．315.3