Foxtable(狐表)用户栏目专家坐堂 → [求助]请教一个Select Case的问题?


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

主题:[求助]请教一个Select Case的问题?

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


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/12/24 9:23:00 [显示全部帖子]

不建议写成 selec case 的形式

If  e.Form.Controls("TextBox1").value Isnot Nothing Then
DataTables("表1").DataCols("列1").DefaultValue = """"& e.Form.controls("textbox1").value &""""
End If

If  e.Form.Controls("TextBox2").value IsNot Nothing Then
DataTables("表1").DataCols("列2").DefaultValue = """"& e.Form.controls("textbox2").value &""""
End If

If  e.Form.Controls("TextBox3").value IsNot Nothing Then
DataTables("表1").DataCols("列3").DefaultValue = """"& e.Form.controls("textbox3").value &""""
End If

 回到顶部