题目内容（请给出正确答案）

[主观题]

以下程序的功能是，从键盘上输入若干数据，统计并输出最大值和最小值，当输入负数时结束输入，请填空

。 Dim amax As Single，amin As Single x=InputBox("请输入数据") amax=x amin=x Do While【】 If x＞amax Then amax=x End If If【】Then amin=x End If x=InputBox("请输入数据") Loop Print "Max="；amax；"Min="；amin End Sub

如搜索结果不匹配，请联系老师获取答案

您可能会需要：

重置密码查看订单联系客服

安装上学吧APP，拍照搜题省时又省心！

更多“以下程序的功能是，从键盘上输入若干数据，统计并输出最大值和最…”相关的问题

第1题

为了使一个标签透明且没有边框，必须将它的BorderStyle属性设置为0，并将【】属性设置为0。

请帮忙给出正确答案和分析，谢谢！

点击查看答案

第2题

以下程序的功能是在程序运行后，单击命令按钮，输出如下结果： 1 4 7 2 5 8 3 6 9 请完善以下程序。 Private Sub Command1_Click() Dim Arr(3，3)As Integer For i=1 To 3 For j=1 To 3 Arr(i，j)=【】 Print Arr(i，j)； Next j Print NeXt i End Sub

请帮忙给出正确答案和分析，谢谢！

点击查看答案

第3题

在窗体上画一个列表框、一个命令按钮和一个标签。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签中显示列表框当前的项目数。下面是实现上述功能的程序，请填空。 Private Sub Form_Load() List1.AddItem "AAAAA" List1.AddItem "BBBBB" List1.AddItem "CCCCC" List1.AddItem "DDDDD" End Sub Private Sub Command1_Click() Dim L1 As Integer L1=【】 If L1 ＞=0 Then List1.RemoveItem【】 Labell.Caption=【】 Else MsgBox("请选择要删除的项目") End If End Sub

请帮忙给出正确答案和分析，谢谢！

点击查看答案

第4题

为了使一个标签透明且没有边框，必须将它的【】属性设置为0，并将BackStyle属性设置为0。

请帮忙给出正确答案和分析，谢谢！

点击查看答案

热门考试全部 >

2022年威海市专业技术人员继续教育公需科目考试试题及答案 2022年绵阳市专业技术人员继续教育公需科目考试试题及答案 2022年宜宾市专业技术人员继续教育公需科目考试试题及答案 2022年潍坊市专业技术人员继续教育公需科目考试试题及答案 2022年浙江省专业技术人员继续教育公需科目考试试题及答案 2022年河南省执业药师继续教育公需科目考试试题及答案 2022年自贡市专业技术人员继续教育公需科目考试试题及答案 2022年陕西省专业技术人员继续教育公需科目考试试题及答案 2022年江西省专业技术人员继续教育公需科目考试试题及答案 2022年吉林省专业技术人员继续教育公需科目考试试题及答案

相关试卷全部 >

2024年一级建造师《建设工程项目管理》2024年一级建造师《建设工程经济》真题 2024年管道燃气客服员（初级）模拟试卷（十）2024年管道燃气客服员（初级）模拟试卷（九）2024年管道燃气客服员（初级）模拟试卷（八）2024年管道燃气客服员（初级）模拟试卷（七）2024年管道燃气客服员（初级）模拟试卷（六）2024年管道燃气客服员（初级）模拟试卷（五）2024年管道燃气客服员（初级）模拟试卷（四）2024年管道燃气客服员（初级）模拟试卷（三）

谢谢您的反馈

您认为本题答案有误，我们将认真、仔细核查，
如果您知道正确答案，欢迎您来纠错

开始纠错>>>

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

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

微信搜一搜

上学吧

点击打开微信

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

抱歉，您的账号因涉嫌违反上学吧购买须知被冻结。您可在“上学吧”微信公众号中的“官网服务”-“账号解封申请”申请解封，或联系客服。

微信搜一搜

上学吧

点击打开微信