更多"窗体上画了两个按钮Command1和Command2,有如下程序: "的相关试题:
[单项选择]窗体上画了两个按钮按钮Command1和Command2,有如下程序:
Private Sub Command1_Click( )
Print "Visual";
End Sub
Private Sub Command2_Click( )
Print "Basic";
End Sub
Private Sub Form_Load( )
Command2.Cancel = True
Command1.Cancel = True
End Sub
执行程序后,按键盘Cancel键,在窗体上输出结果是________。
A. Basic
B. Visual
C. Cancel
D. True
[单项选择]在窗体上画了两个按钮控件Command1和Command2,有如下程序:
Private Sub Command1_Click( )
Print "Visual";
End Sub
Private Sub Command2_Click( )
Print "Basic";
End Sub
Private Sub Form_Load( )
Command2.Cancel=True
Command1.Cancel=True
End Sub
执行程序后,按键盘Cancel键,在窗体上输出的结果是
A. Basic
B. Visual
C. Cancel
D. True
[单项选择]
在窗体上画了两个按钮控件Command1和Command2,有如下程序:
Private Sub Command1_Click( )
Print "Visual";
End Sub
Private Sub Command2_Click( )
Print "Basic";
End Sub
Private Sub Form_Load( )
Command2.Cancel=True
Command1.Cancel=True
End Sub
执行程序后,按键盘Cancel键,在窗体上输出的结果是()
A. Basic
B. Visual
C. Cancel
D. True
[单项选择]窗体上有Command1、Command2两个命令按钮。现编写以下程序:
Option Base 0
Dim a( ) As Integer, in As Integer
Private Sub Command1_Click( )
m=InputBox("请输入一个正整数")
ReDim a(m)
End Sub
Private Sub Command2_Click( )
In=InputBox("请输入一个正整数")
ReDim a(m)
End Sub
运行程序,单击Command1后输入整数10,再单击Command2后输入整数5,则数组a中元素的个数是
A. 5
B. 6
C. 10
D. 11
[单项选择]在窗体上画两个命令按钮,名称分别为Command1、Command2,并编写如下程序:
Const n=5, m=4
Dim a(m,n)
Private Sub Command1_Click( )
K=1
For i=1 To m
For j=1 To n
a(i,j)=k
k=k+1
Next j
Next i
End Sub
Private Sub Command2_Click( )
Summ=0
For i=1 To m
For j=1 To n
If i=1 Or i=m Then
Summ=summ+a(i,j)
Else
If j=i Or j=n Then
Summ=summ+a(i,j)
End If
End If
Next j
Next i
Print summ
End Sub
过程Command1_Click( )的作用是在二维数组a中存放一个m行n列的矩阵,过程Command2_Click( )的作用是
A. 计算矩阵外围一圈元素的累加和
B. 计算矩阵除外一圈以外的所有元素的累加和
C. 计算矩阵第一列和最后一列元素的累加和
D. 计算矩阵第一行和最后一行元素的累加和
[填空题]在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程:
Private Sub Form_Click( )
Text1.Text=“VB程序设计”
End Sub
PrivmeSubText1_Change( )
Picture1.Print"VB Programming"
End Sub
程序运行后,单击窗体,则在文本框中显示的内容是 【7】 ,而在图片框中显示的内容是 【8】 。
[单项选择]在窗体上画一个文本框和一个列表框,然后编写如下两个事件过程:
Private Sub Form_Load( )
List1.Addltem "357"
List1.Addltem "246"
List1.Addltem "123"
List1.AddItem "456"
Text1.Text = ""
End Sub
Private Sub Listl_DblClick0
m=List1.Text
Print m + Text1.Text
End Sub
程序运行后,在文本框中输入“123”,然后双击列表框中的“456”,输出结果为( )。
A. 1245
B. 456123
C. 123456
D. 0
[填空题]
在窗体上绘制一个文本框和一个图片框,然后编写如下两个事件过程:
Private Sub
Form_Click( )
Text1.Text="VB程序设计"
End
Sub
Private Sub Text1_Change( )
Picmml.Print"VBProgramming"
End Sub
程序运行后,单击窗体,则在文本框中显示的内容 [9] ,而在图片框中显示的内容是 [10]
。
[填空题]在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程:
Private Sub Form_Click( )
Text1.Text=“VB程序设计”
End Sub
PrivmeSubText1_Change( )
Picture1.Print"VB Programming"
End Sub
程序运行后,单击窗体,则在文本框中显示的内容是 【7】 ,而在图片框中显示的内容是 【8】 。
[单项选择]在窗体上画一个列表框、一个文本框及一个按钮,然后编写如下两个事件过程:
Private Sub Form_Load( )
For i=1 To 10
List1.AddItem i * 10
Next i
Text1.Text=" "
End Sub
Private Sub List1_Click( )
Print List1.Text + Text1.Text
End Sub
程序运行后,在文本框中输入“123”,然后双击列表框中的第四行,则在窗体上输出的结果为
A. 40123
B. 163
C. 123
D. 30123