找回密码
 注册
搜索
热搜: 回贴
  • 前程无忧官网首页 有什么好的平台可以
  • 最新的销售平台 互联网营销的平台有哪
  • 制作网页的基本流程 网页制作和网页设
  • 【帝国CMS】输出带序号的列表(数字排
  • 网站建设公司 三一,中联,极东泵车的
  • 织梦 建站 织梦网站模版后台怎么更改
  • 云服务官网 哪些网站有免费的简历模板
  • 如何建网站要什么条件 建网站要用什么
  • 吉林市移动公司电话 吉林省退休人员网
  • 设计类毕业论文 网站设计与实现毕业论
查看: 320|回复: 8

有问题一定帮忙

[复制链接]
发表于 2009-10-29 01:25:50 | 显示全部楼层 |阅读模式 IP:江苏扬州
创建一应用程序,当单击左边的按钮时,左边按钮显示为"显示",右边按钮显示为"单击我",文档框中显示"你单击的是左边的按钮",文本框的背景颜色变为橙色。当单击右边的按钮时,右边按钮显示为" 单击我",左边按
钮显示为"显示",文本框中显示"你单击的是右边的按钮",文本框的背景颜色变为黄色。

这是我自己编写的程序,但是由于我是新手所以我在 当单击左边的按钮时,左边按钮显示为"显示"和当单击右边的按钮时,右边按钮显示为" 单击我",左边按钮显示为"显示"这两种按钮相互转换时不知道如何下手了.请个位高手指点指点,我在这里先表示感谢.
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnshow.Click
TextB.Text = "你单击的是左边的按钮"
TextB.BackColor = Color.Orange
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnshow1.Click
TextB.Text = "你单击的是右边的按钮"
TextB.BackColor = Color.Red
End Sub
End Class
发表于 2009-10-29 01:25:51 | 显示全部楼层 IP:江苏扬州
我来帮你看看吧
回复

使用道具 举报

发表于 2009-10-29 01:25:52 | 显示全部楼层 IP:江苏扬州
说明:
首先,设置窗体刚刚显示时按钮的名称,然后每次点击都改变一下
回复

使用道具 举报

发表于 2009-10-29 01:25:53 | 显示全部楼层 IP:江苏扬州
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

TextB.Text = "你单击的是左边的按钮"
TextB.BackColor = Color.Orange
Button2.Text = "显示"
Button1.Text = "单击我"

End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
TextB.Text = "你单击的是右边的按钮"
TextB.BackColor = Color.Red
Button1.Text = "显示"
Button2.Text = "单击我"
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Button1.Text = "显示"
Button2.Text = "单击我"
End Sub
回复

使用道具 举报

发表于 2009-10-29 01:25:54 | 显示全部楼层 IP:江苏扬州
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
button1.Text = "显示"
TextB.Text = "你点击的是左边的按钮"
TextB.BackColor = Color.Orange
button2.Text = "点击我"
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
button1.Text = "点击我"
TextB.Text = "你点击的是右边的按钮"
TextB.BackColor = Color.Yellow
button2.Text = "显示"
End Sub

End Class
这是我经过你们的指点做出来的 结果是正确的 谢谢你们啊
回复

使用道具 举报

发表于 2009-10-29 01:25:55 | 显示全部楼层 IP:江苏扬州
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Button1.Text = "显示"
Button2.Text = "单击我"
这段程序是什么意思啊
回复

使用道具 举报

发表于 2009-10-29 01:25:56 | 显示全部楼层 IP:江苏扬州
不好意思啊,没有看到你发的贴,刚刚看到

恭喜问题已经解决
回复

使用道具 举报

发表于 2009-11-20 07:05:05 | 显示全部楼层 IP:香港
加油!在奥斯卡上一连拿了11个奖项的好帖
回复

使用道具 举报

发表于 2009-12-31 07:05:04 | 显示全部楼层 IP:巴基斯坦
到你的~~贴吧收藏~~~我的发言~`找
回复

使用道具 举报

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

本版积分规则

QQ|小黑屋|最新主题|手机版|微赢网络技术论坛 ( 苏ICP备08020429号 )

GMT+8, 2024-9-29 13:24 , Processed in 0.153046 second(s), 14 queries , Gzip On, MemCache On.

Powered by Discuz! X3.5

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表