某“数值提取”程序，实现如下功能：在文本框Text1中输入包含数字和其他非数字字符混合的原始数据，点击“数值提取”按钮Command1，将数据中的数字以“，”间隔输出到文本框Text2中。程序运行界面如图所示，VB代码如下。请回答以下问题：

（1）要使程序运行后，窗体Form1标题立即自动显示为“数字提取”，可在_____（单选，填字母：

A．Form_Load/

B．Form_Click/

C．Command1_Click）事件过程中添加语句Form1. Caption="数值提取"。

（2）实现上述功能的VB程序如下，请在划线处填入合适的代码。
Private Sub Command1_Click ()
Dim s As String, ch As String
Dim flag As Boolean
Dim tmp As String
dim ans As String
s = Text1. Text
s = s+ "."
tmp = ""   '存储每一组检测到的数字
ans =""    '存储最后的输出结果
flag =False
For i =1 To Len(s)
ch =Mid(s, i, 1)
If ch >= "0" And ch <= "9" Then

tmp =①_________ 

flag =True

ElseIf flag = True Then

ans= ans +tmp+ "，"

tmps = ""

②_________

End If
Next i
Text2. Text = ans
End Sub
（3）如图，若删除程序中的语句s=s+ "."，输入不变，则提取后的数字信息为_____。

双击窗体中的对象后，VB将显示的窗口是（  ）。

A．工程窗口

B．工具箱

C．属性窗口

D．代码窗口

小王所在公司从2019年1月1日起，每工作3天休息2天。为此小王编写程序，用户判断2019年的某一天是上班还是休息。具体功能如下：在文本框Text1和Text2中分别输入月和日，点击“上班还是休息”按钮Cmd1，在标签Label2中输出结果，设计界面及运行界面如下图所示。
（1）鼠标单击按钮Cmd1执行的事件处理过程名是______________ 。
（2）实现上述功能的VB程序如下，请在划线处填入合适的代码

Private Sub Cmd1_Click()
Dim mdays As String, days As Integer
Dim i As Integer, m As Integer, d As Integer
m =①_________________ 'm是当前月份信息
d = Val(Text2.Text) 'd是天的信息
mdays = "312831303130313130313031"   '2019年各个月份对应的天数
days = 0
For i = 1 To m - 1 ’前几个月份的总天数
days = days +②__________________ 
Next i
days = days + d
If days Mod 5 = 4 Or ③______________  Then
Label2.Caption = "休息"
Else
Label2.Caption = "上班"
End If
End Sub
（3）若文本框text1中输入的内容是4，文本框Text2中输入的内容为“3”,点按钮后，标签label2中显示的内容是__________。

下列关于对象的说法正确的是（  ）

A．所有对象都具有同样的属性

B．同一类的对象在一个窗体上只能出现一个

C．同一个窗体中的两个不同类的对象可以用相同的名称

D．对象的属性可以在属性窗口中修改，也可以在程序代码中修改

在 VB 中，某个对象的属性窗口如图所示：

有关这个对象的说法错误的是（   ）

A．对象名 Command2

B．所属类为按钮类 CommandButton

C．字面内容为 Command1

D．背景颜色为 H8000000F