展开全部
1、vb6中可以使用以下方式输入数据:
a)使用inputbox()函数输入数据;
b)使用Textbox控件(文本框)输入数据;
c)使用文件输入数据;
d)使用数据库输入数据等。
2、详解inputbox()函数输入数据,示例如下:
InputBox 函数:在一对话框来中显示提示,等待用户输入正文或按下按钮,并返回包含文本框内容的 String。
语法:
InputBox(prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context])
示例:
Dim Message, Title, Default, MyValue
Message = "Enter a value between 1 and 3" ' 设置提示信息。
Title = "InputBox Demo" ' 设置标题。
Default = "1" ' 设置缺省值。
' 显示信息、标题及缺省值。
MyValue = InputBox(Message, Title, Default)
' 使用帮助文件及上下文。“帮助”按钮便会自动出现。
MyValue = InputBox(Message, Title, , , , "DEMO.HLP", 10)
' 在 100, 100 的位置显示对话框。
MyValue = InputBox(Message, Title, Default, 100, 100)
4、其它输入方法可以网上查找或看MSDN。
a)使用inputbox()函数输入数据;
b)使用Textbox控件(文本框)输入数据;
c)使用文件输入数据;
d)使用数据库输入数据等。
2、详解inputbox()函数输入数据,示例如下:
InputBox 函数:在一对话框来中显示提示,等待用户输入正文或按下按钮,并返回包含文本框内容的 String。
语法:
InputBox(prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context])
示例:
Dim Message, Title, Default, MyValue
Message = "Enter a value between 1 and 3" ' 设置提示信息。
Title = "InputBox Demo" ' 设置标题。
Default = "1" ' 设置缺省值。
' 显示信息、标题及缺省值。
MyValue = InputBox(Message, Title, Default)
' 使用帮助文件及上下文。“帮助”按钮便会自动出现。
MyValue = InputBox(Message, Title, , , , "DEMO.HLP", 10)
' 在 100, 100 的位置显示对话框。
MyValue = InputBox(Message, Title, Default, 100, 100)
4、其它输入方法可以网上查找或看MSDN。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |