原创力文档- 1、本文档共22页，可阅读全部内容。
- 2、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
- 3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
查看更多
;基本内容;5-4 单选按钮(Option Button);实例:四则运算;5-5 复选框(Check Box);例:试利用,结合标签框,演示字体效果相关属性,fontBold\fontItalic fontUnderline, ontstrikethru; 5-7列表框; 列表框基本属性;该属性用于设置或返回控件的列表项内容。属性值是一个字符型的数组，其下标是列表项的顺序号，从0开始 。 通过该属性可读出列表内容或向列表框添加列表项。
例： LIST1.LIST(2) =“服装部”
例： TEXT.TEXT=LIST1.LIST(2);该属性返回当前选定项目的索引。如果选定第一个项目，则属性值为0，如果选定下一个项目，则为1，依次类推。如未选定项目，则值为-1;通过TEXT属性获取列表内容、TEXT属性总是对应用户在运行时选定的列表项目。
例： TEXT1.TEXT=LIST1.TEXT;语法： box.Additem item [,index]
Box为列表框名称， 若item内容，index指定在列表中插入新项目的位置，默认为追加。; 实例：试在窗体中绘制一列表框，并设置Columns属性为2，内容为屏幕字体名清单; 实例：试在窗体中逐项添加德清学院计算机专业相关班级;语法： box.Additem index;实例：试用列表框编写字体设置;Private Sub form1_load()
dim I as integer
For I=0 to screen.fontcount-1
List1.additem screen.fonts(I)
Next I
For I=8 to 12
List3.additem trim(str(I))
Next I
For I=14 to 72 setp 2
List3.additem trim(str(I))
Next
End sub; ;Private Sub command1_click()
list2.clear
End sub
Private Sub command2_click()
list2.removeitem list2.listindex
End sub;组合框(ComboBox);组合框基本属性;Private Sub form1_load()
combo1.additem “北京”
combo1.additem”上海“
combo2.additem “北京”
combo2.additem”上海“
combo3.additem “北京”
combo3.additem”上海“
End sub
文档评论（0）