【简答题】My bookshelves are full of dust — and with good reason. When it comes to cleaning that part of my home, I suffer from the most serious case of avoidance (回避反应症). The thing is this: when I do set out t...
Private Sub Command1_Click() CommonDialog1.FileName = "Savefile" CommonDialog1.Filter = "All files|*.*|(*.txt)|*.txt|(*.Doc)|*.Doc" CommonDialog1.FilterIndex = 2 CommonDialog1.DialogTitle = "Save" CommonDialog1.Action = 2 End Sub
B.
Private Sub Command1_Click() CommonDialog1.FileName = "Savefile" CommonDialog1.Filter = "All files|*.*|(*.txt)|*.txt|(*.Doc)|*.Doc" CommonDialog1.FilterIndex = 1 CommonDialog1.DialogTitle = "Save" CommonDialog1.Action = 2 End Sub
C.
Private Sub Command1_Click() CommonDialog1.FileName = " Save " CommonDialog1.Filter = "All files|*.*|(*.txt)|*.txt|(*.Doc)|*.Doc" CommonDialog1.FilterIndex = 2 CommonDialog1.DialogTitle = " Savefile " CommonDialog1.Action = 2 End Sub
D.
Private Sub Command1_Click() CommonDialog1.FileName = "Savefile" CommonDialog1.Filter = "All files|*.*|(*.txt)|*.txt|(*.Doc)|*.Doc" CommonDialog1.FilterIndex = 1 CommonDialog1.DialogTitle = "Save" CommonDialog1.Action = 1 End Sub