mdsk.net
当前位置:首页 >> VB中如何在文本框内输入文字的同时,在标签上显示... >>

VB中如何在文本框内输入文字的同时,在标签上显示...

text1.passwordchar = "*" sub command1_click() label1.caption =text1.text end sub 这是让标签显示你输入的密码明文。是这意思么,不是还可以 sub command1_click() label1.caption = string("*",len(text1.text)) end sub 文本框里有几个*号...

先假设条件为:窗体一名称为Form1,其中文本框为text1;窗体二名称为Form2,其中文本框为text1. 窗体一上面的代码为: private Sub Text1_Change() ‘注意这里是change Form3.Label1.Caption = Form3.Label1.Caption & Text1.Text end Sub 窗体二...

text1 = "姓名" & " " & "年龄" & " " & "身高" 中间的“ ”表示中间间距,如果认为太短,可以再加几个空格

设text2的MultiLine为true scrollbars属性加滚动条 Private Sub Cmd1_Click() text2.Text = Text2.Text + vbCrLf + Text1.Text End Sub

用change事件啊,只要检测到输入就给第二个文本框赋值

Private Sub Command1_Click() CommonDialog1.Flags = 3 '设置Flags属性值 CommonDialog1.Action = 4 '调用"字体"对话框 If CommonDialog1.FontName "" Then Text1.FontName = CommonDialog1.FontName '为字体赋值 Text1.FontSize = CommonDialo...

我做一个,有一个text,2个button,你自己再改,PrivateSubCommand1_Click()Text1.Locked=FalseText1.Text=""Text1.Text="com1"Text1.Locked=TrueEndSubPrivateSubCommand2_Click()Text1.Locked=FalseText1.Text=""Text1.Text="com2"Text1.Locked=...

1、可以用文本框的KeyPress、KeyDown、KeyUp三个事件中任意一个编程实现。 2、vb示例代码(这里用keypress实现): Private Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii = 13 Then Label1.Caption = Text1.TextEnd Sub

先假设条件为:窗体一名称为Form1,其中文本框为text1;窗体二名称为Form2,其中文本框为text1. 窗体一上面的代码为: private Sub Text1_Change() ‘注意这里是change Form3.Label1.Caption = Form3.Label1.Caption & Text1.Text end Sub 窗体二...

你是想把文本框的位置放在Frame组件框中么,即使是位置在一起,但二者是独立的个体。

网站首页 | 网站地图
All rights reserved Powered by www.mdsk.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com