网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

(10)在窗体上画一个命令按钮,其名称为 Command1,然后编写如下代码:

Option Base 1

Private Sub Command1_Click( )

Dim Arr

Arr=Array(43, 68, -25, 65, -78, 12, -79, 43, -94, 72)

pos=0

neg=0

For k=1 To 10

If Arr(k)>0 Then

【10】

Else

【11】

End If

Next k

Print pos, neg

End Sub

以上程序的功能是,计算并输出数组 Arr 中 10 个数的正数之和 pos 与负数之和 neg,请填空。


参考答案

更多 “ (10)在窗体上画一个命令按钮,其名称为 Command1,然后编写如下代码:Option Base 1Private Sub Command1_Click( )Dim ArrArr=Array(43, 68, -25, 65, -78, 12, -79, 43, -94, 72)pos=0neg=0For k=1 To 10If Arr(k)0 Then【10】Else【11】End IfNext kPrint pos, negEnd Sub以上程序的功能是,计算并输出数组 Arr 中 10 个数的正数之和 pos 与负数之和 neg,请填空。 ” 相关考题
考题 在窗件上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() a=12345 Print Format S(a, "000. 00") End Sub 程序运行后,单击命令按钮,窗体上显示的是______。A.123.45B.12345.00C.12345D.00123.45

考题 在窗体上画一个命令按钮,其名称为Command1,然后编写如下程序:Private Sub Command1_Click()Dim a(10)As IntegerDim x As IntegerFor i=1 To 10a(i)=iNext ix=1MsgBoxa(f(x)+x)End SubFunction f(y As Integer)y=y+2f=yEnd Function程序运行后,单击命令按钮,消息框的输出结果为______。

考题 在窗体上画一个命令按钮,其名称为Commandl,然后编写如下事件过程:程序运行后,单击命令按钮,其输出结果为__________。

考题 在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click( ) a=12345 Print Format $(a,"000.00") End Sub 程序运行后,单击命令按钮,窗体上显示的是A.123.45B.12345.00C.12345D.00123.45

考题 在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:程序运行后,如果单击命令按钮,则在面体上显示的内容是( )。

考题 在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_ Click() Dim arr (10) For i = 1 To 10 arr (i) = i ^ 2 Next i Print arr(i - 2) End Sub程序运行后,单击命令按钮,在窗体上输出的是______。A.49B.64C.81D.100

考题 在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.B.HC.D.

考题 在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() a = 12345 Print Format$(a, "000.00") End Sub 程序运行后,单击命令按钮,窗体上显示的是A. 123.45B.12345.00C.12345D.00123.45

考题 在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() a=12345 Print Format$(a,"000,00") End Sub 程序运行后,单击命令按钮,窗体上显示的是( )。A.123.45B.12345.00C.12345D.00123.45

考题 在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:Private Sub Command1_Click()a = 12345Print Format$(a, "000.00")End Sub程序运行后,单击命令按钮,窗体上显示的是( )。A.123.45B.12345.00C.12345D.00123.45