以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [原创]对话框里可以使用字段吗?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=38803)

--  作者:kunge
--  发布时间:2013/8/7 14:52:00
--  [原创]对话框里可以使用字段吗?
Dim t As TimeSpan
t = Date.Today - CDate(dr("有效期"))

If  t.TotalDays > 0 Then

Dim er As WinForm.Button = e.Form.Controls("Button6")
er.Visible = True

 MessageBox.Show("对领卡已经过期“& t.TotalDays天了!","提示")

End If



对话框无法显示,是不是用全局变量?


--  作者:Bin
--  发布时间:2013/8/7 14:54:00
--  
MessageBox.Show("对领卡已经过期“& t.TotalDays & "天了!","提示")