VB中输入函数InputBox的用法


格式:InputBox(pronpt[,title][,default][,xpos,ypos]).其中的pronpt为窗口的提示词,title为输入窗口的标题,default为输入窗口的默认内容,xpos,ypos为窗口距离屏幕左边,上边的距离。

说明

如果同时提供了Helpfile与Context,用户可以按F1来查看与Context相应的帮助主题。某些主应用程序(支持使用Visual Basic for Applications的应用程序),例如Microsoft Excel,会在对话框中自动添加一个帮助按钮。如果用户单击确定或按下回车,则InputBox函数返回文本框中的内容。如果用户单击取消,则此函数返回一个长度为零的字符串("")。

在VB中,如果没有同时提供XPos和YPos,不会提示语法错误,但单独出现的XPos或YPos将被忽略,相当于省略了这两个参数。但在VBS中,单独出现的XPos或YPos会生效,但另一个没有确定的参数将使用默认值。

代码示例
 

'程序的作用是用InputBox函数输入2个数据之后,把他们连接起来,用MsgBox函数显示。
  Private Sub Command1_Click()
  Dim a As String, b As String
  a = InputBox("输入第一个数据:")
  b = InputBox("输入第二个数据:")
  MsgBox a & b
  End Sub

 
 

 


免责声明!

本站转载的文章为个人学习借鉴使用,本站对版权不负任何法律责任。如果侵犯了您的隐私权益,请联系本站邮箱yoyou2525@163.com删除。



 
粤ICP备18138465号  © 2018-2025 CODEPRJ.COM