更多"窗体Form1上有一个名称为Command1的命令按钮,以下对应窗体单"的相关试题:
[填空题]新建一个工程,内有两个窗体,窗体Form1上有一个命令按钮Command1,单击该按钮, Form1窗体消失,显示Form2窗体,程序如下:
Private Sub Command1_Click( )
【 】
Form2 【 】
End Sub
试补充完整。
[填空题]新建一个工程,内有两个窗体,窗体Form1上有一个命令按钮Command1,单击该按钮,Form1窗体消失,显示Form2窗体,程序如下:
Private Sub Command1_Click( )
______
Form2. ______
End Sub
试补充完整。
[填空题]新建一个工程,内有两个窗体,窗体Form1上有一个命令按钮Command1,单击该按钮,
Form1窗体消失,显示Form2窗体,程序如下:
Private Sub Command1_Click( )
【6】
Form2 【7】
End Sub
试补充完整。
[单项选择]窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是
Private Sub Command1_Click( )
Dim a
a = Array(1,2,3,4,5)
For k = 1 To4
s=s+a(k)
Next
Print S
End Sub
A. 10
B. 14
C. 15
D. 120
[单项选择]窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是( )。
Private Sub Command1_Clcik( )
Dim a
a=Array(1,2,3,4,5)
For k=1 To 4
s=s+a(k)
Next k
Print s
End Sub
A. 10
B. 14
C. 15
D. 120
[单项选择]窗体上有一个命令按钮,命令按钮的单击事件过程如下。
Private Sub Command1_Click( )
Dim a
a:Array(1,2,3,4,5)
For k=1 To 4
s=s+a(k)
Next
Print s
End Sub
运行程序后,单击命令按钮,输出结果是( )。
A. 10
B. 14
C. 15
D. 120
[单项选择]窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是( )。
Private Sub Command1_Click( )
Dim a
a=Array(1,2,3,4,5)
For k=1 To 4
S=S+a(k)
Next k
Print S
End Sub
A. 10
B. 14
C. 15
D. 120
[单项选择]窗体上有一个名为Command1的命令按钮,并有如下程序:
Private Sub Command1_Click( )
Dim a(10) ,x%
For k=1 To 10
a(K)=Int(Rnd*90+10)
x=x+a(k) Mod 2
Next k
Print x
End Sub
程序运行后,单击命令按钮,输出结果是______。
A. 10个数中偶数的个数
B. 10个数中奇数的个数
C. 10个数中偶数的累加和
D. 10个数中奇数的累加和
[单项选择]
窗体上有一个名为Command1的命令按钮和一个名为Timed的计时器,并有下面的事件过程:
Private Sub Command1_Click( )
Timer1. Enabled=True
EndSub
Private Sub Form_Load( )
Timer1. Interval=10
Timed. Enabled=False
End Sub
Private Sub Timer1_Timer( )
Command1. Left=Command1. Left+10
End Sub
程序运行时,单击命令按钮,则产生的结果是()。
A. 命令按钮每10秒向左移动一次
B. 命令按钮每10秒向右移动一次
C. 命令按钮每10毫秒向左移动一次
D. 命令按钮每10毫秒向右移动一次
[单项选择]窗体上有一个名为Command1的命令按钮和一个名为Timer1的计时器,并有下面事件过程:
Private Sub Command1_Click( )
Timer1.Enabled=True
End Sub
Private Sub Form_Load( )
Timer1.Interval=5
Timer1.Enabled=False
End Sub
Private Sub Timer1_Timer( )
Command1.Left=Command1.Left+5
End Sub
程序运行时,单击命令按钮,则产生的结果是______。
A. 命令按钮每5毫秒向左移动一次
B. 命令按钮每5毫秒向右移动一次
C. 命令按钮每5秒向左移动一次
D. 命令按钮每5秒向右移动一次
[单项选择]窗体上有一个名为Command1的命令按钮,并有下面的程序:
Private Sub Command1_Click( )
Dim arr(5) As Integer
For k = 1 To 5
arr(k) = k
Next k
prog arr( )
For k = 1 To 5
Print arr(k);
Next k
End Sub
Sub prog(a( ) As Integer)
n = UBound(a)
For i = n To 2 step-1
For j = 1 To n-1
if a(j) < a(j+1) Then
t=a(j):a(j)=a(j+1):a(j+1)=t
End If
Next j
Next i
End Sub
程序运行时,单击命令按钮后显示的是( )。
A. 1 2 3 4 5
B. 5 4 3 2 1
C. 0 1 2 3 4 D) 4 3 2 1 0
[单项选择]
窗体上有一个名为Command1的命令按钮,并有下面的程序:
Private Sub Command1_Click( )
Dim arr(5) As Integer
For k = 1 To 5
arr(k) = k
Next k
prog arr( )
For k = 1 To 5
Print arr(k);
Next k
End Sub
Sub prog(a( ) As Integer)
n = UBound(a)
For i = n To 2 step-1
For j = 1 To n-1
if a(j) < a(j+1) Then
t=a(j):a(j)=a(j+1):a(j+1)=t
End If
Next j
Next i
End Sub
程序运行时,单击命令按钮后显示的是()。
A. 1 2 3 4 5
B. 5 4 3 2 1
C. 0 1 2 3 4
D. 4 3 2 1 0