Here is an example VBScript code to generate and display a UserForm:
' Create UserForm object
Set objForm = CreateObject("UserForm")
' Set UserForm properties
objForm.Caption = "My UserForm"
objForm.Height = 200
objForm.Width = 300
' Add Label control to the UserForm
Set objLabel = objForm.Controls.Add("Forms.Label.1", "lblMessage")
objLabel.Caption = "Hello, World!"
objLabel.Left = 50
objLabel.Top = 50
' Add Button control to the UserForm
Set objButton = objForm.Controls.Add("Forms.CommandButton.1", "btnOK")
objButton.Caption = "OK"
objButton.Left = 120
objButton.Top = 120
objButton.Default = True
' Show UserForm
objForm.ShowModal
This code will create a UserForm with a Label and a Button control. When the Button control is clicked, the UserForm will be closed.
Note: This code will only work in a Windows environment with Microsoft Office installed.
Please start posting anonymously - your entry will be published after you log in or create a new account. This space is reserved only for answers. If you would like to engage in a discussion, please instead post a comment under the question or an answer that you would like to discuss
Asked: 2021-06-04 11:00:00 +0000
Seen: 8 times
Last updated: Aug 06 '22
How can I deal with Expression.Error related to a column in Power Query?
How can you implement pagination in Oracle for the LISTAGG() function?
What is the process for implementing a FutureBuilder on an OnTap function in Flutter?
How can we require users to be logged in before they can access the root folders in WordPress?
In SCSS, what is the method for grouping and reusing a set of classes and styles?
How can popen() be used to direct streaming data to TAR?
How does iOS retrieve information from a BLE device?
How can Django Admin accommodate a variety of formats and locales for its input fields?