Foxtable(狐表)用户栏目专家坐堂 → 请教字段赋值对话框问题


  共有2682人关注过本帖树形打印复制链接

主题:请教字段赋值对话框问题

帅哥哟,离线,有人找我吗?
sulgz
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:40 积分:360 威望:0 精华:0 注册:2011/11/20 21:06:00
请教字段赋值对话框问题  发帖心情 Post By:2015/1/24 22:55:00 [显示全部帖子]

有什么问题 ,不会编,求修正。


Dim Result As DialogResult

Result = MessageBox.Show("初始化日期?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)

If Result = DialogResult.Yes Then

dim Val As Date
InputValue(val, "初始化日期","请输入出生日期:")
DataTables("系统").DataRows("发放年月")=(val)

Else
    MessageBox.Show("好好学习吧,你会认同这个看法的.","提示")
End If


 回到顶部
帅哥哟,离线,有人找我吗?
sulgz
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:40 积分:360 威望:0 精华:0 注册:2011/11/20 21:06:00
  发帖心情 Post By:2015/1/25 11:49:00 [显示全部帖子]

感谢图片点击可在新窗口打开查看

 回到顶部