当前位置: 答题翼 > 问答 > 计算机类考试 > 正文
目录: 标题| 题干| 答案| 搜索| 相关
问题

试题33若有如下Sub过程: Sub sfun(x As Single , y As Single) t=x x=t/y y=t Mod y End Sub在窗


试题33

若有如下Sub过程:

Sub sfun(x As Single , y As Single)

t=x

x=t/y

y=t Mod y

End Sub

在窗口中添加一个命令按钮Command33,对应的事件过程如下:

Private Sub Command32_Click()

Dim a As Single

Dim b As Single

a = 5 : b = 4

sfun(a , b )

MsgBox a & chr(10) + chr(13) & b

End Sub

打开窗体后,单击命令按钮,消息框中有两行输出,内容分别是()

A.1和1

B.1.25和1

C.1.25和4

D.5和4

参考答案
您可能感兴趣的试题
  • 设有如下通用过程:Public Sub Fun(a()As Integer,x As Integer)For i=1 To 5x=x+a(i)NextEnd Sub

  • (33)有如下事件程序,运行该程序后输出结果是Private Sub Command33_Click()Dim x As Integer,y A

  • 试题31若有以下窗体事件过程:Private Sub Form_Click() result=1 For i=1 To 6 step 3 Result =

  • (33)下列子过程语句的说明正确的是A.Sub f1(By Val x()As Integer) B.Sub f1(X%())As IntegerC.F

  • 设有如下通用过程: Public Sub Fun(a() ByVal x As Integer)

  • 在窗体上绘制一个文本框 然后编写如下事件过程:Private Sub Form_Click()x=InputBox(请输入一个