更多"下面程序的作用是用InputBox函数输入一个整数，然后判断能否同时被"的相关试题:
[填空题]下面程序的作用是用InputBox函数输入一个整数，然后判断能否同时被2，5和7整除， 果能则输出该数及平方值。请填空。
Private Sub Command1_Click（ ）
Dim numX As Integer
numX = Val (InputBox("请输入一个整数"))
If【 】Then
Form1．Print【 】
End If
End Sub
[填空题]下面程序的作用是用InputBox函数输入一个整数，然后判断能否同时被2，5和7整除，果能则输出该数及平方值。请填空。
Private Sub Command1_Click（ ）
Dim numX As Integer
numX = Val (InputBox("请输入一个整数"))
If 【9】 Then
Form1．Print 【10】
End If
End Sub
[填空题]下面程序的功能是：用Array函数建立一个含有8个元素的数组，然后查找并在文本框Text1中输出该数组中各元素的最小值。请依据上述功能将程序补充完整。
Option Base 1
Private Sub Command1_Click（ ）
Dim arr1（ ）
Dim Min As Integer,i As Integer
arr1＝Array(12,435,76,-24,78,54,866,43)
Min＝______
For i＝2 To 8
If arr l(i)＜Min Then______
Next i
Text1＝Min
End Sub
[简答题]请编写一个函数display（ ），该函数要求用户先输入一字符串，然后在屏幕上再输出该字符串(假设该字符串长度小于 100)。注意：部分源程序已存在文件test35_2.cpp中，
请勿修改主函数main和其他函数中的任何内容，仅在函数display（ ）的花括号中填写若干语句。
如输入abc，输出结果如下：
please input string:
abe
abc
Press any key to continue
文件 test35_2.cpp 的内容如下:
#include ＜iostream.h＞
#include ＜conio.h＞
void display（ ）
void main( )
cout<<"please input string:" << end1;
display ( );
[填空题]下面一段程序的功能是，单击窗体弹出对话框。在对话框中输入一个文件名，窗体中输出该文件名的文件号。请填空。
Private Sub Form_ click（ ）
filename = InputSox (“请输入文件名”)
Filecode =
Open filename For Output As # Filecode
Print filename; “的文件号是”; Filecode
Close # Filecode
End Sub
[简答题]编制程序，输入一个3*3矩阵（设该矩阵中没有相同的数），输出该矩阵中最大值和最小值所在的行号和列号。
[填空题]下列程序的功能是：用Array函数建立一个含有8个元素的数组，然后查找并在文本框Text l中输出该数组中各元素的最小值。请填空。
Option Base 1
Private Sub Command1_Click（ ）
Dim arr1（ ）
Dim Min As Integer,i As Integer
Arr1=Array(12,435,76,-24,78,54,866,43)
Min=______
For i=2 To 8
If arr1(i)＜Min Then______
Next i
Text1=Min
End Sub
