[求助]单元格颜色 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]单元格颜色

共有5046人关注过本帖树形打印复制链接主题：[求助]单元格颜色

有点蓝

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：113480 积分：577889 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2022/3/8 11:08:00 [显示全部帖子]

If e.Col.Name = "颜色" And e.Row.IsNull(e.Col.Name) = False Then

Dim s As String = e.Row(“颜色”)

e.Table.DataTable.AddUserStyle(s,ColorTranslator.FromHtml(s)),Color.black)

e.Style=s

End If

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：113480 积分：577889 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2022/3/8 11:49:00 [显示全部帖子]

以下是引用2425004926在2022/3/8 11:18:00的发言：

谢谢！OK！

AddUserStyle这个函数的说明在哪里能看到

帮助搜“AddUserStyle”

有点蓝

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：113480 积分：577889 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2022/3/8 11:51:00 [显示全部帖子]

以下是引用2425004926在2022/3/8 11:37:00的发言：

在窗口中有一个按钮，按钮的名称和表中 r行的名称是对应的，我想用 r行的颜色表示这个按钮的背景色

Dim tt As String = "Color." & r("颜色")

e.Form.Controls(r("名称")).BackColor = tt

下面的代码测试结果

方法调用失败，因为“Public Overrides Property BackColor() As System.Drawing.Color”不能用这些参数调用:
与参数“value”匹配的参数无法从“String”转换为“Color”。

如何改，请老师指点一下

颜色值的转换看2楼

ColorTranslator.FromHtml(r("颜色"))

[此贴子已经被作者于2022/3/8 11:51:25编辑过]

有点蓝

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：113480 积分：577889 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2022/3/8 13:40:00 [显示全部帖子]

tt = "Color." & tt

e.Form.Controls(r("名称")).BackColor = tt

等同于：e.Form.Controls(r("名称")).BackColor = "Color.Pink"

和：e.Form.Controls(r("名称")).BackColor = Color.Pink

完全不是一回事，前者只是一个普通字符串，后者是一个颜色类型

下一主题 >> << 上一主题

主题：[求助]单元格颜色