已有23人关注
再向各位大师请教一个字符串转换成数值的问题
发表在VB答疑区 2009-12-31
是否精华
版块置顶:
我在一个窗体中有一个ComboBox控件和一个DataGrid控件。
    ComboBox控件中写入的是字符串"大漠孤烟"、"小漠孤烟"、"水漠孤烟"。在DataGrid.Columns(3)这一列中,都是一些如“VB2007”、“VB2008”、“VB2009”等这样的数据。而这些数据又分别代表不同的含义,如:"大漠孤烟"对应“VB2007”;"小漠孤烟"对应“VB2008”;"水漠孤烟"对应“VB2009”。
    这是不是就是所谓的字符串转换呀?还真的不会噢。请哪位大师帮帮忙。在此谢过了!!!
分享到:
精彩评论 5
vbsoldier
学分:0 LV1
2010-01-03
沙发
请问是在输入数据时根据ComboBox控件中的列表项把相关的内容插入到数据表中,还是选中DataGrid控件某一行时在ComboBox控件中选则相对应的列表项?
大漠孤烟2009
学分:0 LV1
2010-01-03
板凳
在输入数据时根据ComboBox控件中的列表项把相关的内容插入到数据表中。能做到吗?怎么做?请指教!谢谢!!!
vbsoldier
学分:0 LV1
2010-01-06
地板
[FIELDSET][LEGEND]引自:2楼[/LEGEND]
在输入数据时根据ComboBox控件中的列表项把相关的内容插入到数据表中。能做到吗?怎么做?请指教!谢谢!!!
[/FIELDSET]

回复:
  可以根据ComoBox控件中的内容进行条件查询,将查询到记录中的VBxxxx插入到指定的数据表中。
大漠孤烟2009
学分:0 LV1
2010-01-08
4L
其实在请教之前,我也想到了“根据ComoBox控件中的内容进行条件查询,将查询到记录中的VBxxxx插入到指定的数据表中”这个做法,并且也是这样做的,如: 
Combo1.List(0) = "丰荣支行"
  If Combo1.List(0) = "大漠孤烟" Then
     rs1.Fields("SSSSSS") = "VB2007"
  End If
但是,我只是写在了装入事件里,而没有写在“添加”事件当中,所以怎么也不能实现这一功能。现在好了,我在装入事件和“添加”事件中分别写入这些代码,立即实现了这一功能。
再次谢谢!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
大漠孤烟2009
学分:0 LV1
2010-01-08
5L
上面代码中有误,应为:
Combo1.List(0) = "大漠孤烟"
If Combo1.List(0) = "大漠孤烟" Then
rs1.Fields("SSSSSS") = "VB2007"
End If
首页上一页 1 下一页尾页 5 条记录 1/1页
手机同步功能介绍
友情提示:以下图书配套资源能够实现手机同步功能
明日微信公众号
明日之星 明日之星编程特训营
客服热线(每日9:00-17:00)
400 675 1066
mingrisoft@mingrisoft.com
吉林省明日科技有限公司Copyright ©2007-2022,mingrisoft.com, All Rights Reserved长春市北湖科技开发区盛北大街3333号长春北湖科技园项目一期A10号楼四、五层
吉ICP备10002740号-2吉公网安备22010202000132经营性网站备案信息 营业执照