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

[主观题]

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

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

查看答案

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

您可能会需要：

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

安装优题宝APP，拍照搜题省时又省心！

更多“下面程序的作用是用InputBox函数输入一个整数，然后判断…”相关的问题

第1题

下面是程序是计算给定函数的值，自变量x，y的值用InputBox函数输入，函数如下：程序不完整，请

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

下面是程序是计算给定函数的值，自变量x，y的值用InputBox函数输入，函数如下：程序不完整，请程序不完整，请填空，将程序的补充完整 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=") ) Private Sub Command2_Click() If【】Then z=x ^ 2 + y ^ 2 ElseIf【】Then z=x ^ 2-2 * y^2 【】 z=y ^ 2 - 3 * x ^ 2 End If Form1．Print "当x，y 的值为："； x，y Form1．Print "f(x，y) 的值为:"： z End sub

点击查看答案

第2题

在窗体上有一个过程函数，然后编写如下事件程序，该过程的功能是用选择交换法将10个数排成升序，请

在空白处填入适当的语句。 Sub SORT() Dim a(1 To 10) For i=1 To 10 a(i)=Val(InputBox(" " ，" "，0)) Next i For i=【】 k=i For j=【】 If a(k)＞a(j)Then【】 If k＜＞i Then b＝a(k) a(k)＝a(i) a(i) =b End If Next j Next i For k=1 To 10 Print a(k) Next k End Sub

点击查看答案

第3题

下列关于函数模板的描述中，正确的是（)。

A.函数模板的主要作用是减少可执行程序文件的尺寸

B.函数模板和普通函数重载时，函数调用会优先调用符合要求的函数模板

C.函数模板和普通函数重载时，函数调用会优先调用符合要求的普通函数

D.函数模板的主要作用是简化程序编写

点击查看答案

第4题

友元的作用是（)

A.提高程序的运行效率

B.加强类的封装性

C.实现数据的隐藏

D.增加成员函数的种类

点击查看答案

第5题

以下程序的功能是从键盘输入若干个学生的考试成绩，统计并输出最高分和最低分，当输入负数时结束

输入，输出结果。请补充完整下列程序段。 Dim x，amax,amin As Single x=InputBox("Enter a score") amax=x amin=x Do While【】 If x＞amax Then amax=x End If If【】Then amin=x End If x=InputBox("enter a score") Loop Print"max="；amax，"min="；amin

点击查看答案

第6题

在scanf（)函数调用语句中，可以在格式字符和%号之间加上一个星号，它的作用是跳过对应的输入数据；

在scanf()函数调用语句中，可以在格式字符和%号之间加上一个星号，它的作用是跳过对应的输入数据；当输入以下数据时，100 200 300 400 500＜回车＞，下面语句的执行结果为【】。 main() { int a，b，C； scanf("%d%*d%d%d"，&a，&b，&c)； printf("%d%d%d"，a，b，c)；}

点击查看答案

第7题

请看下面程序，分析其功能。当M=23，N=24时，程序输出的值是（)DimmAsInteger,nAsInteger,sAsIntegerm=InputBox（"请输入较小的整数：")n=InputBox（"请输入较大的整数：")Fork=mTons=s＋kNextkPrints

A.0

B.47

C.2324

D.123

点击查看答案

第8题

在窗体上画一个名为Command1的命令按钮。下列程序的功能是：从输入对话框输入一个正整数n。用随机函

数产生n个1～100范围的随机数，然后求出去掉一个最大数和最小数的平均数。根据题意，请完善下列程序： Private Sub Command1_Click() Dim ave As Single, max As Integer, i As Integer, n As Integer Dim min As Integer, Sum As Integer, s As String Dim t As Integer s=InputBox("输入一个正整数:") n=Val(s) If n＞0 Then max=n: min=n: Sum=0 For j=1 To n t=【】 Print t; Sum=Sum+t If t＜min Then min=t Elself max＜t Then max=t End If Next j 【】 ave=Sum/n MsgBox"平均值="+Str(ave)，，"去掉最大数和最小数后" End If End Sub

点击查看答案

第9题

下面程序把从终端读入的文本（用@作为文本结束标志)输出到一个名为bi.dat的新文件中。请填空。 #include &quo

下面程序把从终端读入的文本(用@作为文本结束标志)输出到一个名为bi.dat的新文件中。请填空。

#include "stdio.h"

FILE*fp;

{char ch;

if((fp=fopen(______))==NULL)exit(0);

while((ch=getchar())!='@')fputc(ch,fp);

fclose(fp);

}

点击查看答案