Visual Basic:保存、命名、加载
Visual Basic: Saving, Naming, Loading
所以,我正在制作一个掷骰子界面。它有几个文本框,玩家可以在其中输入他们的数字,然后他们只需点击一个按钮即可掷骰子。问题是,我希望能够为不同的玩家保存多个配置文件,因为每个玩家都有不同的配置。
我发现的视频和教程都是关于从文本框保存到下拉菜单,或保存在界面本身,这意味着每个配置文件 1 个 exe。
我是菜鸟,怕自己表述的不够好,我的代码可能会引起一些心脏病^^''
我如何制作一个另存为功能,玩家可以在其中命名文件,保存每个重要文本框的值,然后让它加载正确的值?我附上了界面的图像。一切正常,除了保存和加载按钮
一种简单的方法是在保存之前将 texbox 值保存在工作簿单元格中(另一个 sheet 或您需要的地方),例如:
cells(row1, column1)= texboxval1.text
cells(row2, column1)= texboxval2.text
等等...
然后,你可以调用保存方法:
Set NewBook = Workbooks.Add
Do
fName = Application.GetSaveAsFilename
Loop Until fName <> False
NewBook.SaveAs Filename:=fName
您可以将所有这些代码添加到点击事件按钮或您可能需要的时候。
希望对您有所帮助!
所以,我正在制作一个掷骰子界面。它有几个文本框,玩家可以在其中输入他们的数字,然后他们只需点击一个按钮即可掷骰子。问题是,我希望能够为不同的玩家保存多个配置文件,因为每个玩家都有不同的配置。
我发现的视频和教程都是关于从文本框保存到下拉菜单,或保存在界面本身,这意味着每个配置文件 1 个 exe。
我是菜鸟,怕自己表述的不够好,我的代码可能会引起一些心脏病^^''
我如何制作一个另存为功能,玩家可以在其中命名文件,保存每个重要文本框的值,然后让它加载正确的值?我附上了界面的图像。一切正常,除了保存和加载按钮
一种简单的方法是在保存之前将 texbox 值保存在工作簿单元格中(另一个 sheet 或您需要的地方),例如:
cells(row1, column1)= texboxval1.text
cells(row2, column1)= texboxval2.text
等等... 然后,你可以调用保存方法:
Set NewBook = Workbooks.Add
Do
fName = Application.GetSaveAsFilename
Loop Until fName <> False
NewBook.SaveAs Filename:=fName
您可以将所有这些代码添加到点击事件按钮或您可能需要的时候。
希望对您有所帮助!