如何实现一个类似msgbox的窗口,可以返回变量?

fengxiaoxiao1 2004-12-28 05:34:26
msgbox的窗口可以返回变量,请问如何实现的?
...全文
204 17 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
17 条回复
切换为时间正序
请发表友善的回复…
发表回复
rainivy 2005-01-19
  • 打赏
  • 举报
回复
晕,我以为没发成功,不好意思,发了两次。:)
rainivy 2005-01-19
  • 打赏
  • 举报
回复
to fengxiaoxiao1() :
如何实现带窗体的类,能否详细说一下。或相关资料也可以。

做这个不难,其实你就相当于做一个DLL或做一个类模块,在DLL中调用一个窗体。
然后在DLL中定义方法,如显示窗体
public sub showform(modal as integer)
form1.show modal 'form1为你在DLL中加载的窗体名
end sub
等,DLL返回值也可自己定义。
然后在你的程序中加载这个DLL,并执行相应的显示窗体的方法就可。
dim xxx as new xxxx '要先实例化,xxx为DLL的实例
xxx.showform 0/1 '此句在你的主程序中引用,xxxx为你生成的DLL的名称。
rainivy 2005-01-19
  • 打赏
  • 举报
回复
to fengxiaoxiao1() :
如何实现带窗体的类,能否详细说一下。或相关资料也可以。

做这个不难,其实你就相当于做一个DLL或做一个类模块,在DLL中调用一个窗体。
然后在DLL中定义方法,如显示窗体
public sub showform(modal as integer)
form1.show modal 'form1为你在DLL中加载的窗体名
end sub
等,DLL返回值也可自己定义。
然后在你的程序中加载这个DLL,并执行相应的显示窗体的方法就可。
dim xxx as new xxxx '要先实例化,xxx为DLL的实例
xxx.showform 0/1 '此句在你的主程序中引用,xxxx为你生成的DLL的名称。
creazyfish 2005-01-19
  • 打赏
  • 举报
回复
不知道你需要什么样子的,但是简单的判断你按了哪个按扭的返回值直接用msgbox取得对应的返回值就可以了如vbYes,vbOK什么的
如果你需要返回的东西比较复杂,你可以自己定制对话框,可以在一个窗体中定义若干窗体级的公有变量,用这些变量来作为窗体的返回值。
fengxiaoxiao1 2005-01-19
  • 打赏
  • 举报
回复
to 刘银华:
如何实现带窗体的类,能否详细说一下。或相关资料也可以。
Mdawnxd 2005-01-19
  • 打赏
  • 举报
回复
用inputbox
libralibra 2004-12-29
  • 打赏
  • 举报
回复
msgbox有ok、cancel之类,如果你要返回值的情况不多,建议写个select case判断一下好了
不要那么麻烦了,呵呵
ryuginka 2004-12-28
  • 打赏
  • 举报
回复
自己做个带窗体的类吧。可以有返回值
Yaka 2004-12-28
  • 打赏
  • 举报
回复
msgbox有vbyes,vbno等等的值可以返回~~
但要接受数据之后带到form里面就用inputbox~!
用法查找MSDN
viena 2004-12-28
  • 打赏
  • 举报
回复
可以调用API函数,实现消息框
Public Declare Function MessageBox Lib "user32" Alias "MessageBoxA" (ByVal hWnd As Long, ByVal lpText As String, ByVal lpCaption As String, ByVal wType As Long) As Long

可以是非模式的
MessageBox me.hWnd, "这是自己的消息框", "提示", 0
viena 2004-12-28
  • 打赏
  • 举报
回复
msgbox是一个函数,当然有返回值的,
至于如何实现,和你用VB做程序没有关系~
zyp2kyear 2004-12-28
  • 打赏
  • 举报
回复
我有事例代码,定制自己的消息框。给个邮想
wwqna 2004-12-28
  • 打赏
  • 举报
回复
就用公用变量!
watcher_shen 2004-12-28
  • 打赏
  • 举报
回复
??????

没明白楼主的意思,楼主如果是想自己定制一个窗口来返回变量的值就用inputbox就可以。

如果是想问msgbox本身如何返回数值那么就用msgbox本身就可以啊……

a = inputbox("")

or

a = msgbox("what do you want?")
lhy0922 2004-12-28
  • 打赏
  • 举报
回复
a = InputBox("")就可以了
  • 打赏
  • 举报
回复
调用inputbox 函数就行了
laviewpbt 2004-12-28
  • 打赏
  • 举报
回复
可以用公共变量。

7,785

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧