- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
实验步骤与调试过程
1.创建工作文件夹
2.按照要求设计“学生成绩对话框”
3.添加CstudentRec类代码
在Ex_InputDlg.h文件的class CEx_InputDlg:Public Cdialog语句前面添加下列类代码:
class CStudentRec
{
public:
CStudentRec(CString name,CString id,float s1,float s2,float s3)
{
strName=name;
strID=id;
fScore[0]=s1;fScore[1]=s2;fScore[2]=s3;
}
CStudentRec(){};
~CStudentRec(){};
CString strName;
CString strID;
float fScore[3];
};
4.添加控件变量及初始代码
在OnInitDialog中添加下列代码:
m_spinScore1.SetRange(0,100);
m_spinScore2.SetRange(0,100);
m_spinScore3.SetRange(0,100);
//设置组合框的内容
CString str;
for(int i=0;i=50;i++)
{
str.Format(2105101%2d,i);
m_comboNO.InsertString(i-1,str);
}
m_comboNO.SetCurSel(0);
5.完善代码
实验结果
程序成功运行,并能完成要求的功能。
疑难小结
利用列表框(ListBox)可以选择所需要的选项,达到与用户对话的目的,如果有较多的选项而不能一次全部显示时,VB会自动加上流离颠沛滚动条,其最主要的特点是只能从其中选择但不能直接修改其中的内容。而组合框是组合了文本框和列表框的特性而形成的一种控件,组合框在列表框中列出了可供用户选择的选项,当用户选定某项后,该项内容自动装入文本框中。当列表框中没有所需项目时,除了下拉式列表框之外都允许在文本框中用键盘输入,但输入的内容不能自动添加到列表框中。
主要算法和程序清单
1)在CEx_InputDlg类中映射IDC_BUTTON_ADD按钮控件的BN_CLICKED消息,并添加如下代码:
UpdateData();
m_strName.TrimLeft();
m_strName.TrimRight();
if(m_strName.IsEmpty())
{
MessageBox(姓名不能为空!,提示);
return;
}
CString str;
str.Format(%15s%10s%6.1f,m_strName,m_strNO,m_fScore1,m_fScore2,m_fScore3);
CStudentRec *rec=new CStudentRec(m_strName,m_strNO,m_fScore1,m_fScore2,m_fScore3);
int Index=m_ListBox.AddString(str);
m_ListBox.SetItemDataPtr(nIndex,rec);
(2)映射IDC_BUTTON_DEL按钮控件的BN_CLICKED消息,并添加如下代码:
int nIndex=m_ListBox.GetCurSel();
if(nIndex!=LB_ERR)
{
delete(CStudentRec*)m_ListBox.GetItemDataPtr(nIndex);
m_ListBox.DeleteString(nIndex);
}
else
GetDlgItem(IDC_BUTTON_DEL)-EnableWindow(FALSE);
(3)映射IDC_LIST1列表框控件的LBN_SELCHANGE消息
int nIndex=m_ListBox.GetCurSel();
if(nIndex!=LB_ERR)
{
GetDlgItem(IDC_BUTTON_DEL)-EnableWindow(TRUE);
CStudentRec data;
data=*(CStudentRec*)m_ListBox.GetItemDataPtr(nIndex);
m_strName=data.strID;
m_fScore1=data.fScore[0];
m_fScore2=data.fScore[1];
m_fScore3=data.fScore[2];
UpdateData(FALSE);
}
else
GetDlgItem(IDC_BUTTON_DEL)-EnableWindow(FAL
您可能关注的文档
- UML课程设计网络订餐系统.doc
- Unipol工艺气相法聚乙烯催化剂.doc
- Unit 1 新视野 大学英语 第二册.ppt
- Unit 2《English around the world》市级公开课 writing 课件 (新人教版必修1).ppt
- Unit 16Lesson 2Name Stories教学设计 - 佛山市中小学新课程课.doc
- UPS电源的运行操作规程.doc
- UPS蓄电池容量的计算方法及举例.doc
- UPVC排水管安装工法.doc
- UVW变换证明三元不等式的例子.doc
- U盘重装系统方法步骤.doc
- 8 黄山奇石(第二课时)课件(共22张PPT).pptx
- 22《纸船和风筝》教学课件(共31张PPT).pptx
- 17 松鼠 课件(共23张PPT).pptx
- 23《海底世界》课件(共28张PPT).pptx
- 21《大自然的声音》课件(共18张PPT).pptx
- 第12课《词四首——江城子 密州出猎》课件 2025—2026学年统编版语文九年级下册.pptx
- 第2课《济南的冬天》课件(共42张PPT) 2024—2025学年统编版语文七年级上册.pptx
- 17 跳水 第二课时 课件(共18张PPT).pptx
- 第六单元课外古诗词诵读《过松源晨炊漆公、约客》课件 统编版语文七年级下册.pptx
- 统编版六年级语文上册 22《文言文二则》课件(共27张PPT).pptx
最近下载
- PPT高效制作与创意设计智慧树知到期末考试答案章节答案2024年南昌大学.docx VIP
- 《走进民间音乐》资料.docx VIP
- 肿瘤放射治疗学(南方医科大学)中国大学MOOC慕课章节测验答案(课程ID:1463742163).pdf VIP
- 零基础入门深度学习(全).pdf VIP
- 部编版五年级道德与法治上册第6课《我们神圣的国土》精美课件(第2课时).pptx
- xfer records serum血清合成器中文说明书.pdf VIP
- 钢结构课程设计.pdf VIP
- 2024年肥胖症诊疗指南要点解读课件PPT.pptx
- 2025年缆车项目立项申请书(立项备案).pdf VIP
- 数据结构讲义(严蔚敏版)第四章 串.ppt VIP
原创力文档


文档评论(0)