填空题
单击窗体上的命令按钮Command1,【10】Private Sub Command1_Clicka= "10" b=20 c=Val(a) +b Print c End Sub
填空题答案仅供参考
题目答案
30
您的答案
答案解析
执行赋值语句a="10"，将字符串“10”赋给变量a；执行赋值语句b=20，将数值20赋值给变量b。由于Visual Basic中在进行字符串和数值相加时会自动先将字符串转换成数值型再参与计算，因此Print方法在窗体中的输出为30。
举一反三
在窗体上画一个命令按钮Command1，然后编写如下程序：
Private Sub Command1_Click()
Dim arr()As Integer
ReDim arr(3)
For i=0 To 3
arr(i)=i
Next i
x=InputBox(“请输入一个数学”)
If Val(x)＞4 Then
ReDim arr(4)
arr(4)=x
End If
Me.Print(arr(4)-arr(3))
End Sub
程序运行后，单击命令按钮，在输入对话框中输入12，输出结果为。
填空题答案仅供参考
题目答案
L
您的答案
答案解析
[评析] 用Redim语句重定义数组的维数时，原有维数内的内容将被破坏。除非用Redim Preserve来重新定义维数。本题中由于输入值x＞4，动态数组在被重定义为包含4个元素的数组后(即Redim arry(3)，此时arry(3)=3)，重新被定义为包含5个元素的数组，而重定义时并未用Preserve关键字。故此时arry(3)=0(实际上my(0)、arry(1)、arty(2)的值也都为0，即Integer类型变量的初始值)。
以下程序计算1+1/3+1/5+…+1/(2N+1)，直至1/(2N+1)小于0.00001，请在横线处将程序补充完整。
public class Sun
public static void main(String args[])
int n=1;
double term,sum=1.0;
do
n=;
term=1.0/n;
sum=sum+term;
while(term＞=0.00001);
System.out.println(n);
System.out.println(sum);
填空题答案仅供参考
题目答案
2*n+1
您的答案
答案解析
本题考查do-while循环的用法。题目中没有给出累加次数，故不能使用for循环，在do循环中，由累加项term的值作为退出循环的条件。根据题目要求，应该填写2*n+1。本题的关键是while(term＞=0.00001)语句，题目要求计算直至1/(2N+1)小于0.00001，所以term=1/(2N+1)，因此n=2*n+1。
下面是一个类的定义，试将程序补充完整。
class A
String s；
int a=66；
A(String sl)
s=sl；
static int geta()
return a；
填空题答案仅供参考
题目答案
static
您的答案
答案解析
本题考查Java中的修饰符。static方法只能处理static成员，非static方法不能处理static成员。所以题目中的geta()方法声明是static的，所以其中的变量必须也声明为 static属性。
执行下面程序,单击命令按钮Cmd1后,窗体上显示的第一行内容,第二行内容,第三行内容。Option ExplicitPrivate Sub Cmd1_Click()Dim st As String,ch As String*1,t As IntegerDim i As Integerst="2,3,8,12,32,65#"For i=1 To Len(st)ch=Mid(st,i,1)If ch<>"," And ch<>"#" Thent=t*10+Val(ch)ElseIf pd(t) Then Print tt=0End IfNext iEnd SubPrivate Function pd(ByVal n As Integer)As BooleanDo While n<>1If n Mod 2<>0 ThenExit FunctionEndIfn=n2Looppd=TrueEnd Function
填空题答案仅供参考
题目答案
2832
您的答案
答案解析
暂无解析
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_ClickDim a(1 To 10) Dim p(1 To 3) k=5 For i=1 To 10 a(i)=i Next i For i=1 To 3 p(i)=a(i*i) Next i For i=1 To 3 k=k+p(i)*2Next i Print k End Sub 程序运行后，单击命令按钮，输出结果是【13】。
填空题答案仅供参考
题目答案
33
您的答案
答案解析
[评析] 观察程序，通过第一个以i为循环变量的循杯，给数组a0进行赋值，数组a()中的各个元素的值就是其下标值。 通过第二个以i为循环变量的循环，给数组p()进行赋值； i=1,p(i)=a(i*i)，p(1)=a(1)=1 i=2,p(i)=a(i*i)，p(2)=a(4)=4 i=3,p(i)=a(i*i)，p(3)=a(9)=9 通过第三个以i为循环变量的循环，得到变量k的值： i=1，k=k+p(i)*2=5+p(1)*2=7 i=2,k=k+q(i)*2=7+p(2)*2=15 i=3，k=k+p(i)*2=15+p(3)*2=33 最终输出结果是：33。