在表单FORM1中有一个文本框TEXT1,TEXT1的INIT事

题目

在表单FORM1中有一个文本框TEXT1,TEXT1的INIT事件代码如下:THIS.VALUE=0TEXT1的VALID事件代码如下:S=0FORi=1TOTHIS.VALUEIFi%5=0S=S+iENDIFENDFORTHIS.VALUE=S在TEXT1中输入22,然后按回车键,TEXT1中将显示()。

  • A、0
  • B、22
  • C、50
  • D、100
参考答案和解析
正确答案:C
如果没有搜索结果或未解决您的问题,请直接 联系老师 获取答案。
相似问题和答案

第1题:

在表单中有命令按钮Commandl和文本框Text1,将文本框的InputMask属性值设置为$9,999.9,然后在命令按钮的Click事件中输入代码ThisForm.Text1.Value=123456.789,当运行表单时,单击命令按钮,此时文本框中显示的内容为______。

A.$123456.789

B.$23456.7

C.123456.7

D.**,***.*


正确答案:D

第2题:

在名为Form1的窗体上添加三个文本框和一个命令按钮,其名称分别为Text1、Text2、Text3和Command1,然后编写如下两个事件过程: Private Sub Command1_Click() Text3=Textl+1Text2 End Sub private Sub Form1_Load() Text1="" Text2="" Text3="" End Sub 打开窗体Form1后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7,然后单击命令按钮Command1,则文本框(Text3)中显示的内容为( )。

A.57

B.12

C.5

D.出错


正确答案:A

第3题:

在窗体上画一个文本框(其Name属性为Text1),然后编写如下事件过程:

Private Sub Form_Load()

Text1.Text=""

Text1.SetFocus

For i=1 To 9

Sum=Sum=i

Next i

Text1.Text=Sum

End Sub

上述程序的运行结果是

A.在文本框Text1中输出45

B.在文本框Text1中输出0

C. 出错

D. 在文本框Text1中输出不定值


正确答案:C
解析:由于Form_load事件是在窗体加载时发生,所以此时窗体还没有显示,不能用“Text1.SetFocus”语句获得焦点,故出错。如要改正,需要在此语句前加入“Me.Show”,显示窗体,则可以看到文本框已获得焦点,并执行循环语句,输出“45”。

第4题:

在窗体上有若干控件,其中有一个名称为Text1文本框。影响Text1的Tab顺序的属性是 ______。

A.TabIndex

B.TabStop

C.Enabled

D.Visible


正确答案:A
解析:Tabindex属性决定了按Tab键时,焦点在各个控件移动的顺序。TabStop用于返回或设置一个值,该值用来指示是否能够使用TAB键来将焦点从一个对象移动到另一个对象。当设置此属性为False,则使用Tab键移到此控件时会自动跳到下一个TabIndex属性值的控件。Enabled属性决定控件是否允许操作。Visible属性决定控件是否可见。

第5题:

在名为“Form1”的窗体上添加3个文本框和一个命令按钮,其名称分别为“Text1”、“Text2”、“Text3”和“Command1”,然后编写如下两个事件过程:

Private Sub Commandl Click()

Text3=Text1+Text2

End Sub

Private Sub Form1 Load()

Text1=" "

Text2=" "

Text3=" "

End Sub

打开窗体Form1后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7,然后单击命令按钮Command1,则文本框(Text3)中显示的内容为【 】。


正确答案:57
57 解析:本题考查对“+”的理解。在VBA中,“+”既可以用作数学运算符,也可以用来连接字符串。题目程序实现将两个文本框中字符串进行连接,然后在第3个文本框中显示,所以应该是57,在连接字符串方面,“+”和“&”是相同的功能,但“&”只能用来连接字符串,而不能进行数学运算。命令按钮 Commandl的Click事件是:Text3=Text1+Text2是将文本框Text1和Text2的内容进行连接后显示在Text3文本框中,窗体Form1的Load事件是将3个文本框的内容清空。当在文本框中输入内容后,单击命令按钮来触发其Click事件,完成两个字符串的连接。

第6题:

( 17 )设窗体中有一个文本框 Text1 ,若在程序中执行了 Text1.SetFocus ,则触发

A ) Text1 的 SetFocus 事件

B ) Text1 的 GotFocus 事件

C ) Text1 的 LostFocus 事件

D )窗体的 GotFocus 事件


正确答案:B

第7题:

以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组,然后画一个名为Text2的文本框和名为Command1的命令按钮。运行时在文本框数组中输入7个分数,单击“计算得分”命令按钮,则最后得分显示在Text2文本框中(去掉一个最高分和一个最低分后的平均分即为最后得分),如图所示。请填空。

Private Sub Command1_Click( )

Dim k As Integer

Dim sum As Single, max As Single, min As Single

sum = Text1(0)

max = Text1(0)

min = ______

For k = ______ To 6

If max < Text1(k) Then

max = Text1(k)

End If

If min > Text1(k) Then

min = Text1(k)

End If

sum = sum + Text1(k)

Next k

Text2 = (______) / 5


正确答案:

 text1(0) 1 (sum-max-min)

第8题:

在窗体上有若干控件,其中有一个名称为Text1的文本框。影响Text1的Tab顺序的属性是( )。

A.TabStop

B.Enabled

C.Visible

D.Tablndex


正确答案:D

第9题:

假定一个文本框的name属性为text1,为了在该文本框中显示“hello”,所使用的语句可写为text1“hello“。()

此题为判断题(对,错)。


正确答案:正确

第10题:

在窗体上画一个文本框(其NAME属性为TExT1),然后编写如下事件过程: PRIVATE SUB FORM_LOAD( ) DIM SUM TEXT1="" FOR I=1 TO 10 SUM=SUM+I NEXT I TEXT1=SUM END SUB上述程序的运行结果是( )。

A.在文本框TEXT1中输出55

B.在文本框TEXT1中输出0

C.出错

D.在文本框TEXT1中输出不定值


正确答案:A
解析:循环完成1到10的求和,循环结束后,系统将求和结果送给了文本框TEXT1,故文本框TEXT1中输出55。

更多相关问题