搜题
网友您好,请在下方输入框内输入要搜索的题目:
搜题
题目内容 (请给出正确答案)
提问人:网友opopo20005 发布时间:2022-01-06
[主观题]

By the end of next year, I______for the company for 10 years.A.workB.am workingC.had worke

By the end of next year, I______for the company for 10 years.

A.work

B.am working

C.had worked

D.will have worked

简答题官方参考答案 (由简答题聘请的专业题库老师提供的解答)
查看官方参考答案
更多“By the end of next year, I______for the company for 10 years.A.workB.am workingC.had worke”相关的问题
第1题
使用顺序控制继电器指令时,不能在SCR段内使用FOR、NEXT或END指令。()
点击查看答案
第2题
下列程序的功能是求方程:x2+y2=1000的所有整数解。请在空白处填入适当的语句,使程序完成指定的功
能。

Private Sub Command 1_Click()

Dim x as intege,y as integer

For x=-34 To 34

For y=-34 To 34

If______Then

Debug.print x,Y

End If

Next y

Next x

End Sub

点击查看答案
第3题
执行下面程序 , 第一行打印结果 ,第二行打印结果 。 Private Sub Form_Click() Static N As Integer Dim I As Integer For I = 3 To 1 Step -1 N = N + X : X = X + 1 Next I Y = Y + N End Sub
点击查看答案
第4题
给出下面程序:Private Sub Command1_Click() Dim x,y,z X=False For Each y In 2If y.Text="Hell

给出下面程序: Private Sub Command1_Click() Dim x,y,z X=False For Each y In 2 If y.Text="Hello" Then x=True Exit For End If Next y End Sub 下面描述正确的是

A.退出For Each…Next循环的条件是x=True

B.退出For Each…Next循环的条件是x=False

C.程序检查y对象的Text属性,等于“”时退出For Each…Next循环

D.程序逐一查找在z中的对象,不确切并判断其Text属性,文本框中的内容等于“Hello”时退出For Each…Next循环

点击查看答案
第5题
运行下列程序:Private Sub Form_Click()For i = 1 To 20If fun1(i) Thens = s + 1End IfNext

运行下列程序:

Private Sub Form_Click()

For i = 1 To 20

If fun1(i) Then

s = s + 1

End If

Next i

Print s

End Sub

Private Function fun1(y) As Boolean

If y Mod 2 <> 0 Then

fun1 = False

Else

fun1 = True

End If

End Function

单击窗体后,则在窗体上显示的结果是()。

A.110

B.10

C.0

D.20

点击查看答案
第6题
下面程序运行后,文本框中的数据为()。Private Sub Command1_Click()For a=1 To 5y=1For b=1
下面程序运行后,文本框中的数据为()。Private Sub Command1_Click()For a=1 To 5y=1For b=1

下面程序运行后,文本框中的数据为()。

Private Sub Command1_Click()

For a=1 To 5

y=1

For b=1 To 10

For c=1 To 6

x=x+1

y=y+1

Next c

Next b

Next a

Text1.Text=y

End Sub

点击查看答案
第7题
(35)有下列程序段,单击命令按钮执行程序后,输出结果是 。Option Base 1Private Sub Commandl_Clic
k() Dim x x=Array(23,-5,17,38,-31.46,11,8,5,-4) s1=0 s2=0 For k=1 To 10 If(x(k)>0)Then s1=sl+x(k) Else s2=s2+x(k) End If Next k Y=s1/Abs(s2) Print Y End SubA.148 B.40 C.-40 D.3.7

点击查看答案
第8题
下列程序运行后的输出结果是Function Fun(n)X=n*nFun=x-11End FunctionPrivate Sub Command1_Cli

下列程序运行后的输出结果是

Function Fun(n)

X=n*n

Fun=x-11

End Function

Private Sub Command1_Click()

For k=1 To 2

y=Fun(k):Print y

Next

End Sub

A.-10 -7

B.10 8

C.1 3

D.0 4

点击查看答案
第9题
(14)下列程序的功能是:找出给定的12个数中最大的一个数,然后输出这个数以及它在原来12个数中的位
置。请填空。 Option Base1 Private Sub Form_Click() Dim x x=Array(57,-9,17,42,-31,46,11,8,6,-4,3,90) Max=1 For k=2 To 10 Step 1 If x(k)>x(Max)Then End If Next k y=_______ Print Max,y End Sub

点击查看答案
第10题
下列程序计算1!,3!,5!,7!的值。完善下列程序。Private Sub Command1_Click()for x = 1 To 7
下列程序计算1!,3!,5!,7!的值。完善下列程序。Private Sub Command1_Click()for x = 1 To 7

下列程序计算1!,3!,5!,7!的值。完善下列程序。

Private Sub Command1_Click()

for x = 1 To 7 Step 2

()

For y = 1 To x

fact = fact * y

Next y

Print x; "! ="; fact

Next x

End Sub

点击查看答案
重要提示: 请勿将账号共享给其他人使用,违者账号将被封禁!
查看《购买须知》>>>
重置密码
账号:
旧密码:
新密码:
确认密码:
确认修改
购买搜题卡查看答案
购买前请仔细阅读《购买须知》
请选择支付方式
微信支付
支付宝支付
点击支付即表示你同意并接受《服务协议》《购买须知》
立即支付
搜题卡使用说明

1. 搜题次数扣减规则:

功能 扣减规则
基础费
(查看答案)
加收费
(AI功能)
文字搜题、查看答案 1/每题 0/每次
语音搜题、查看答案 1/每题 2/每次
单题拍照识别、查看答案 1/每题 2/每次
整页拍照识别、查看答案 1/每题 5/每次

备注:网站、APP、小程序均支持文字搜题、查看答案;语音搜题、单题拍照识别、整页拍照识别仅APP、小程序支持。

2. 使用语音搜索、拍照搜索等AI功能需安装APP(或打开微信小程序)。

3. 搜题卡过期将作废,不支持退款,请在有效期内使用完毕。

请使用微信扫码支付(元)

订单号:

遇到问题请联系在线客服

请不要关闭本页面,支付完成后请点击【支付完成】按钮
遇到问题请联系在线客服
恭喜您,购买搜题卡成功 系统为您生成的账号密码如下:
重要提示:请勿将账号共享给其他人使用,违者账号将被封禁。
发送账号到微信 保存账号查看答案
怕账号密码记不住?建议关注微信公众号绑定微信,开通微信扫码登录功能
警告:系统检测到您的账号存在安全风险

为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!

- 微信扫码关注简答题 -
警告:系统检测到您的账号存在安全风险
抱歉,您的账号因涉嫌违反简答题购买须知被冻结。您可在“简答题”微信公众号中的“官网服务”-“账号解封申请”申请解封,或联系客服
- 微信扫码关注简答题 -
请用微信扫码测试
欢迎分享答案

为鼓励登录用户提交答案,简答题每个月将会抽取一批参与作答的用户给予奖励,具体奖励活动请关注官方微信公众号:简答题

简答题官方微信公众号

简答题
下载APP
关注公众号
TOP