小编den*_*411的帖子

我目前在PowerPoint中制作"操作系统",我需要知道如何为设置设置全局变量.

我创建了一个名为"Settings"的模块,其中包含:

Public Sub Settings()

Option Explicit
Public UserName, UserIcon, Background, BrowserHomePage As String
Public SetupComplete As Boolean

SetupComplete = False
UserName = "Administrator"
UserIcon = Nothing
Background = Nothing
BrowserHomePage = Nothing

'Set the variables
UserName.Text = UserName

End Sub

现在在"登录"屏幕上,我有一个名为"UserName"的文本框.然后我做了一个按钮来测试变量.按钮执行此操作:

Private Sub CommandButton1_Click()
UserName.Value = UserName
End Sub

单击按钮时,文本框没有任何值.我是VBA的新手,想知道如何做到这一点.此外,如果有人知道如何在启动PowerPoint时自动执行代码,那将是非常棒的.

编辑:我正在尝试制作一个只包含设置的模块.有人可以指出如何更改幻灯片中的值吗？就像我单击幻灯片1中的按钮一样,我希望它将模块"设置"中的"UserName"值更改为我想要的任何值.

解决方案:好的,我找到了一个解决方案.我必须将设置写入文本文件并检索它以供阅读.

我的设置模块:

Public UserName As String, Password As String, UserIcon As String, DesktopBackground As String, LogInBackground As String, BrowserHomePage As String
Public InitialSetupCompleted As Boolean

Public Sub …

我需要知道如何在演示期间禁用键盘,因为我真的不希望人们跳过PowerPoint而是与之交互.我只想禁用让人们在箭头键和空格键等幻灯片周围移动的按钮.

我怎么做到这一点？因为我不断添加和删除幻灯片,所以我需要代码知道我来自哪个幻灯片,而不仅仅是去设置幻灯片.