我的一个难题，用vb给一行文本加上后缀@yahoo.com
我的一个难题，用vb给一行文本加上后缀@yahoo.com
比如
1221
54854
sfsf
sdfs
变成
1221@yahoo.com
54854@yahoo.com
sfsf@yahoo.com
sdfs@yahoo.com
vb如何实现啊 ，数据是重txt一行一行读出来的
晕，这也算难道？
text1.text=text1.text & "@yahoo.com"
VB code:
Option Explicit
Public Sub Main()
Dim hInputFile As Integer
Dim hOutputFile As Integer
Dim s As String
hInputFile = FreeFile()
Open "C:\temp\1.txt" For Input Access Read Lock Write As #hInputFile
hOutputFile = FreeFile
Open "C:\temp\2.txt" For Output Access Write Lock Read Write As #hOutputFile
While Not EOF(hInputFile)
Line Input #hInputFile, s
Print #hOutputFile, s & "@yahoo.com "
Wend
Close #hInputFile
Close #hOutputFile
End Sub
txt结尾没有换行符的话补上，然后
txt=replace(txt,vbcrlf,"@yahoo.com"& vbcrlf)
多谢大家帮助啊 马上结贴
相关问答：
比如说要在1表中的第三列第二行单元中输入“一二三”一要粗体宋体12号字，二 不要粗体 15号字 三斜体5号字
代码应该怎么打？
LZ指的是个什么表格控件呢，貌似只能设置整个表的字体，或者某几行或几列，没有单独设� ......
帮我改改 我总觉得有问题
Type ID
number As Single
score As Integer
name As String * 6
End Type
Dim personl As ID, i%
Private Sub Command1_Click()
i = 0
&nbs ......
数据库貌似已经连接上了vb，，可是为什么数据库上的数据不能显示在框表中捏？？？
具体的代码？
无码无真相！
你把篮球抱在怀里，就能远投得3分？
麻烦各位大虾了啊。。。
Private Sub Comm1_Click()
& ......
为什么我用form.show和form.hide多次连接了两个窗口只能互换链接两次啊？
代码看看
照道理form.show 没次数限定的吧
我也快疯了。
楼主知道怎么发贴么？
引用
我也快疯了。
楼主知道怎么发贴么？
楼主也 ......
