高考问答甲泼尼龙副作用解决:vb中这段代码怎么不起作用？
来源：百度文库 编辑：高考问答 时间：2024/05/13 05:48:47
Private Sub scan(a As String)
Dim filename As String
filename = Dir(a)
Do While filename <> ""
If filename = "我的名片夹" Then
Else
MkDir "c:/我的名片夹"
End If
filename = Dir
Loop
End Sub
Dim filename As String
filename = Dir(a)
Do While filename <> ""
If filename = "我的名片夹" Then
Else
MkDir "c:/我的名片夹"
End If
filename = Dir
Loop
End Sub
Private Sub scan(a As String) 是一个过程吗？
变量a在过程中......