输入对话框
输入对话框:提示用户输入所需内容。
语法格式:InputBox(prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context])
各参数使用说明:
prompt:显示在输入对话框中的提示信息(字符串表达式)。
如果要显示多行信息,则可在各行之间用回车符 (Chr(13))和换行符 (Chr(10)) 来分隔。
title:输入对话框标题栏中的文字(字符串表达式)。如果省略 title,则把应用程序名放入标题栏中。
default:显示在输入对话框中的文本框中的默认内容,在没有其它输入时作为缺省值。如果省略 default,则文本框为空。
xpos、ypos:指定对话框显示在屏幕上的位置。如果省略 xpos,则对话框会屏幕中间。
Helpfile、context:与帮助有关。
输入对话框图
输入对话框有一个文本框与两个按钮,如果用户选择 “确定”按钮 ,则 InputBox 函数返回文本框中的内容。如果用户选择了“取消”,则此函数返回一个长度为零的字符串 (“”)。
实际应用题
Private Sub Command1_Click()
Dim F As Long, C As Long
F = InputBox(“请输入华氏温度:”, “华氏温度转换为摄氏温度”)
C = 5 / 9 * (F – 32)
Text1.Text = F
Text2.Text = C
End Sub