EXCEL2007中VB的问题,请教各位高手了,进来看看嘛!
小弟我跟到VB视频上的操作来做:1.添加窗体2.更改属性3.编写代码。代码如下:PrivateSubCommandButton1_Click()CommandButton...
小弟我跟到VB视频上的操作来做:
1.添加窗体
2.更改属性
3.编写代码。代码如下:
Private Sub CommandButton1_Click()
CommandButton1.Visible = False
TextBox1.Visible = False
Label1.Visible = False
Label2.Visible = Ture
Label2.AutoSize = True
Label2.Font = "黑体"
Label2.ForeColor = vbRed
Label2.Caption = TextBox1.Text & "同学,欢迎您!"
CommandButton2.Visible = True
CommandButton3.Visible = True
End Sub
Private Sub CommandButton2_Click()
CommandButton2.Visible = False
CommandButton3.Visible = False
Label1.Visible = Ture
Label2.Visible = False
CommandButton1.Visible = Ture
TextBox1.Text = ""
TextBox1.Visible = Ture
End Sub
Private Sub CommandButton3_Click()
End
End Sub
但是为什么运行代码后,Label2中不显示“某某同学,欢迎您!”,只有一个继续和结束的按钮,并且点击继续按钮没有任何反应了?我是按照视频上一模一样做的,属性值都是设置对了的。第一次接触VB,确实不了解,是不是EXCEL2007中包含的VB和单独使用的VB软件不一样呀? 展开
1.添加窗体
2.更改属性
3.编写代码。代码如下:
Private Sub CommandButton1_Click()
CommandButton1.Visible = False
TextBox1.Visible = False
Label1.Visible = False
Label2.Visible = Ture
Label2.AutoSize = True
Label2.Font = "黑体"
Label2.ForeColor = vbRed
Label2.Caption = TextBox1.Text & "同学,欢迎您!"
CommandButton2.Visible = True
CommandButton3.Visible = True
End Sub
Private Sub CommandButton2_Click()
CommandButton2.Visible = False
CommandButton3.Visible = False
Label1.Visible = Ture
Label2.Visible = False
CommandButton1.Visible = Ture
TextBox1.Text = ""
TextBox1.Visible = Ture
End Sub
Private Sub CommandButton3_Click()
End
End Sub
但是为什么运行代码后,Label2中不显示“某某同学,欢迎您!”,只有一个继续和结束的按钮,并且点击继续按钮没有任何反应了?我是按照视频上一模一样做的,属性值都是设置对了的。第一次接触VB,确实不了解,是不是EXCEL2007中包含的VB和单独使用的VB软件不一样呀? 展开
4个回答
展开全部
excel里面的vb叫vba是vb的一个子集.只有部分vb功能. 如果你要学习vb可以下载个vb6安装学习.
上面的代码是没有问题的.
上面的代码是没有问题的.
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
把这句去掉试试:
Label2.Visible = Ture
Label2.Visible = Ture
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
按钮CommandButton1中
Label2.Visible = Ture 这里可见属性写错了,应该是True
按钮CommandButton2中
CommandButton1.Visible = Ture 这里又写错了,应该是True
TextBox1.Visible = Ture 这里你还是写错了,应该是True
Label2.Visible = Ture 这里可见属性写错了,应该是True
按钮CommandButton2中
CommandButton1.Visible = Ture 这里又写错了,应该是True
TextBox1.Visible = Ture 这里你还是写错了,应该是True
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询