Foxtable(狐表)用户栏目专家坐堂 → 分别显示


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

主题:分别显示

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/5/11 13:46:00 [显示全部帖子]

如下,图片控件,尽量不要根据图片大小变化,这样不利于窗口排版。

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:学习变换.table


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/5/11 16:31:00 [显示全部帖子]

这个意思?

  

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:学习变换.table


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/5/11 17:59:00 [显示全部帖子]

 currentChange代码

 

If e.Table.Current Is Nothing Then '如果Current为Nothing
    Return '则返回
End If
If Forms("窗口1").Opened Then
    Dim c0 As WinForm.CheckBox = Forms("窗口1").Controls("CheckBox10")
    Dim c1 As WinForm.CheckBox = Forms("窗口1").Controls("CheckBox11")
    Dim c2 As WinForm.CheckBox = Forms("窗口1").Controls("CheckBox3")
    Dim c3 As WinForm.CheckBox = Forms("窗口1").Controls("CheckBox9")
    Dim s As String = "肩宽/袖长/衣长/袖围,腰围/裤长/裤围/臀围,腰围/腰高/脚围/裤长"
    Dim flag As Boolean = True
    Dim ary() As String = {"T恤","衬衫", "短裤", "牛仔裤"}
    If e.Table.Current.IsNull("第一列") = False
        Dim i As Integer = array.IndexOf(ary,e.Table.Current("第一列"))
        If i >= 0
            c0.Text = s.Split(",")(i).Split("/")(0)
            c1.Text = s.Split(",")(i).Split("/")(1)
            c2.Text = s.Split(",")(i).Split("/")(2)
            c3.Text = s.Split(",")(i).Split("/")(3)
            flag = False
        End If
    End If
    If flag Then
        c0.Text = Nothing
        c1.Text = Nothing
        c2.Text = Nothing
        c3.Text = Nothing
    End If
End If


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/5/11 19:08:00 [显示全部帖子]

以下是引用yangwenghd在2014-5-11 18:49:00的发言:
输入牛仔裤的时候还是会报警
兄弟,谢谢 是不是我那里设置出错了

 

因为牛仔裤没有对应的值。

 


    Dim s As String = "肩宽/袖长/衣长/袖围,腰围/裤长/裤围/臀围,腰围/腰高/脚围/裤长,腰围/腰高/脚围/裤长"
   


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/5/11 21:01:00 [显示全部帖子]

 呃,没有问题。不改变图片路径的,也在这里了。

  

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:学习变换 (2).table


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/5/11 21:52:00 [显示全部帖子]

以下是引用yangwenghd在2014-5-11 21:47:00的发言:
还是会改变 ,不知道是不是放在u盘里面的原因

 

你先补充一些基础知识吧。没看懂你的意思。

 

如果你要引用图片,尽量把图片放在你这个项目文件夹下。

 

具体问题,你请上传一个完整的例子说明,列怎么来。引用哪个文件夹的图片.....等等


 回到顶部