在窗体上放置了DriveListBox、DirListBox和FileListBox等三个控件,下面()语句一定不会改变相应控件的Path或Drive属性。
A.File1.FileName="a:\*.*"
B. Drive1.ListIndex=2
C. File1.Path=Drive1.Drive
D. Dir1.ListIndex=-2
A.File1.FileName="a:\*.*"
B. Drive1.ListIndex=2
C. File1.Path=Drive1.Drive
D. Dir1.ListIndex=-2
A.File1.FileName="a:\*.*"
B.Drive1.ListIndex=2
C.File1.Path=Drive1.Drive
D.Dir1.ListIndex=-2
窗体上放置有一个 TPanel类的控件Panel1,并定义了Panel1的 OnEnter事件,下面说法正确的是:
A.当鼠标移动到 Panel1 上面时产生Panel1OnEnter 事件
B.其他三项都不对
C.当Panel1 获得焦点时产生 Panel1OnEnter 事件
D.当鼠标在窗体上移动时产生 Panel1OnEnter 事件
窗体上放置有一个 TEdit类的控件Edit1,并定义了 Edit1的OnEnter 事件,下面说法正确的是:()
A.当鼠标在窗体上移动时产生 Edit1OnEnter 事件
B.其他三项都不对
C.当Edit1 获得焦点时产生 Edit10Enter事件
D.当鼠标移动到 Edit1 的上面时产生Edit1OnEnter 事件
A.CheckedListBox
B. DirListBox
C. DriveListBox
D. FileListBox
A.一个应用程序可以有多少个MDI窗体
B.子窗体可以移动MDI窗体以外
C.不可以在MDI窗体上放置按钮控件
D.MDI窗体的子窗体不可以拥有菜单
A.一个应用程序可以有多个MDI窗体
B.子窗体可以移到MDI窗体以外
C.不可以在MDI窗体上放置按钮控件
D.MDI窗体的子窗体不可以拥有菜单
在窗体上放置一个命令按钮Command1,并编写下列单击事件的程序:
Option Base1
Private Sub Command1_Click()
Dim c As Integer,d As Integer
d=0
c=6
X=Array(2,4,6,8,10,12)
For i=1 To 6
If X(i)>c Then
d=d+X(i)
c=X(i)
Else
d=d-c
End If
Next i
Print d
End Sub
程序运行后,单击命令按钮,则在窗体上输出的内容为()。
A.10
B.12
C.16
D.20
在窗体上放置一个命令按钮Command1,并编写下列单击事件的程序:
Option Base 1
Pdvate Sub Command1_Click()
Dim c As Integer,d As Integer
d=0
c=6
X=Array(2,4,6,8,10,12)
For i=1 To 6
If X(i)>c Then
d=d+X(i)
c=X(i)
Else
d=d-c
End If
Next i
Print d
End Sub
程序运行后,单击命令按钮,则在窗体上输山的结果是()。
A.10
B.12
C.16
D.20
在窗体上放置一个命令按钮Command1,并编写下列单击事件的程序: Option Base 1 Private Sub Command1_Click() Dim c As Integer,d As Integer d=0 c=6 X=Array(2,4,6,8,10,12) For i=1 To 6 If X(i)>c Then d=d+X(i) c=X(i) Else d=d-c End If Next j Print d End Sub 程序运行后,单击命令按钮,则在窗体上输出的内容为()。
A.10
B.12
C.16
D.20
为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!