程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> Visual Basic語言 >> VB綜合教程 >> 深入淺出VB.NET提示對話框

深入淺出VB.NET提示對話框

編輯:VB綜合教程

  一.輸入對話框:

  制作輸入對話框相對信息提示框來相對簡單,在Visual Basic .Net,輸入對話框是通過InputBox函數來完成的。以下是InputBox函數在Visual Basic .Net中的語法:

  Public Function InputBox (ByVal Prompt As String ,Optional ByVal Title As String = "" , _
  Optional ByVal DefaultResponse As String = "" ,Optional ByVal XPos As Integer = -1 , _
  Optional ByVal YPos As Integer = -1) As String

  參數說明:

  Prompt:

  必選項。以消息形式顯示在對話框中的String表達式。Prompt的最大長度大約為1024個字符,具體取決於所用字符的寬度。如果 Prompt 中包含多個行,則可在各行之間用回車符(Chr(13))、換行符(Chr(10))或回車換行符的組合(Chr(13)&Chr(10))分隔各行。

  Title:

  可選項。顯示在對話框標題欄中的String表達式。如果省略Title則將應用程序名放在標題欄中。

  DefaultResponse:

  可選項。顯示在文本框中的String表達式,在沒有提供其他輸入時作為默認響應。如果省略DefaultResponse,則顯示的文本框為空。

  XPos:

  可選項。數值表達式,以缇為單位指定對話框的左邊與屏幕左邊的距離。如省略XPos,對話框將水平居中。

  YPos:

  可選項。數值表達式,以缇為單位指定對話框的上邊與屏幕上邊的距離。如果省略ypos,則對話框位於在屏幕垂直方向距下邊緣大約三分之一處。

  以下就是在Visual Basic .Net中使用InputBox函數制作如圖01所示對話框的具體代碼:

  Dim message , title , defaultValue As String
  Dim myValue As Object
  message = "請輸入數值,數值在1-3之間!" '設定對話框提示信息
  title = "輸入提示框!" '設置對話框標題
  defaultValue = "1" '設定對話框中缺省的數值
  myValue = InputBox ( message , title , defaultValue , 100 , 100 )
  '設定對話框在左上角坐標位於桌面(100,100)區域顯示

圖01:通過InputBox函數制作的提示對話框

  • 首頁
  • 上一頁
  • 1
  • 2
  • 3
  • 4
  • 5
  • 下一頁
  • 尾頁
  • 共5頁
  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved