Foxtable(狐表)用户栏目专家坐堂 → 求助大大


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

主题:求助大大

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


加好友 发短信
等级:幼狐 帖子:193 积分:1910 威望:0 精华:0 注册:2018/7/1 10:45:00
求助大大  发帖心情 Post By:2019/3/5 15:33:00 [显示全部帖子]

Dim xb As String = e.Form.Controls("性别").Text
Dim nl As String = e.Form.Controls("年龄").Text
Dim pbx As WinForm.PictureBox
pbx = e.form.Controls("PictureBox1")

If xb = "男" Then
    If nl > 50 Then
        pbx.Image = GetImage("Images\nln.png")
    ElseIf nl > 30 Then
        pbx.Image = GetImage("Images\nzn.png")
    Else
        pbx.Image = GetImage("Images\nqn.png")
    End If
ElseIf xb = "女" Then
    If nl > 50 Then
        pbx.Image = GetImage("Images\nln1.png")
    ElseIf nl > 30 Then
        pbx.Image = GetImage("Images\nzn1.png")
    Else
        pbx.Image = GetImage("Images\nqn1.png")
    End If
Else
    pbx.Image = GetImage("Images\none.png")
End If

把这段代码添加到姓名的valuechaned事件中  为什么无效  图片控件不显示 哪里出错了 谢谢
图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20190305153006.png
图片点击可在新窗口打开查看
[此贴子已经被作者于2019/3/5 15:33:50编辑过]

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


加好友 发短信
等级:幼狐 帖子:193 积分:1910 威望:0 精华:0 注册:2018/7/1 10:45:00
  发帖心情 Post By:2019/3/5 16:42:00 [显示全部帖子]

加了这个有显示 有变化了  
但是  我这个判断年龄语句是不是有问题,它不按年龄阶段出相应的图片

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


加好友 发短信
等级:幼狐 帖子:193 积分:1910 威望:0 精华:0 注册:2018/7/1 10:45:00
  发帖心情 Post By:2019/3/5 16:49:00 [显示全部帖子]

是绑定字段的  都有
    If nl > 60 Then
        pbx.Image = GetImage(projectPath & "Images\nln.png")
    ElseIf nl > 40 Then
        pbx.Image = GetImage(projectPath & "Images\nzn.png")
    Else
        pbx.Image = GetImage(projectPath & "Images\nqn.png")
    End If

我这个判断逻辑有错吗?

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


加好友 发短信
等级:幼狐 帖子:193 积分:1910 威望:0 精华:0 注册:2018/7/1 10:45:00
  发帖心情 Post By:2019/3/5 17:01:00 [显示全部帖子]

是绑定字段的  都有



    If nl > 60 Then
        pbx.Image = GetImage(projectPath & "Images\nln.png")
    ElseIf nl > 40 Then
        pbx.Image = GetImage(projectPath & "Images\nzn.png")
    Else
        pbx.Image = GetImage(projectPath & "Images\nqn.png")
    End If

我这个判断逻辑有错吗?

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


加好友 发短信
等级:幼狐 帖子:193 积分:1910 威望:0 精华:0 注册:2018/7/1 10:45:00
  发帖心情 Post By:2019/3/5 17:07:00 [显示全部帖子]

弹出的值 不按年龄 性别逻辑
感觉随便出的
呵呵

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


加好友 发短信
等级:幼狐 帖子:193 积分:1910 威望:0 精华:0 注册:2018/7/1 10:45:00
  发帖心情 Post By:2019/3/5 17:27:00 [显示全部帖子]

搞定  大大  谢谢 
应该用current 来实现数据读取

 回到顶部