现在我有个Text1和Text2用来收集输入的数据。然后有个Text3用来输出。我写的是：
Text3.Text = "http://stream" & Text1.Text & ".music.qq.com/" & Text2.Text & " "
但是我要输出的那个位置并不是Text2的Text值，而是要把那个值的百万位改成2，不是加2，是改成2，要怎么弄啊？？

不知道你在说什么???

.....就是要TEXT2.TEXT值百万位是2，不能是其他的数

真的是不很明白LZ所言

可能真是我说急了，没说清楚，是这样的，Text1和Text2都是只能输入数字的，我设定了。而在点击了一个按钮后，就会在Text3中就会显示出一个URL来。
就是能不能在取得了Text2的值了后，把他的从左往右数的第二位给改成2.再用Text3输出

Private Sub Command1_Click()
Dim lsTemp As String
lsTemp = Right(Text1, 7)
If Left(lsTemp, 1) = 2 Then
Else
Mid(lsTemp, 1, 1) = 2
End If
Text1 = Left(Text1, Len(Text1) - 7) & lsTemp
End Sub
你看看把,不清楚,你里面是固定长度的 还是什么格式呢!给了我们才知道的

我是固定了输入8位的数字

恩 我试过6L的了 可以用，真的很谢谢了，等我把这个做好，一定发上来给你们看看

固定输入8位就简单了吧!
mid(text1,2,1)="2"
这样就可以了

你是写什么软件用到这个功能的？
搞不懂。