VB.NET FOR SNAP
Imports Snap, Snap.Create, Snap.UI.Input
Public Class MyProgram
Public Shared Sub Main()
Dim cue As String = "Please enter an integer in the dialog"
Dim title As String = "Integer Entry"
Dim label As String = "Enter it here"
Dim initialValue As Integer = 1
Dim intValue As Integer = GetInteger(cue, title, label, initialValue)
InfoWindow.WriteLine("Integer value entered = " & intValue)
End Sub
End Class
页:
[1]