66问答网
所有问题
当前搜索:
vb中text
vb中text
控件
答:
添加一个Command1 一个
text
1 作为输入内容的,一个list1 设为不可见 一个list2 放在text1下面,同样不可见 Dim i As Integer Dim s, tt, ss As String Private Sub Command1_Click()ss =
Text
1.Text Open "c:\1.txt" For Append As 1 Print #1, ss Close #1 List2.Visible = False ...
VB
的
Text
1.
text
输入数字
答:
Private Sub Option1_Click()
Text
2.Text = "逆序输出"End Sub Private Sub Option2_Click()Text2.Text = "各数字和"End Sub Private Sub Option2_Click()Text2.Text = "各数字积"End Sub
在
VB中
怎样把文本
Text
1的内容进行复制,粘贴,剪切到T文本ext2中???急...
答:
Private Sub Command1_Click()'复制 Clipboard.Clear Clipboard.SetText (
Text
1)End Sub Private Sub Command2_Click()'剪切 Clipboard.Clear Clipboard.SetText (Text1)Text1 = ""End Sub Private Sub Command3_Click()'粘贴 Text2 = Clipboard.GetText End Sub ...
vb中
如何读取
text
答:
dim x as integer open "指定的文件" for input as #1 '以读方式打开文件 input #1,x ‘从文件读取一个整数,其它类型也可 ...close #1 ‘读文件结束后关闭文件
VB
怎样在
text
中显示我所需要的数,例如:e=Asc(1),此时e=31,想要在textb...
答:
首先:e=Asc(1),此时e不等于31,Asc(1)=asc("1")=49 想要在
text
box.text 中显示出来:text1=e textbox.text中显示的是字符串,但可以赋值:字符串、数值、日期等,如:text1=now'日期 text1="aaaa"'字符串 text1=124'数值 text1=1=2'逻辑 。。。
VB
提取
text
文本
答:
str = Trim(StrConv(InputB(LOF(1), 1),
vb
Unicode))Close #1 str = UCase(Trim(str))For i = 1 To 100 str = Replace(str, "T0" & i & vbCrLf, "*" & vbCrLf)Next slin = Split(str, "*")k = Val(Replace(UCase(Trim(
Text
9.Text)), "T", ""))Text10.Text = UCase(...
vb中text
问题
答:
Private Sub
Text
1_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode =
vb
KeyLeft Then '常数写错了 Text1.SelStart = 0 Text1.SelLength = Len(Text1.Text) KeyCode = 0' 对键码清0,才能取消对文本框起作用 End IfEnd Sub ...
vb中text
的内容如何等于一个变量的值
答:
shell "ping " &
text
1.
Text
把字符串连起来。控件属性可以直接用。
vb
题 窗体里怎么设置 1.
text
1里的内容不超过六个字符 2. text1里...
答:
密文字符设置为*-->
text
1-PasswordChar属性设为*'3. 运行时text1内容可输入,text2不可输入-->text2-Enable属性设为False'4. text1输入的字符在text2里同时展示-->在text1的
Text
Box1_Change事件中写如下代码Private Sub TextBox1_Change() TextBox2.Text = TextBox1.TextEnd Sub ...
用
vb
如何把一个文本框(
text
1)中的任意一行内容,添加到另一个文本框(t...
答:
用来sel
text
确定text1选中的内容就可以了,如在text2中显示:text2=text1.seltext,大致思路是这样的~
棣栭〉
<涓婁竴椤
3
4
5
6
8
7
9
10
11
12
涓嬩竴椤
灏鹃〉
其他人还搜