题目详情
当前位置:首页 > 职业培训考试
题目详情:
发布时间:2024-03-06 07:42:30

[单项选择]阅读程序:
Function F(a As Integer)
b=0
Static c
b=b+1
c=c+1
f=a+ b+ c
End Function
Private Sub Command1_Click( )
Dim S As Integer
a=2
For i=1 To 3
Print P(
A. 4
B. 4
C. 4

更多"阅读程序: Function F(a As Integer) "的相关试题:

[单项选择]阅读程序:
Function F(a As Integer)
b=0
Static c
b=b+1
c=c+1
F=a+b+c
End Function
Private Sub Command1_Click( )
Dim a As Integer
a=2
For i=1 To 3
Print F(
A. 4 5 6
B. 4 6 8
C. 4 7 9
[单项选择]阅读程序:

Function Fun(a As Integer)

Static c,

b=0:b=b+2:c=c+2

F=a*b*c

End Function

Private Sub Command1_Click( )

Dim a As Integer

a=2

For i=1 To 2

Print Fun(
A. ;
[单项选择]阅读程序: Function Fun( a As Integer) Static c b=0:b=b+2:c=c+2 F=a*b*c End Function Private Sub Commandl _ Click( ) Dim a As Integer a=2 For i = 1 To 2 Print Fun (a); Next End Sub 运行上面的程序,单击命令按钮,输出结果为
A. 8 16
B. 9 18
C. 10 20
D. 7 14
[单项选择]有如下程序:
Function F(a As Integer)
b = 0
Static C
b = b + 1
c = c + 2
F = a + b + c
End Function
Private Sub Command1_Click( )
Dim a As Integer
a = 2
For i=1 To 3
Print F(
A. ;
[单项选择]有如下程序:
Function F(a As Integer)
  b = 0
  Static c
  b = b + 1
  c = c + 2
  F = a + b + c
End Function
Private Sub Command1_Click( )
  Dim a As Integer
  a = 2
  For i = 1 To 3
    Print F
A. ;
[单项选择]以下用户自定义函数 Function Func(a As Integer,b As Integer)As Integer Static m As Integer.i As Integer  m=0:i=2  i=i+m+i  m=i+a-i-b  Func=m End Function 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) Dim k As Integer,m As Integer,p As Integer   k=4:m=1   P=Func(k,m)   Print P End Sub 程序运行后,单击命令按钮,输出结果为
A. 8
B. 9
C. 10
D. 11
[单项选择]设有如下函数过程:
Function fun(a As Integer, b As Integer)
Dim c As Integer
If a<b Then
c=a:a=b:b=c
End If
c=0
Do
c=c+a
Loop Until c Mod b=0
fun=c
End Function
若调用函数fun时的实际参数都是自然数,则函数返回的是
A. a、b的最大公约数
B. a、b的最小公倍数
C. a除以b的余数
D. a除以b的商的整数部分
[单项选择]假定有下面的过程:
Function Func(a As Integer,b As Integer)As Integer
Static m As Integer,i As Integer
m=0
i=2
i=i+m+1
m=i+a+b
Func=m
End Function
在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command 1_Click( )
Dim k As Integer,m As Integer
Dim p As Integer
k=4
m=1
p=Func(k,m)
Print p;
p=Func(k,m)
Print p
End Sub
程序运行后,单击命令按钮,输出结果为( )。
A. 8 17
B. 8 16
C. 8 20
D. 8 8
[单项选择]有下列函数过程:

Function Func2(a As Integer,b As Integer)As Integer

Staticm As Integer,i As Integer

m=0

i=2

a=i+m+1

b=i+a+b

Func2=m

End Function

在窗体上画一个命令按钮,然后编写下列事件过程:

Private Sub Command1_Click( )

Dim p As Integer,k As Inmger,m As Integer

k=4

m=1

p=Func2(k,m)

Prim k;m

p=Func2(k,m)

Print k;m

End Sub

程序运行后,单击命令按钮,输出结果是( )。
A. 3 6<CR>3 6
B. 3 6<CR>3 11
C. 3 11<CR>3 6
D. 3 11<CR>3 11
[单项选择]以下用户自定义函数
Function Func(a As Integer, b As Integer) As Integer
Static m As Integer, i As Integer
m=0:i=2
i=i+m+i
m=i+a+b
Func=m
End Function
在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click( )
Dim k As Integer,m As Integer,p As Integer
k=4:m=1
P=Func(k,m)
Print p
End Sub
程序运行后,单击命令按钮,输出结果为
A. 8
B. 9
C. 10
D. 11

我来回答:

购买搜题卡查看答案
[会员特权] 开通VIP, 查看 全部题目答案
[会员特权] 享免全部广告特权
推荐91天
¥36.8
¥80元
31天
¥20.8
¥40元
365天
¥88.8
¥188元
请选择支付方式
  • 微信支付
  • 支付宝支付
点击支付即表示同意并接受了《购买须知》
立即支付 系统将自动为您注册账号
请使用微信扫码支付

订单号:

请不要关闭本页面,支付完成后请点击【支付完成】按钮
恭喜您,购买搜题卡成功
重要提示:请拍照或截图保存账号密码!
我要搜题网官网:https://www.woyaosouti.com
我已记住账号密码