更多"下列程序的功能是找出被5和7除余数为1的最小的5个正整数。请在程序空白"的相关试题:
[填空题]下面程序的功能是找出能够被13、23、43除余数分别为1、2、3的最小的两位正整数。
请填空。
Private Sub Form_Click（ ）
Dim i As Integer,j As Integer
j=0
j=43+3
Do
j=j+1
if (12) then
print j
i=i+1
end if
Loop (13)
End Sub
[填空题]下列程序的功能找出披5、7除，余数为1的最小的5个正整数。请在程序空白处填入适当的语句，使程序可以完成指定的功能。
Private Sub Form_Click（ ）
Dim Ncount%,n%
Ncount＝0
n＝1
Do
n＝n＋1
If______Then
Debug．Print n
Ncount＝Ncount＋1
End If
Loop Uhdl Ncount＝5
End Sub
[填空题]下列程序的功能是找出被5、7除，余数为1的最小的5个正整数，请在程序空白处填入适当的语句，使程序可以完成指定的功能。
Private Sub Form Click（ ）
Dim Ncount%，n%
Ncount=0
n=1
Do
n=n+1
If______Then
Debug．Print n
Ncount=Ncount+1
End If
Loop Until Ncount
End Sub
[填空题]找出其中的最大值和对应的输入位置。请在空白处填入适当语句，使程序可以完成指定的功能。
Private Sub Command12_Click（ ）
max=0
maxn=0
For i=1 To 10
num=Val(InputBox("请输入第"＆i＆"个大于0的整数:"))
If (11) Then
max=num
maxn= (12)
End If
Next i
MsgBox("最大值为第"＆maxn＆"个输入的"＆max)
End Sub
[填空题]设有如下程序段，其功能是查找并输出该数组中的最小值。请在空白处填入适当的内容，将程序补充完整。
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 = arr1(1)
For i=2 To 8
If arr1(i)＜Min Then
Next i
Print "最小值是:"; Min
End Sub
[填空题]下面是用户程序对Applet 类中方法paint （ ）的重新定义，根据程序功能，在指定的空白处填上适当的语句或语法成分。
public void paint (Graphics g)
g 【9】 (“你好!”，10，20)；
[填空题]设有下列程序，查找并输出该数组中的最小值，请在空白处填上合适的代码，将程序补充完整。
Option Base 1
Private Sub Command1Click（ ）
Dim arrl
Dim Min As Integer,i As Integer
arrl=Array(12,435,76,-24,78,54,866,43)
Min=arrl(1)
For i=2 To 8
If arrl(i)＜Min Then______
Nexti
Print"最小值是:":Min
End Sub
[填空题]设有如下程序，查找并输出该数组中的最小值，请在空白处填上合适的代码，将程序补充完整。
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 = arr1(l)’
For i=2 To 8
If arr1(i) ＜ Min Then
Next i
Print "最小值是:"; Min
End Sub
[填空题]设有如下程序，查找并输出该数组中的最小值，请在空白处填上合适的代码，将程序补充完整。
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=arr1(1)
For i=2 To 8
If arr1(i)＜Min Then______
Next i
Print "最小值是:"; Min
End Sub
[填空题]下面是用户程序对Applet类中方法paint（ ）的重新定义。根据程序功能，在指定的空白处填上适当的语句或语法成分。
public void paint (Graphics g)
g. ______ (“你好!”，10，20)；
[填空题]下面是一个类的定义，根据程序功能，在指定的空白处填上适当的语句或语法成分，使程序完整。
Class ______ //定义名为myclass的类
static int var=666；
static int get var（ ）
return var；
[填空题]下面是一个类的定义，根据程序功能，在指定的空白处填上适当的语句或语法成分，使程序完整。
Class ______ //定义名为myclass的类
{
static int var=666；
static int get var（ ）
{
return var；
}
}
[填空题]下列程序功能为：弹出一个对话框询问用户是否输出，如果是，则输出；否则结束。请在程序空白处填入适当内容使程序完整。
Sub PrintOut（ ）
Dim a As Integer
a = MsgBox("输出结果", vblnformation + vbYesNo, "提示：")
If a = ______ Then
Print "Myresult"
End If
End Sub
[填空题]在程序的每个空白处填写一条适当的语句，使程序完成相应的操作。程序实现的功能是：窗体上有文本框Text1和若干复选框，其中复选框Check1用于设置文本框Text1显示的文本是否加下划线。Check1的单击事件过程如下：
Private Sub Checkl_Click（ ）
If ______ Then
Text1.FontUnderline=True
Else If ______ Then
Text1.FontUnderline=False
End If
End Sub
