某对象的一个事件过程代码如下：下列说法正确的是(　　)PrivateSubObj_Click()　　s=s+1　　Text.Text=Str(s)EndSubA_刷题宝

题干

某对象的一个事件过程代码如下：下列说法正确的是(　　)
Private Sub Obj_Click()
　　s=s+1
　　Text.Text=Str(s)
End Sub

A．该过程的过程名为“Obj”	B．该事件是一个“单击”事件
C．该对象的对象名为“Obj_Click”	D．该对象的类名为“Sub”

上一题下一题 0.99难度选择题更新时间:2020-02-11 10:22:43

答案(点此获取答案解析）

同类题1

数学上把2，4，8，16等数称为2的幂次方。编写程序，实现如下功能：在文本框Text1中输入一个正整数n，单击“查找”按钮，找到一个2的幂次方，使其与n之差的绝对值最小，并在标签框 Label1中输出。如果找到两个同时满足条件的幂次方，则输出较小的。程序运行界面如图所示。

（1）要使程序运行时，标签框Labell的ForeColor属性值为vbRed，可在Form_Load事件处理过程中添加语句___________（单选，填字母：

A．Label1. ForeColor= vbRed/

B．Labell. vbRed= ForeColor/

C．Fore Color. Label1=vbRed）。

（2）实现上述功能的VB程序如下，请在画线处填入合适的代码。
Private Sub Command 1_ Click()

Dim n As Long, sum As Long, ans As Long

n= Val(Textl. Text)

sum=1

Do While sum <n

____________

Loop

If n =sum Then

ans=sum
ElseIf ___________Then
ans=sum/2
Else
ans =sum
End If
Label 1. Caption = Str(ans)
End Sub
（3）若文本框Text1中输入的内容为“24”，单击“查找”按钮，标签框 Label l中显示的内容是______________________。

同类题2

一个VB工程的部分设计界面如图所示。下列说法不正确的是(　　)

①工程文件名是“工程1.vbp” ②该工程只有1个窗体
③窗体文件名是“Form.frm” ④窗体名称是“寻找水仙花数”

同类题3

小明利用Visual Basic编写了“查找第二小的数”的程序，界面如图所示。程序随机产生50个范围在1～1000之间的随机整数，单击“查找”按钮，能够在标签Label1中显示第二小的数字。

(1)为了在列表框List1中加入随机产生的数字，小明在程序中写了语句“List1.AddItem Str(a(i))”，其中AddItem 是List1对象的__________(单选，填字母:

C．方法）。

(2)实现上述功能的VB程序如下，请在划线处填入合适的代码。
Private Sub Command1_Click()
Dim n As Integer, i As Integer
Dim a(1 To 50) As Integer
Randomize
For i = 1 To 50
①___________
List1.AddItem Str(a(i))
Next i
If a(1) < a(2) Then

firstmin = a(1)

secondmin = a(2)

firstmin = a(2)

secondmin = a(1)

End If
For i = 3 To 50
If a(i) < secondmin Then

②___________

secondmin = firstmin
firstmin = a(i)
Else
③____________
End If

End If

Next i
Label1.Caption = "第二小的数是" & Str(secondmin)
End Sub

同类题4

12 Python语言语句块的标记是( )

同类题5

在 VB 中，在窗体 From1 标题中显示"云富高中"，应改变的属性是（）

相关知识点