VB Prompt for question

[connormac]

I have a VB script that prompts me for some answers. Some I need to answer, but some of the questions I know what the answers need to be. How do I put them in the script?

[Bullines]

If you're using functions like AskNumber(), AskValue() and AskString(), you can pass them default values. For example:

 

code:

---

' Call the main subroutine

Call Main()

 

 

' Purpose: the main subroutine

Sub Main()

Dim iMyNumber : iMynumber = 12 ' the number that I want (default to 12)

Dim dMyValue : dMyValue = 3.14 ' the decimal value that I want (default to 3.14)

Dim strMyString : strMyString = "Hello Mastercam World" ' the string that I want (default to "Hello Mastercam World")

 

 

' prompt for an integer

If (AskNumber("Enter a number", 0, 100, iMyNumber)) Then

ShowNumber("My number is: ", iMyNumber)

End If

 

' prompt for a decimal value

If (AskValue("Enter a decimal value", 0.000, 100.000, dMyValue)) Then

ShowDouble("My decimal value is: ", dMyValue)

End If

 

' prompt for a string

If (AskString(strMyString)) Then

ShowString ("My string is: " & strMyString)

End If

End Sub

---

The variable that will hold the result of the "ask" functions can be initialized or set beforehand. This will be reflected as a default answer when your "ask" function is called.

 

HTH.

[connormac]

Thanks I will try it later today.