函数换行
Function IsSheetExist(shname As String, _
name As String)
Function IsSheetExist(shname As String _
, name As String)
字符串换行
"(" _
+ .Cells(i, 1).Value + "," _
+ .Cells(i, 2).Value + ",'" _
+ .Cells(i, 3).Value + "'," _
+ .Cells(i, 4).Value + ")"
注意:下划线前一定要有空格