题目内容 (请给出正确答案)
[主观题]

下面程序的作用是用InputBox函数输入一个整数,然后判断能否同时被2,5和7整除,果能则输出该数及平

方值。请填空。 Private Sub Command1_Click() Dim numX As Integer numX = Val (InputBox("请输入一个整数")) If【 】Then Form1.Print【 】 End If End Sub

提问人:网友zhyo263 发布时间:2022-01-06
参考答案
查看官方参考答案
如搜索结果不匹配,请 联系老师 获取答案
更多“下面程序的作用是用InputBox函数输入一个整数,然后判断…”相关的问题
第1题
InputBox函数的4个参数中,必选参数的作用是()。A.输出信息B.定义提示信息C.定义隐含信息D.定义输

InputBox函数的4个参数中,必选参数的作用是()。

A.输出信息

B.定义提示信息

C.定义隐含信息

D.定义输入的位置

点击查看答案
第2题
()函数的作用是建立一个弹出窗口

A.MsgBox

B.InputBox

C.RGB

D.Print

点击查看答案
第3题
()函数的作用是建立一个输入对话框。

A.MsgBox()

B. Print

C. RGB()

D. InputBox()

点击查看答案
第4题
()函数的作用是建立一个弹出窗口。

A.MsgBox()

B. InputBox()

C. RGB()

D. Print

点击查看答案
第5题
关于InputBox函数的说法中,错误的是_______。

A.InputBox函数的作用是打开一个对话框,让用户输入信息。

B.InputBox函数不需要设置参数,可直接使用。

C.InputBox函数可以设置默认值。

D.InputBox函数可以设置提示信息。

点击查看答案
第6题
在VB中,______函数的作用是打开一个对话框,等待用户输入内容,当用户单击“确定”按钮或按回车键后,函数返回输入的值。

A.SetWarning

B.SetValue

C.InputBox

D.Beep

点击查看答案
第7题
下面说法不属于说明函数的作用是

A.任务分解

B.代码重用

C.提高程序效率

D.提高程序质量

点击查看答案
第8题
下面程序运行结果是()。Private Sub Form_Click() Dim x As Single,y As Single x=InputBox("请输

下面程序运行结果是()。 Private Sub Form_Click() Dim x As Single,y As Single x=InputBox("请输入数据25"):y=InputBox("请输入数据10") Print x+y;InputBox("请输入数据25")+InputBox("请输入数据10") End Sub

A._35_2510

B.25102510

C._35_35_

D.2510_35_

点击查看答案
第9题
下列函数过程的作用是计算x和y的最大公约数。请填空。Private Sub Command1_ Click()Dim x As Inte

下列函数过程的作用是计算x和y的最大公约数。请填空。

Private Sub Command1_ Click()

Dim x As Integer, y As Integer, Result As Integer

x = InputBox (“请输入第一个数”)

y = InputBox (“请输入第二个数”)

Result =______

Print x; "和"; y; "的最大公约数为: "; Result

End Sub

Private Function GYS (ByVal A As Integer, ByVal B As Integer)

Dim T As Integer

T = A Mod B

Do While ______

A = B

B = T

T = A Mod B

Loop

______

End Function

点击查看答案
第10题
下面的程序是计算给定函数的值,自变量x,y的值用InputBox函数输入,函数如下: f(x,y)= 程

下面的程序是计算给定函数的值,自变量x,y的值用InputBox函数输入,函数如下:

f(x,y) =

程序不完整,请填空,将程序的补充完整。

Option Explicit

Dim x As Single

Dim y As Single

Dim z As Single

Private Sub Command1_Click()

x=Val(InputBox("x=") )

y=Val(InputBox("y=") )

End Sub

Private Sub Command2_Click()

If 【13】 Then

z=x ^ 2 + y ^ 2

ElseIf 【14】 Then

z=x ^ 2 - 2 * y ^ 2

【15】

z=y ^ 2 - 3 * x ^ 2

End If

Form1.Print "当x,y的值为:"; x, y

Form1.Print "f(x,y) 的值为:"; z

End Sub

点击查看答案
账号:
你好,尊敬的用户
复制账号
发送账号至手机
密码将被重置
获取验证码
发送
温馨提示
该问题答案仅针对搜题卡用户开放,请点击购买搜题卡。
马上购买搜题卡
我已购买搜题卡, 登录账号 继续查看答案
重置密码
确认修改
欢迎分享答案

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

简答题官方微信公众号

警告:系统检测到您的账号存在安全风险

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

微信搜一搜
简答题
点击打开微信
警告:系统检测到您的账号存在安全风险
抱歉,您的账号因涉嫌违反简答题购买须知被冻结。您可在“简答题”微信公众号中的“官网服务”-“账号解封申请”申请解封,或联系客服
微信搜一搜
简答题
点击打开微信