单选

在窗体上画一个命令按钮(名称为Command1),并编写下列代码:

Function Fun1(ByVa1 a As Integer,b As Integer)As Integer

Dim t As Integer

t=a-b

b=t+a

Fun1=t+b

End Function

Private Sub Command1Click( )

Dim X As Integer

x=10

Print Fun1(Vun1(X,(Fun1(x,x-1))),x-1)

End Sub

程序运行后,单击命令按钮,输出结果是( )。

  • A.10
  • B.0
  • C.11
  • D.21
参考答案
您可能感兴趣的试题

有弹出式菜单的结构如右表,程序运行时,单击窗体则弹出如下图所示的菜单。下面的事件过程中能正确实现这一功能的是(  )。

  • A.Private Sub Vorm Click(  )    PopupMenu cut
  • End Sub
  • B.Private Sub Command1 Click(  )    PopupMenu edit
  • End Sub
  • C.Private Sub Form. Click(  )    PopupMenu edit
  • End Sub
  • D.Private Sub Form. Click(  )    PopupMenu cut    PopupMenu paste
  • End Sub

下述关于数据库系统的叙述中,正确的是(  )。

  • A.数据库系统减少了数据冗余
  • B.数据库系统避免了一切冗余
  • C.数据库系统中数据的一致性是指数据类型一致
  • D.数据库系统比文件系统能管理更多的数据
¥

订单号:

遇到问题请联系在线客服

订单号:

遇到问题请联系在线客服