55问答网
所有问题
当前搜索:
vb显示文本框内容
VB
如何记忆
文本框
中的
内容
,下次运行时可以自动
显示
答:
"Text2", "Text", Text2.Text SaveSetting App.Title, "Text3", "Text", Text3.Text SaveSetting App.Title, "Text4", "Text", Text4.Text End Sub 这样就行了程序关闭后自动在注册表HKEY_CURRENT_USER\Software\
VB
and VBA Program Settings\工程名字\下面存放!加载时自动加载的呵呵 ...
如何在
VB文本框
里输出变量的
内容
谢谢
答:
dim i as intger dim str as string i=1000 a="
文本
"text1.text=str & cstr(i)'用cstr()转换成文件格式再显式 改成即可:text1.text=a & i 最后一句,用CSTR,其实没有必要的 字符运算符是“&”符号,即连接运算符。字符串连接运算是把两个或多个字符串首尾连接成一个字符串。使用“&...
VB
中如何将文件中的多行
内容
按行
显示
在
文本框
中?注意,是多行内容的文件...
答:
其实你这个真的是非常简单的事了。你说“打开单行
文本内容
的文件,
文本框
能
显示
;打开多行文本内容的文件就不行了,什么也没显示。”,其实不管单行文本还是多行文本 都已经显示了,但为什么多行文本你感觉没显示:是因为你的代码“Text1.Text = a”在do循环中每次只显示一行、而且是最后一行,恰巧你...
vb
中如何将一个
文本框
中的
内容
分行
显示
到其他的文本框中,
答:
最好把text2设置为控件数组。Dim k%, k1 Dim A A$ = Text1.Text k = 0 A$ = A$ + Chr$(13)Do k1 = InStr(A$, Chr$(13))If k1 = 0 Then Exit Do If k = 4 Then Exit Do Text2(k).Text = Mid$(A$, 1, k1 - 1)k = k + 1 A$ = Mid$(A$, k1 + 2)Loop...
在
vb
中 在一个
文本框
内输入
内容
,第二个文本框就会
显示
另外的内容 代 ...
答:
Private Sub Text1_Change()Text2.Text = "text1
内容
已更改为" & Text1.Text End Sub
如何在
VB文本框
里输出变量的
内容
谢谢
答:
dim i as intger dim str as string i=1000 a="
文本
"text1.text=str & cstr(i)'用cstr()转换成文件格式再显式 改成即可:text1.text=a & i 最后一句,用CSTR,其实没有必要的 字符运算符是“&”符号,即连接运算符。字符串连接运算是把两个或多个字符串首尾连接成一个字符串。使用“&...
VB
如何使两个
文本框显示
相同的
内容
答:
如果你想
文本框
2的
内容
随着文本框1实时变动的话。这样写代码 Private Sub text1_change()text2.text = text1. text End Sub 这样你运行时候,在text1输入什么,text2就会跟着同步
显示
你在text1输入的内容
VB
中如何逐行读取
文本框
的
内容
?
答:
使用函数 mid(strin,start[,length])返回指定长度的字符串string的子串。取出text1.text = "第3页"中的3,
vb
中一个汉字占一个字符,所以vb语句如下:mid(text1.text,2,1)
如何在
vb
的模块中调用窗体中
文本框
的值。
答:
Form1内容如下:Private Sub Command1_Click()MsgBox "
文本内容
是" & Tx MsgBox "窗体标题是" & Tc MsgBox "窗体大小是" & Ts End Sub 模块内容如下:Function Tx() As String With Form1 Tx = .Text1.Text End With End Function Function Tc() As String With Form1 Tc = .Caption E...
如何在
VB文本框
里输出变量的
内容
谢谢
答:
对Text1.Text属性赋值:Dim a As Integer Private Sub Command1_Click()a = a + 1 Text1.Text = Text1.Text & "这是第" & a & "次点击" & vbCrLf Text1.SelStart = Len(Text1.Text)End Sub 用 & 连接变量和字符串 补充:你要把你的text1的multiline属性设置为true ...
棣栭〉
<涓婁竴椤
3
4
5
6
8
7
9
10
11
12
涓嬩竴椤
灏鹃〉
其他人还搜