VB中文本框隐藏的代码是什么

比如说有一个命令按钮,点击它所触发的事件是隐藏文本框,代码应该怎么写,不设置属性。。。。。。... 比如说有一个命令按钮,点击它所触发的事件是隐藏文本框,代码应该怎么写,不设置属性。。。。。。 展开
 我来答
四舍五不入6
高粉答主

2020-03-19 · 醉心答题,欢迎关注
知道答主
回答量:147
采纳率:100%
帮助的人:2.2万
展开全部

可以参考下面的代码:

Private Sub Command1_Click()

Text1.Visible = False

End Sub

说明:

要在启动时隐藏一个对象,在设计时将 Visible 属性设置为 False。在代码中设置该属性能够在运行时隐藏然后又重新显示控件以响应某特别事件。

扩展资料:

相关参考函数

InputBox 函数: 在对话框中显示提示信息,等待用户输入文本或者单击按钮,并返回文本框的内容。 

InStr 函数: 返回一个字符串在另一个字符串中第一次出现的位置。 

InStrRev 函数: 返回一个字符串在另一个字符串中出现的位置,是从字符串的末尾算起。 

Int 函数 :返回数的整数部分。 

参考资料来源:百度百科-Visual Basic

果果就是爱生活
高能答主

2020-02-11 · 专注生活教育知识分享
果果就是爱生活
采纳数:2071 获赞数:272264

向TA提问 私信TA
展开全部

text1.visible=false

vb6.0中将文本框隐藏只需要在设计中将文本框的Visible 属性设置为False,或在运行代码中赋值为False。

代码实例:

Private Sub Command1_Click()

    Text1.Visible = False

End Sub

扩展资料:

1、MultiLine属性

把MultiLine属性设为Ture,可以使文本框在运行时接收或显示多行文本。如果没有水平方向的滚动条(ScrollBar),文本框中的文本会自动按字换行。自动按字换行省去用户在行尾插入换行符的麻烦。当一行文本超出文本框所能显示的长度时,会自动将文本换行显示。

2、ScrollBar属性

设置文本框是否具有垂直或水平滚动条。其值包括:

0-None(默认),没有滚动条。

1-Horizontal,有水平滚动条。

2-Vertical,有垂直滚动条。

3-Both,同时有水平和垂直滚动条。

注意:在设置ScrollBar属性为1~3时,有效的前提是Multiline属性必须为Ture。

本回答被网友采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
zdingyun
推荐于2017-09-22 · 知道合伙人软件行家
zdingyun
知道合伙人软件行家
采纳数:15429 获赞数:48174
1982年上海业余工业大学化工系毕业 现退休

向TA提问 私信TA
展开全部

vb6.0中将文本框隐藏只需在设计中将文本框的Visible 属性设置为False,或在运行代码中赋值为False。

具体运行代码实例:

Private Sub Command1_Click()
    Text1.Visible = False
End Sub

Visible 属性,返回或设置一指示对象为可见或隐藏的值。

说明:


要在启动时隐藏一个对象,在设计时将 Visible 属性设置为 False。在代码中设置该属性能够在运行时隐藏然后又重新显示控件以响应某特别事件。

已赞过 已踩过<
你对这个回答的评价是?
评论 收起
帐号已注销
2008-08-04 · TA获得超过1257个赞
知道小有建树答主
回答量:1748
采纳率:0%
帮助的人:1204万
展开全部
'//设按钮名为Command1,文本框名为Text1
Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Private Const SW_HIDE = 0
Private Const SW_NORMAL = 1
Private Sub Command1_Click()
ShowWindow Text1.hwnd, SW_HIDE
'//如果想显示它,则用
'ShowWindow Text1.hwnd, SW_NORMAL
End Sub
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
nineng789
2008-08-04 · TA获得超过446个赞
知道小有建树答主
回答量:680
采纳率:0%
帮助的人:673万
展开全部
text1.Visible = false
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(6)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

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

类别

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

说明

0/200

提交
取消

辅 助

模 式