一个关于变量调用的问题
Option Explicit
Public m
Private 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 If
End Sub
Private Sub Form_Load()
Dim m
Dim x, i
x = Array( "星期一 ", "星期二 ", "星期三 ", "星期四 ", "星期五 ", "星期六 ", "星期天 ")
For i = 0 To UBound(x)
C1.AddItem x(i)
Next
m = MsgBox( "不闻不问的 ", 1, "按钮 ")
Text1.Text = m
End Sub
变量m 如何Sub C1_click()中使用,请个位帮忙解决一下,在下多谢了!!
[解决办法]
你把Private Sub Form_Load()中
Dim m
去掉
或者,改一个名