Question

vb,这个自定义控件怎么设置保存路径和保存默认名称？求助高手修改

以下是保存文件代码。（需要完整的可以HI我）
Dim cc As cCommonDialog
Dim sFile As String
Select Case Index
Case 0
Set cc = New cCommonDialog
If cc.VBGetSaveFileName(sFile, , , "Text Files (*.txt)|*.txt|All Files (*.*)|*.*", , , , "TXT", Me.hwnd) Then
WriteFileText sFile, Text2.Text
End If
Case 1
Unload Me
End Select

Answer 1

看你这个控件有没有这个属性了。initdir看看有没有这个属性。