请教关中刀客前辈~关于Switch之运作问题&图片
Q1
谢谢您的程序码…小弟不胜感激
但现在有个瓶颈
就是我本身的问题是这样的
题号 题数 配分
1 5 (5、4、3、2、1)
2 5 (5、4、3、2、1)
3 3 (5、3、1)
4 5 (5、4、3、2、1)
5 3 (5、3、1)
6 5 (5、4、3、2、1)
7 5 (5、4、3、2、1)
然后有五种类型的评语A、B、C、D、E
所以评分标准应该是↓
( 评语－分数 )
A－7
B－8~20
C－21
D－22~34
E－35
<修改后的程序码>
-----------------------------------------------------
void __fastcall TTest_3::PageControl1Change(TObject *Sender)
{
if(PageControl1-> ActivePageIndex==7)
{
int k0,k;
k0=
Edit1-> Text.ToIntDef(0)
+Edit2-> Text.ToIntDef(0)
+Edit3-> Text.ToIntDef(0)
+Edit4-> Text.ToIntDef(0)
+Edit5-> Text.ToIntDef(0)
+Edit6-> Text.ToIntDef(0)
+Edit7-> Text.ToIntDef(0);
if(k0> =5 && k0 <=35)
k=k0/7;
switch (k)
{
case 4:
Label1-> Caption=IntToStr(k0);
Label4-> Caption= "E ";
break;
case 3:
Label1-> Caption=IntToStr(k0);
Label4-> Caption= "D ";
break;
case 2:
Label1-> Caption=IntToStr(k0);
Label4-> Caption= "C ";
break;
case 1:
Label1-> Caption=IntToStr(k0);
Label4-> Caption= "B ";
break;
default:
Label1-> Caption=IntToStr(k0);
Label4-> Caption= "A ";
break;
}
}
}
-----------------------------------------------------
但这样程序码会跑掉….请问该怎么修改呢?
Q2.
另外不好意思的是
如果我想因不同的类型的评语添上不同的图片
则在Switch程序码应该添上什么呢?
感谢您
[解决办法]
用个简单的数据库比如ACCESS
原先拉种办法不适合你这些功能的
ACCESS数据库可有图片字段
