Foxtable(狐表)用户栏目专家坐堂 → [求助]结果样式改变


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

主题:[求助]结果样式改变

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


加好友 发短信
等级:幼狐 帖子:57 积分:554 威望:0 精华:0 注册:2015/5/10 17:46:00
[求助]结果样式改变  发帖心情 Post By:2016/1/23 16:09:00 [只看该作者]

Dim st As String = e.Form.Controls("ComboBox2").Value
Dim dr As DataRow
dr = DataTables("产品数量统计").Find( "[SAP描述] = '" & st & "'")
If dr IsNot Nothing Then
    Dim wz As Integer = Tables("产品数量统计").FindRow( dr )
    If wz >= 0 Then
        Tables("产品数量统计").Position = wz              
 End If
End If

这是我写的查找并显示代码  请问怎么让我显示的那行的样式变成我想要的样式,要怎么加代码  在线坐等

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/1/23 16:18:00 [只看该作者]


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


加好友 发短信
等级:幼狐 帖子:57 积分:554 威望:0 精华:0 注册:2015/5/10 17:46:00
  发帖心情 Post By:2016/1/23 16:22:00 [只看该作者]

你这个我知道  但是我做按钮然后写代码  样式的代码写不进去

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/1/23 16:25:00 [只看该作者]

怎么个写不进去,贴出代码

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/1/24 11:05:00 [只看该作者]

以下是引用cjz7120641在2016/1/23 16:22:00的发言:
你这个我知道  但是我做按钮然后写代码  样式的代码写不进去

 

比如,drawcell事件

 

If e.Table.Current.index = e.Row.index Then
    e.Style = "样式1"

End If

 


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


加好友 发短信
等级:幼狐 帖子:57 积分:554 威望:0 精华:0 注册:2015/5/10 17:46:00
  发帖心情 Post By:2016/1/24 15:18:00 [只看该作者]

谢谢了

 回到顶部