VB.Net Tutorial/GUI/InputBox
Содержание
Get input from InputBox
<source lang="vbnet">Imports System.Drawing Imports System.Drawing.Drawing2D Imports System.Windows.Forms public class PasswordFieldMatch
public Shared Sub Main Dim Filename As String Filename = InputBox("Your Value", "Title", "c:\document") End Sub
End class</source>
InputBox Demo
<source lang="vbnet">public class InputBoxDemo
public Shared Sub Main Dim PASSWORD As String PASSWORD = InputBox("Password", "Password Dialog") Do While PASSWORD <> "12345" PASSWORD = InputBox("Password", "Password Dialog") Loop End Sub
End class</source>
Read Integer value from Keyboard
<source lang="vbnet">Module Module1
Sub Main() Dim Age As Integer Console.Write("Age: ") Age = Console.ReadLine() Console.WriteLine(Age) End Sub
End Module</source>
Age: 12 12
Use InputBox to read Double value
<source lang="vbnet">Module Module1
Sub Main() Dim Salary As Double Salary = InputBox("Enter salary") Console.WriteLine(Salary) End Sub
End Module</source>
Use InputBox to read Integer value
<source lang="vbnet">Module Module1
Sub Main() Dim Age As Integer Age = InputBox("Enter age", 21) Console.WriteLine(Age) End Sub
End Module</source>
Use InputBox to read string value
<source lang="vbnet">Module Module1
Sub Main() Dim Name As String Name = InputBox("Enter name") Console.WriteLine(Name) End Sub
End Module</source>
asdf