首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

一个关于变量调用的有关问题

2012-01-06 
一个关于变量调用的问题OptionExplicitPublicmPrivateSubC1_click()IfC1.Text星期二 ThenT1.Text今天

一个关于变量调用的问题
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
去掉
或者,改一个名

热点排行