vb 6.0 string 怎么实现 +=操作？
如题
分步
VB code:
Dim a
Dim b
a = a + 1
a = a + b
'或者
'a = a + 1 + b
哦,是string类型,走眼了。。。
好像没有+=这样的操作符吧，
只能是
dim str1 as string , str2 as string
str1 = "**" str2 = "**"
str1 = str1 + str2
VB不支持这个运行符
只能这样：strOne=strOne +strTwo
或者：strOne=strOne & strTwo
推荐后者，因为前者需要重载。
举个例子:
VB code:
Private Sub Command3_Click()
Dim a As String, i As Long
Dim b(10) As String
b(0) = ""
b(1) = "hehe"
b(2) = ""
b(3) = "heihei"
b(4) = "lala"
For i = 0 To 10
a = a & IIf(a = "", IIf(b(i) = "", "", b(i)), IIf(b(i) = "", "", "," & b(i)))
Next
Debug.Print a
End Sub
再问一个
Set Fs_Start_Cmd_tcl = CreateObject("Scripting.FileSystemObject")
Set F_Start_Cmd_tcl = Fs_Start_Cmd_tcl.OpenTextFile(F3, ForWriting, True, 0)
程序提示OpenTextFile 没有该函数或过程，为什么啊？
c = a & b
相关问答：
我用Delphi写了一个DLL, DLL里有MDI的子窗体,DLL初始化时 传递调用者的TApplication给DLL, 在Delphi7中调用已经通过,但是不知道在VB中有无TApplication对应类型, 是否能在VB中调用?
你好，用instance不是就可以了&# ......
大家好，问个vb打印问题
printer.print "dsff"
.....
....
Printer.EndDoc
打印成功后我将执行
sqlstr = "update vc_yh set pr=' 已打印 ', ......
要用vb打印一条线，长度是100毫米怎么写？
关注
VB code:
Printer.ScaleMode = vbMillimeters
Printer.Line (10, 10)-(110, 10)
Printer.ScaleMode = vbMillimeters
Print ......
vb中怎么通过xml来解析数据库中的字段值。
没办法用XML解析数据库的字段值，除非数据库中保存的是XML格式的字符串文档。
XML用来展示层次的数据。
数据库一般是二维数据。
数据库中保存的是XML字符串格式� ......
再VB模块中我是通过如下方式来连接主库和历史库的(历史库数据量大)
VB code:
Public Connstr As String
Public objConn As New ADODB.Connection
Public ConnHISstr As String
Public objConnHIS As New A ......
