在表单中加入两个命令按钮:Command1和Command2,编写Command1的Click事件代码如下ThisForm.Parent.Command2.Enabled=.F.,则单击按钮Command1后,执行命令()。A、Command1命令按钮不能激活B、Command2命令按钮不能激活C、事件代码无法执行D、命令按钮组中第二个命令按钮不能激活

题目

在表单中加入两个命令按钮:Command1和Command2,编写Command1的Click事件代码如下ThisForm.Parent.Command2.Enabled=.F.,则单击按钮Command1后,执行命令()。

  • A、Command1命令按钮不能激活
  • B、Command2命令按钮不能激活
  • C、事件代码无法执行
  • D、命令按钮组中第二个命令按钮不能激活
如果没有搜索结果或未解决您的问题,请直接 联系老师 获取答案。
相似问题和答案

第1题:

创建一个窗体,在该窗体中建立两个按钮,分别命名为Command1和Command2。下列程序代码用于实现以下功能:单击命令按钮Command1后,按钮Command1变为不可用,而Cmmnand2设置为可用。请填空。

Private Sub Command1_ Click()

Command1.______ = False

Command1.______ = True

End Sub


正确答案:Enable Enable
Enable , Enable

第2题:

假设一个表单里有一个文本框Text1和一个命令按钮组CommandGroup1,命令按钮组中包含Command1和Command2;两个命令按钮。如果要在Command1命令按钮的某个方法中访问文本框的Value属性值,下列式子中,正确的是

A.ThisForm.Text1.Value

B.ThisForm.Parent.Value

C.Parent.Text1.Value

D.This.Parent.Text1.Value


正确答案:A
解析:在VisualFoxPro中,Parent所指的是当前对象的直接容器对象,当前对象的关键字是This,当前对象所在的表单的关键字为ThisForm。

第3题:

某表单上有两个命令按钮Command1和Command2。要求:(1)若单击Command1命令按钮,程序将当前表的记录指针上移一位,并刷新表单中所有的值;其中,若指针已处于文件的首记录,则将其自身(Command1命令按钮)设置为不能被激活状态。(2)若单击Command2命令按钮,程序将当前表的记录指针下移一位,并刷新表单中所有的值;其中,若指针已处于文件的末记录,则将其自身(Command2命令按钮)设置为不能被激活状态。


正确答案:编写CommaNd1的Click事件代码如下: ThisForm. Command2. Enabled= .T. SKIP —1 IF BOF() GO TOP This. Enabled=.F. ENDIF ThisForm. Refresh Command2的Click事件代码如下: ThisForm. Command1. Enabled. =.T. SKIP IF EOF() GO BOTTOM This. Enabled=.F. ENDIF ThisForm. Refres
编写CommaNd1的Click事件代码如下: ThisForm. Command2. Enabled= .T. SKIP —1 IF BOF() GO TOP This. Enabled=.F. ENDIF ThisForm. Refresh Command2的Click事件代码如下: ThisForm. Command1. Enabled. =.T. SKIP IF EOF() GO BOTTOM This. Enabled=.F. ENDIF ThisForm. Refres

第4题:

在窗体中添加名称为Command1和名称为Command2的命令按钮以及文本框Text1,然后编写如下代码: Private Sub Command1 Click() Text1.Text="AB" End Sub Private Sub Command2 Click() Text1.Text="CD" End Sub 首先单击Command1按钮,然后再单击Command2按钮,在文本框中显示

A.AB

B.CD

C.ABCD

D.CDAB


正确答案:B
解析:本题意在考查考生对文本框Text的理解。当单击Command1时,Text1的Text变为AB;当单击Command2时,Text1的属性变为CD,故选择B,不能选C,更不能选D。

第5题:

在窗体中有一个名为(Command1的命令按钮,Click事件的代码如下:

单击命令按钮后,标签显示的结果是( )。


正确答案:25
25

第6题:

单击命令按钮Command1必将调用已写在()事件中的代码。

A.LostFocus

B.KeyPress

C.Dbclick

D.Click


正确答案:D

第7题:

在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1),并在命令按钮中编写如下事件代码: Private Sub Command1_Click() m=2.17 n=Len(Str$(m)+Space(5)) Me!Text1=n End Sub 打开窗体运行后,单击命令按钮,在文本框中显示______。

A.5

B.8

C.9

D.10


正确答案:D
解析:程序中“n=Len(Str$(m)+Space(5))”的含义是算出字符串总长度,当把正数转换成字符串时,Str$函数在字符串前面留有一个空格,Space(数值表达式),则返回由数值表达式确定的空格个数组成的空字符串。 Str$(m)表示5个字符串,Space(5)表示5个字符串,所以n等于10。

第8题:

在窗体中添加名称为Command1和名称为Command2的命令按钮以及文本框Text1,然后编写如下代码:Private sub Command1_Click() Text1.text="AB"End SubPrivate Sub Command2_Click() Text1.Text="CD"End Sub 首先单击Command1按钮,然后再单击Command2按钮,在文本框中显示 。A.AB B.CD C.ABCD D.CDAB


正确答案:B
【解析】本题意在考查考生对文本框Text的理解。当单击Command1时,Text1的Text变为AB;当单击Command2时,Text1的属性变为CD,故选择B,不能选C,更不能选D。

第9题:

假定一个表单里有一个文本框Text l和一个命令按钮组CommandGroup1。命令按钮组是一个容器对象,其中包含Command1和Command2两个命令按钮。如果要在Command1命令按钮的某个方法中访问文本框的Value属性值,正确的表达式是( )。

A.This.ThisForm.Text1.alue

B.This.Parent.Parent.Text1.Value

C.Parent.Parent.Text1.Value

D.This.Parent.Text1.Value


正确答案:B
解析:我们知道,在文件系统的层次目录结构中,要标识一个文件,单用文件名往往是不够的,一般还要指明文件的位置,即目录路径。类似地,在对象的嵌套层次关系中,要引用其中的某个对象,也需要指明对象在嵌套层次中的位置。因为命令按钮组是一个容器对象,所以This.Parent表示按钮组,This.Parent.Parent表示表单,所以正确的表达式是选项B)。

第10题:

在窗体中有一个标签Lb1和一个命令按钮Command1,事件代码如下:

Option Compare Database

Dim a As String*10

Private Sub Command1 Click()

a="1234"

b=Len(A)

Me.Lb1.Caption=b

End Sub

打开窗体后单击命令按钮,窗体中显示的内容是( )。

A.4

B.5

C.10

D.40


正确答案:C
解析:本题考查VBA中定长字符串的知识。当声明一个变量为String类型时,如果不加长度说明,则为变长字符串;如果加上长度说明,则为定长字符串。定长字符串变量无论给它赋予何值,长度都为初始声明时指定的长度。由于声明a的长度为10,故Len(a)=10。

更多相关问题