VB编程的简单问题

[复制链接]
查看11 | 回复5 | 2011-1-24 14:38:20 | 显示全部楼层 |阅读模式
可以如下改:Private Sub Command1_Click()Dim a As String '模块级变量不能再过程内部定义a = "我"MsgBox aEnd Sub或者:Private a As String ' 公共声明部分声明模块级变量Private Sub Command1_Click()a = "我"MsgBox aEnd Sub...
回复

使用道具 举报

千问 | 2011-1-24 14:38:20 | 显示全部楼层
vb6,winxp下测试通过,不能运行也许和你的防火墙有关系比如记事本notepad.exePrivate Sub Command1_Click()Timer1.Enabled = TrueTimer1.Interval = 1000End SubPrivate Sub Timer1_Timer()Static t As ...
回复

使用道具 举报

千问 | 2011-1-24 14:38:20 | 显示全部楼层
Private Sub Command1_Click()dim a As Stringa = "我"MsgBox aEnd Sub将Private a As String改为dim a As String我上面那部分的代码就是正确的了...
回复

使用道具 举报

千问 | 2011-1-24 14:38:20 | 显示全部楼层
这样就可以了Private Sub Command1_Click()Dim a As Stringa = "我"MsgBox aEnd SubPrivate要在模块中定义而且这个不需要定义变量,直接Private Sub Command1_Click()a = "我"MsgBox aEnd Sub...
回复

使用道具 举报

千问 | 2011-1-24 14:38:20 | 显示全部楼层
直接在chick里写msgbox如Private Sub Command1_Click()MsgBox "我"End Sub...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行