怎样用VB才能把文本框的456 拆分到3个文本框中 分别是 4和5和6

作者&投稿:主汪 (若有异议请与网页底部的电邮联系)
怎么样才能把文本框的456 拆分到3个文本框中 分别是 4和5和6~

把现有的文本框复制后粘贴两次,这样你就可以分别把每个文本框保留为所需要的4、5和6了。

要看输入的格式,比如中间有","的话就可以作为判断符号来确定横纵

文本框的内容是个字符串,可以直接用MID函数操作
Text1.Text="456"
Text2.Text=mid(Text1.Text,1,1)'从第一个位置截取1个字符
Text3.Text=mid(Text1.Text,2,1)'从第二个位置截取1个字符
Text4.Text=mid(Text1.Text,3,1)'从第三个位置截取1个字符

加个控件,四个文本框只有第一个文本框可以输入,其他的都设成不能输入的,我没试直接想的,你试试看,不行再调试,利用思路是4*100+5*10+6=456的逆运算
text1.text=val(text.text)\100
text2.text=(text.text-(val(text.text)\100)*100)\10
text3.text=text.text-(val(text.text)\100)*100)-((text.text-(val(text.text)\100)*100)\10)*10
注:text.text是像456这样的数单做一个文本框可以输入其它的数


如何用VB提取文本中的内容?
然后用mid()函数获得<>之间的内容 str=mid(text1.text,a,b)最后把这部分内容替换掉即可 text1.text=replace(text1.text,str,"")循环以上内容即可

怎么用VB编写 把 .txt文件读入文本控件里,还有怎么把文...
Dim a$, b Open "文件路径 文件名" For Input As #1 Do While Not EOF(1)Line Input #1, a b = b a Chr(13) Chr(10)Loop Text1.Text = b Close #1 写文件的操作:Open "文件路径 文件名" For output As #1 Print #1, Text1.Text Close #1 ...

VB怎么在文本框中输入内容
一共七步首先,在窗口中添加一个文本框,如下图所示,然后进入下一步。其次,单击文本框,在属性窗口中设置文本框的属性,清除文本,如下图所示,然后进入下一步。接着,将文本框的enabled属性设置为False,如下图所示,然后进入下一步。然后,在表单上添加一个命令按钮,如下图所示,然后进入下一步。

怎样在VB中将文本转换成数值
1、首先在电脑中找到并打开VB软件,找到一句输出的函数。2、然后在其数组变量中,套上一个Str函数。3、这里注意函数的关键字,是没有区分大小写的。4、然后函数是可以多个嵌套使用。5、最后点击运行按钮,这样就可以成功运行测试,如下图所示,转换就完成了。

vb求教文本指定行替换数值问题
在VB中,你可以使用`Replace`函数来替换文本中的指定行。不过,请注意,“行”在文本中并没有明确的概念,因此你需要有某种方式来标识你想要替换的特定部分。这可能是通过特定的字符、词、或者模式来实现。以下是一个基础的例子:```vb Dim text As String = "这是第一行。这是第二行。这是第三...

VB如何把文件内容显示在文本框中?
VB6.0可以使用TextBok控件或RichTextBox控件实现将读入文本文件显示于控件中。TextBox 控件有时也称作编辑字段或者编辑控件,显示设计时输入的用户输入的、或运行时在代码中赋予控件的信息。为了在 TextBox 控件中显示多行文本,要将 MultiLine 属性设置为 True。如果多行 TextBox 没有水平滚动条,那么...

VB下如何调用文本文档?
把有用的所有记录从原文件复制到新文件。关闭原文件并用 Kill 语句删除它。使用Name 语句把新文件以原文件的名字重新命名。 方法三使用顺序文件访问 推荐您使用 File System Objects 来创建文本文件,但该信息只在需要使用旧文本文件创建方法时才提供。当要处理只包含文本的文件时,比如由典型文本编辑器所创 建的文件...

用vb怎样输出文件中的文本?我在记事本上储存了我的身份证号码,姓名等...
例如桌面有个txt文件(路径是:C:\\Documents and Settings\\Administrator\\桌面\\新建 文本文档.txt)窗体代码:Dim TXT As StringPrivate Sub Form_Activate() Print TXT '显示在form1上End SubPrivate Sub Form_Load() Dim Strr As String Open "C:\\Documents and Settings\\Administrator\\桌面...

vb中如何读取文本文件
准备工作 新建一个VB工程 新建一个标准的VB EXE工程,只有一个Form,Form上有两个按钮:Command1和Command2。使用VB内建函数读取文本文件 双击Command1添加如下代码 Private Sub Command1_Click() Dim strFile  As String Dim intFile  As Integer Dim strData  As String strFile...

用VB实现文本查找和替换
K = MsgBox("找到第" & I & "处“" & StrCz & "”,是否替换?", vbYesNo, "找到第" & I & "处“" & StrCz & "”")If K = 6 Then Clipboard.Clear Clipboard.SetText StrTh Txtpaper.SelText = Clipboard.GetText J=j+1 lblReplaced="您替换了" & J & "次!"End If L...

龙南县17535025790: 怎么样才能把文本框的456 拆分到3个文本框中 分别是 4和5和6 -
辕力童康: 把现有的文本框复制后粘贴两次,这样你就可以分别把每个文本框保留为所需要的4、5和6了.

龙南县17535025790: vb中将1234567分别拆分在文本框中的代码怎么写 -
辕力童康: dim st as string'text是一个控件数组 st="1234567" for i=0 To Len(st)-1 Step 1 text(i).text=st.mid(i,1) next i

龙南县17535025790: vb编程中怎样将文本框中的内容拆分?
辕力童康: 用Split函数进行分割.

龙南县17535025790: 如何让vb删除文本框的第一行并删除对应的txt文本行 -
辕力童康: 你是用的文本框,主要是内容显示的问题 首先你文本框的内容应该在一个数组内保存的,这数组从1~N个数行按1~N显示在文本框内 这样删除某一行后就需要重新判断与它相关连的某一行是否显示 然后再将文本框内容清除后重新显示一次需要的数组行,不需要的就不显示出来就行了

龙南县17535025790: 如何把文本框中的字符串按行分割出来??(VB,文本框属性是多行) -
辕力童康: 这个好办,分割文本及删除空行代码如下:Dim str1, i str1 = Split(Text1, vbCrLf):Text1 = "" For i = 0 To UBound(str1) If Trim(str1(i)) <> "" Then Text1 = Text1 & str1(i) & vbCrLf Next

龙南县17535025790: 文本中每行有三个数据,有2千行,需用VB,使首数是462,463,464的行删除,其他的行保留三个数中后两个. -
辕力童康: 新建一个窗口,在上面添加一个command按钮和一个文本框,分别命名为Command1和Text1,然后把text1的MultiLine...

龙南县17535025790: vb中的textbox中的数据为第一行123,第二行456,第三行789,如何读取并显示在另外三个text中 -
辕力童康: 假设来源文本框为text1,目的文本框依次为text2,text3,text4. 用到API函数.下面给出完整代码.已经测试成功. Private Const EM_GETLINE = &HC4 Private Const EM_LINELENGTH = &HC1 Private Const EM_LINEINDEX = &HBBPrivate ...

龙南县17535025790: VB编程如何将TextBox里的内容拆分并写入指定的其它TextBox中?
辕力童康: Private Const EM_GETLINE = &amp;HC4Private Const EM_LINELENGTH = &amp;HC1Private Const EM_LINEINDEX = &amp;HBBPrivate Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal...

龙南县17535025790: vb中如何通过 form load事件将文本框和标签框的内容清除 -
辕力童康: 先假设条件为:窗体一名称为Form1,其中文本框为text1;窗体二名称为Form2,其中文本框为text1. 窗体一上面的代码为: private Sub Text1_Change() '注意这里是change Form3.Label1.Caption = Form3.Label1.Caption & Text1.Text end Sub...

龙南县17535025790: 如何在VB文本框中的选定的内容剪切到另一个文本框中 -
辕力童康: 选定好内容后按住[Ctrl]键不放,然后点一下[C]键,然后将光标定位到另一个文本框中,按住[Ctrl]键不放,然后点一下[V]键,就OK了.

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 星空见康网