求 Visual Basic高手解决问题？求编码……

显示全部楼层 · 2011-6-13 22:11:34

设计出国旅游路线，从出发地和到达地各选一个城市。如选中“旅游团”则随团旅游，否则自助游；如选中“信用卡”则刷卡消费，否则现金消费。用户选择的结果用标签框显示出来，运行界面如图所示。
（提示：将用户选择的出发地点、到达地点、是否旅游团、是否信用卡消费的结果分别存入变量a、b、c、d，标签框显示的内容使用a、b、c、d的值）
图片

千问 · 2011-6-13 22:11:34

dim a,b,c,dprivate sub command1_click()if check1.value=vbchecked then c="旅游团" else c="自助游"if check2.value=vbchecked then d="刷卡消费" else d="不刷卡消费"label1.caption="从" & a & "到" & b & "," & c & "," & dend subPrivate Sub Option1_Click(Index As Integer)a=Option1(Index).CaptionEnd SubPrivate Sub Option2_Click(Ind...

千问 · 2011-6-13 22:11:34

把dim a as integer 那一部分改成下面的就可以了dim a as stringdim b as stringdim c as stringdim d as string...

求 Visual Basic高手解决问题？ 求编码……

求 Visual Basic高手解决问题？求编码……