用vb怎样编一个跟inputbox函数一模一样的自定义函数,请写出代码即可,控件我自己加! 20
3个回答
展开全部
在模块里定义一个全局变量Public InputBoxText as String
新建一个窗体名字叫frmInputBox,画一个Label1作为显示文字的控件
画一个TextBox名字叫txtInput,在画一个Command命名为cmdOK
做一个函数
Function ShowInputBox(sNote as String,sTitle as String) As String
frmInputBox.Show 1
frmInputBox.Label1.Text = sNote
frmInputBox.Caption=sTitle
End Function
窗体里面按OK的代码里加一句InputBoxText = txtInput.Text就可以了
欢迎追问。谢谢采纳
新建一个窗体名字叫frmInputBox,画一个Label1作为显示文字的控件
画一个TextBox名字叫txtInput,在画一个Command命名为cmdOK
做一个函数
Function ShowInputBox(sNote as String,sTitle as String) As String
frmInputBox.Show 1
frmInputBox.Label1.Text = sNote
frmInputBox.Caption=sTitle
End Function
窗体里面按OK的代码里加一句InputBoxText = txtInput.Text就可以了
欢迎追问。谢谢采纳
展开全部
你把它当做一个窗体来写就行了,添加控件和代码都和窗一样啊!
一个文本框控件作输入,一个确定按钮,一个取消按钮,一个LABEL控件作提示
然后定义一个全局变量用来保存用户的输入以供其他窗体调用
一个文本框控件作输入,一个确定按钮,一个取消按钮,一个LABEL控件作提示
然后定义一个全局变量用来保存用户的输入以供其他窗体调用
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
做一个窗体来写就行了,添加控件和代码都和窗一样啊!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询