vb中combo的详细用法


1、定义控件对应变量
假定已经创建了一个Dialog,并且从控件工具箱将 Combo Box 控件拖放到上面。打开 Class Wizard,添加控件对应变量,如:CComboBoxm_cbExamble;
在后面的代码中会不断使用这个变量。
2、在ComboBox控件属性的Data标签里面添加,一行表示ComboBox下拉列表中的一行。换行用ctrl+回车。
3、在程序初始化时动态添加
如: //控件内容初始化
CString strTemp;
((CComboBox*)GetDlgItem(IDC_COMBO_CF))->ResetContent();//消除现有所有内容
for(int i=1;i<=100;i++)
{
  strTemp.Format("%d",i);
  ((CComboBox*)GetDlgItem(IDC_COMBO_CF))->AddString(strTemp);
}
4、下拉的时候添加
如: CString strTemp;
intiCount=((CComboBox*)GetDlgItem(IDC_COMBO_CF))->GetCount();//取得目前已经有的行数
if(iCount<1)//防止重复多次添加
{
  ((CComboBox*)GetDlgItem(IDC_COMBO_CF))->ResetContent();
  for(inti=1;i<=100;i++)
   {
   strTemp.Format("%d",i);
   ((CComboBox*)GetDlgItem(IDC_COMBO_CF))->AddString(strTemp);
   }
}
5、取得Combo Box框内容
取当前内容
((CComboBox*)GetDlgItem(IDC_COMBO_CF))->GetWindowText(strTemp);
取其他行内容
((CComboBox*)GetDlgItem(IDC_COMBO_CF))->GetLBText(n,strTemp);
ComboBox 控件,ComboBox 控件将 TextBox 控件和 ListBox 控件的特性结合在一起-既可以在控件的文本框部分输入信息,也可以在控件的列表框部分选择一项。
语法
ComboBox
说明
为了添加或删除 ComboBox 控件中的项目,需要使用 AddItem 或 RemoveItem 方法。设置 List、ListCount、和 ListIndex 属性,使访问 ComboBox 中的项目成为可能。也可以在设计时使用 List 属性将项目添加到列表中。
注意 只有当 ComboBox 的下拉部分的内容被滚动时,Scroll 事件才在 ComboBox 中发生,而不是每次 ComboBox 的内容改变时。例如,如果 ComboBox 的下拉部分包含五行,并且最顶上的项为突出显示,则在您按完向下箭头键六下(或按一次 PgUp 键)之前 Scroll 事件不发生。再往后,每按一次向上箭头键引发一次 Scroll 事件。
AddItem 方法,用于将项目添加到 ListBox 或 ComboBox 控件,或者将行添加到 MS Flex Grid 控件。
RemoveItem 方法,用以从 ListBox 或 ComboBox 控件中删除一项,或从 MS Flex Grid 控件中删除一行。
具体应用实例代码:
Private Sub Form_Click()    Dim Entry, I, Msg   ' 声明变量。    Msg = "Choose OK to add 100 items to your list box."    MsgBox Msg   ' 显示信息。    For I = 1 To 100   ' 计数值从 1 到 100。        Entry = "Entry " & I   ' 创建输入项。        List1.AddItem Entry   ' 添加该输入项。    Next I    Msg = "Choose OK to remove every other entry."    MsgBox Msg   ' 显示信息。    For I = 1 To 50   ' 确定如何        List1.RemoveItem I   ' 每隔一项    Next I   ' 删除。    Msg = "Choose OK to remove all items from the list box."    MsgBox Msg   ' 显示信息。    List1.Clear   ' 清除列表框。End Sub

文章标签:

本文链接:https://www.u1e.cn/baike/a/4141ad17993cf80130fed650 [复制]

猜你喜欢

歇后语大全

还没有人回应过