求一个vb6.0中灰常简单的程序代码!!!

程序要求如下:在窗体上创建一个文本框控件,两个命令按钮控件,命令按钮控件的标题分别设置为“隐藏”和“退出”。单击“隐藏”按钮后文本框消失,该按钮变成“显示”,单击“显示”... 程序要求如下:在窗体上创建一个文本框控件,两个命令按钮控件,命令按钮控件的标题分别设置为“隐藏”和“退出”。单击“隐藏”按钮后文本框消失,该按钮变成“显示”,单击“显示”按钮显示出文本框。该按钮为“隐藏/显示”的切换,单击“退出”结束本程序。。。
求这个简单程序的编写代码!!求大大帮忙啊,分实在不多了 对不住了!!!
展开
 我来答
百度网友2ca1c0f24
2011-03-25 · TA获得超过2036个赞
知道大有可为答主
回答量:4364
采纳率:0%
帮助的人:3415万
展开全部
Private Sub Command1_Click()
If Command1.Caption = "隐藏" Then
Text1.Visible = False
Command1.Caption = "显示"
ElseIf Command1.Caption = "显示" Then
Text1.Visible = True
Command1.Caption = "隐藏"
End If
End Sub

Private Sub Command2_Click()
End
End Sub

Private Sub Form_Load()
Text1.Visible = True
Command1.Caption = "隐藏"
End Sub
麦兜Terran
2011-03-25 · TA获得超过2571个赞
知道小有建树答主
回答量:1786
采纳率:0%
帮助的人:1162万
展开全部
Private Sub Command1_Click()
If Command1.Caption = "显示" Then Text1.Visible = 1: Command1.Caption = "隐藏" Else Text1.Visible = 0: Command1.Caption = "显示"
End Sub
Private Sub Form_Load()
Command1.Caption = "隐藏"
End Sub
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
知道答题高手
2011-03-26 · TA获得超过286个赞
知道答主
回答量:66
采纳率:0%
帮助的人:0
展开全部
Private Sub Command1_Click()
If Text1.Visible = True Then
Text1.Visible = False
Command1.Caption = "显示"
Else
Text1.Visible = True
Command1.Caption = "隐藏"
End If
End Sub

Private Sub Command2_Click()
End
End Sub

Private Sub Form_Load()
Command1.Caption = "隐藏"
Command2.Caption = "退出"
End Sub
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
爱问西瓜爱答树
2011-03-25 · TA获得超过1760个赞
知道小有建树答主
回答量:890
采纳率:50%
帮助的人:289万
展开全部
其实你完全可以自己看vb系统自带的对象浏览器,按F8调出来。根据你自己的对象(文本框text)查看相关的属性,然后写代码修改即可,如果有必要,建议你还是参照二楼的代码。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
杂智识
2011-03-25 · 遇到好的专业知识,就会发上来大家一起学习
杂智识
采纳数:54 获赞数:357

向TA提问 私信TA
展开全部
第一个按钮text.visible=true
第二个按钮text.visible=false
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(3)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式