一个关于变量调用的问题

Question

Option Explicit
Public mPrivate Sub C1_click()
If C1.Text = "星期二" Then
T1.Text = "今天是个大晴天！"
End If
If C1.Text = "星期六" Then
T1.Text = "今天要下雨了！"
End If
If C1.Text = "星期三 " Then
T1.Text = m
End IfEnd SubPrivate Sub Form_Load()
Dim m
Dim x, ix = Array("星期一", "星期二", "星期三", "星期四", "星期五", "星期六", "星期天")
For i = 0 To UBound(x)
C1.AddItem x(i)
Next
m = MsgBox("不闻不问的", 1, "按钮")
Text1.Text = mEnd Sub
变量m 如何Sub C1_click()中使用，请个位帮忙解决一下，在下多谢了！！

Answer 1

你把Private Sub Form_Load()中
Dim m
去掉
或者,改一个名

Answer 2

Private Sub Form_Load()' Dim m       m已经定义，删除此行代码Dim x, ix = Array("星期一", "星期二", "星期三", "星期四", "星期五", "星期六", "星期天")
For i = 0 To UBound(x)
C1.AddItem x(i)
Next
m = MsgBox("不闻不问的", 1, "按钮")
Text1.Text = mEnd Sub