Foxtable(狐表)用户栏目专家坐堂 → alue不是boolean成员,错误代码:.Value = "张三"


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

主题:alue不是boolean成员,错误代码:.Value = "张三"

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


加好友 发短信
等级:童狐 帖子:297 积分:2279 威望:0 精华:0 注册:2012/6/23 11:15:00
alue不是boolean成员,错误代码:.Value = "张三"  发帖心情 Post By:2023/8/29 22:36:00 [只看该作者]

value不是boolean成员,错误代码:.Value = "张三"   ,老师这段我没明白怎么回事,我看教程了,写的也没有问题,问什么报错,这样的还可以怎么写更好

Dim dr1 As DataRow = DataTables("xinxi").SQLFind("openid ='" & Openid & "'")
 With wb.AddInputGroup("form1", "ipg1", "客户资料")
                        .AddInput("客户名", "姓名", "Text").value = format(dr1("客户名")) '前一个"姓名"是ID,后一个"姓名"是标题
                        With .AddInput("nickname", "昵称", "Text").value = format(dr1("nickname"))
                            .Value = "张三"
                            .Readonly = True
                        End With
                        With .AddInput("openid", "openid", "Text").value = dr1("openid")
                            .Readonly = True
                        End With
                        .AddInput("电话", "电话", "number").value = format(dr1("电话"))

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


加好友 发短信
等级:童狐 帖子:297 积分:2279 威望:0 精华:0 注册:2012/6/23 11:15:00
  发帖心情 Post By:2023/8/29 22:48:00 [只看该作者]

这个是服务端报错  未找到类型“Boolean”的公共成员“Value”。我这样改了,还是不行

 With wb.AddInputGroup("form1", "ipg1", "客户资料")
                        .AddInput("客户名", "姓名", "Text").value = format(dr1("客户名")) '前一个"姓名"是ID,后一个"姓名"是标题
                        With .AddInput("nickname", "昵称", "Text").value = dr1("nickname")
                            .Value = dr1("nickname")
                            .Readonly = True
                        End With
                        With .AddInput("openid", "openid", "Text").value = dr1("openid")
                            .Readonly = True
                        End With
                        .AddInput("电话", "电话", "number").value = format(dr1("电话"))

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


加好友 发短信
等级:超级版主 帖子:107147 积分:544978 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/8/29 23:07:00 [只看该作者]

1、去掉所有的format,没有任何用处
                        With .AddInput("nickname", "昵称", "Text")
                            .Value = dr1("nickname")
                            .Readonly = True
                        End With

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


加好友 发短信
等级:童狐 帖子:297 积分:2279 威望:0 精华:0 注册:2012/6/23 11:15:00
  发帖心情 Post By:2023/8/29 23:26:00 [只看该作者]

谢谢蓝老师

 回到顶部