求VB代码使用mid、left、right函数。在text1文本框中输入一个字符串，然后单击“启

求VB代码
使用mid、left、right函数。在text1文本框中输入一个字符串，然后单击“启动”按钮，在label1、label2和label3标签显示效果如下图

举报该问题

推荐答案 2013-09-29

istr ="Visual Basic程序设计教程（第3版）"
label1.caption=left(istr,12)
label2.caption=mid(istr,13,6)
label3.caption=right(istr,5)

温馨提示：答案为网友推荐，仅供参考

当前网址：http://00.wendadaohang.com/zd/e0ITBj0IBD0eBrIj0n.html

相似回答

...程序运行时,在文本框text1中输入1个字符串,单击命令按钮command1时...答：1、首先，在窗体上面添加一个文本框。2、单击文本框，在属性窗口设置文本框的属性，清空文本内容，将文本框的enabled属性设置为False。3、双击“提取信息”命令按钮，编写程序的代码，如下图所示。提取信息时，需要使用截取字符串相关的函数，如Left,Right,Mid等。本题还需要使用InStr函数查找字符。4、双击...

vb编程,在文本框(text1输入一个三位数据,单击窗体后,在窗体打印输出改数...答：Print "方法一"Print "百位数：";d\100 Print "十位数：";d\10 Mod 10 '也可以用 d Mod 100 \10 Print "个位数：";d Mod 10 Print s=Right(Text1.Text,3);Print "方法二"Print "百位数：";Left(s,1)Print "十位数：";Mid(s,2,1) '也可以用Left(Right(s,2),1) 或...

vb中字符串函数的使用,请问该如何让编写代码?答：Private Sub Command1_Click()Dim strTemp As String strTemp = Mid$(Text1.Text, 2)strTemp = Left$(strTemp, Len(strTemp) - 1)Text2.Text = strTemp End Sub

VB如何在text1.text输入18位或15位数字的身份证并(判断身份证是否为正...答：MsgBox "这不是一个有效的身份证号！"Exit Sub End If '下面检验出生日期是否正确 Jym2 = Mid(Text1.Text, 7, 4) & "-" & Mid(Text1.Text, 11, 2) & "-" & Mid(Text1.Text, 13, 2)If Not IsDate(Jym2) Then MsgBox "这不是一个有效的身份证号！"Exit Sub End If MsgBox ...

大家正在搜

left right函数 excel中left和mid区别 left or right right and left mid函数和left left和mid函数区别 left right left和right left behind

vb中mid,left,right函数的含义与用法？

关于VB的left ，mid，right函数

vb 中语句text1.text=left(text1,te...

vb中如何从一个文本框中提取需要的字符

VB编程问题:程序运行时，在文本框text1中输入1个字符串...

vb中的mid函数

在VB中，怎么用MID函数，抓取文本框中的数据

vb中的mid函数