VB,怎样将上次Inputbox输入的文件名,作为下次执行时弹出对话框中显示的默认值?___加分大大的有!!

2024-12-31 21:38:12
推荐回答(4个)
回答1:

你先按照我下面说的试一下,你就体会了!
新建一个工程,添加一个按钮,代码如下:
Option Explicit
Private x As String

Private Sub Command1_Click()
x = InputBox("hello!", "uuu", x)
End Sub
运行一下,效果达到了,然后打开代码窗口,理解一下代码!

因为,第1次使用 x="",而以后任何一次都是上一次的输入保存在X里了!!

回答2:

你可以如下:
Private Sub Command1_Click()
Dim ss, x
Open "c:\x.txt" For Input As #1
ss = StrConv(InputB$(LOF(1), 1), vbUnicode)
Close #1

x = InputBox("请输入", "对话框", ss)
If Trim(x) <> "" Then
Open "c:\x.txt" For Output As #1
Print #1, x
Close #1
End If
End Sub

回答3:

是说弹出对话框只执行这一次,下一次打开exe则不弹对话框,取上一次的输入值为默认值?

回答4:

你用defaultValue记录下不是就可以了吗