作者dx0789111 (神奇小红豆)
看板Visual_Basic
标题[.NET] 要怎样才能够累加值呢?
时间Tue May 27 17:17:23 2014
请输入专案类型(网站专案或者应用程式专案)：
visual studio 2013
我正在做一个背英文单字的程式
其中有一块是单字测验
在测验里面我是用combobox来选择选项
而选完之後就要按button来交
每一题答对会让总得分加一分
但是我弄出来他的得分都不会累加
只会跑出单次的分数
请问要怎麽写才能让分数累加呢>_<
我的程式码
dim i as integer
select case combobox1.selectindex '日期
case 0
if combobox2.selectindex = 0 then i = i + 1
if combobox3.selectindex = 0 then i = i + 1
case 1
if combobox2.selectindex = 1 then i = i + 1
if combobox3.selectindex = 1 then i = i + 1
end select
label14.text = i
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 114.36.96.93
※ 文章网址: http://webptt.com/cn.aspx?n=bbs/Visual_Basic/M.1401182246.A.039.html
1F：推 johnpage:key 全域变数 05/27 20:51
2F：→ dx0789111:抱歉 我真的看不太懂 请问是要怎麽用key@@ 05/27 22:55
3F：→ MOONRAKER:每次都生一个新的i 当然不会累加 05/28 12:14
4F：→ MOONRAKER:你要把label14的内容先拿出来转换到i里面阿 05/28 12:14
可是我再编辑label14的程式码的时候 再里面打i他读不出来 好像这两个i没关系
抱歉 我真的是新手 完全看不懂 所以我要在label14里面打甚麽>_<??
5F：→ MOONRAKER:有一个字串转整数的函数 把label4.text转过去放到i里面 05/29 07:28
所以我是要在原本的这个button里面最後一行改成val(label14.text)这样子吗? 可是好像还是跑不出来...
※ 编辑: dx0789111 (114.42.74.230), 05/29/2014 23:49:12
6F：→ MOONRAKER:…………你知道等号左边跟右边的差别吗…………… 05/30 10:16
7F：推 nfsong:取label值 转integer 05/31 18:48
8F：→ nfsong:label 值可用 e.item.itemtype=listitem.item and e.item. 05/31 18:49
9F：→ nfsong: google 上面这句 取得control 05/31 18:50
10F：推 nfsong:或者是form1.findcontrol 取得 05/31 18:52
11F：→ MOONRAKER:路越绕越远了 快到北京了 05/31 23:17
哈哈 抱歉 我真的弄不出来 不过我已经改了新方式 就是用阵列a() as boolean来弄
已经成功了 感谢各位
※ 编辑: dx0789111 (114.42.213.55), 06/04/2014 18:51:31