VB。如何把 TEXT 文本框中选中的字体 变成想要的颜色

Posted 2023-04-09

参考技术A 如何把
TEXT
文本框中选中的字体
变成想要的颜色
尽量要用到：SELTEXT,COMMONDIALOG,FORCOLOR。有其他方法也可以。
满意答案┢┦aΡpy纯7级2008-10-10文本框只能设置全部字体的颜色，无法单独改变部分字体的颜色，改用RichTextBox吧！方法如下：右击工具箱选“部件”，然后选中“Microsoft
Rich
TextBox
Control6.0”，在窗体上画一个RichTextBox控件，然后在代码中通过SelColor属性就可以改变选中的字体的颜色。

如何获得MFC列表框中选中的数据

如题。

用GetWindowText();
获得不了。 还有什么方法？
列表就一行。

listbox控件的一些操作
1. 属性列表：

SelectionMode 组件中条目的选择类型，即多选(Multiple)、单选(Single)

Rows 列表框中显示总共多少行

Selected 检测条目是否被选中

SelectedItem 返回的类型是ListItem，获得列表框中被选择的条目

Count 列表框中条目的总数

SelectedIndex 列表框中被选择项的索引值

Items 泛指列表框中的所有项，每一项的类型都是ListItem

2. 取列表框中被选中的值

ListBox.SelectedValue

3. 动态的添加列表框中的项：

ListBox.Items.Add("所要添加的项");

4. 移出指定项：

//首先判断列表框中的项是否大于0

If(ListBox.Items.Count > 0 )



//移出选择的项

ListBox.Items.Remove(ListBox.SelectedItem);



5. 清空所有项：

//首先判断列表框中的项是否大于0

If(ListBox.Items.Count > 0 )



//清空所有项

ListBox.Items.Clear();



6. 列表框可以一次选择多项：

只需设置列表框的属性 SelectionMode="Multiple",按Ctrl可以多选

7. 两个列表框联动，即两级联动菜单

//判断第一个列表框中被选中的值

switch(ListBox1.SelectValue)



//如果是"A"，第二个列表框中就添加这些：

case "A"

ListBox2.Items.Clear();

ListBox2.Items.Add("A1");

ListBox2.Items.Add("A2");

ListBox2.Items.Add("A3");

//如果是"B"，第二个列表框中就添加这些：

case "B"

ListBox2.Items.Clear();

ListBox2.Items.Add("B1");

ListBox2.Items.Add("B2");

ListBox2.Items.Add("B3");



8. 实现列表框中项的移位

即：向上移位、向下移位

具体的思路为：创建一个ListBox对象，并把要移位的项先暂放在这个对象中。

如果是向上移位，就是把当前选定项的的上一项的值赋给当前选定的项，然后

把刚才新加入的对象的值，再附给当前选定项的前一项。

具体代码为：

//定义一个变量，作移位用

index = -1;

//将当前条目的文本以及值都保存到一个临时变量里面

ListItem lt=new ListItem (ListBox.SelectedItem.Text,ListBox.SelectedValue);

//被选中的项的值等于上一条或下一条的值

ListBox.Items[ListBox.SelectedIndex].Text=ListBox.Items[ListBox.SelectedIndex + index].Text;

//被选中的项的值等于上一条或下一条的值

ListBox.Items[ListBox.SelectedIndex].Value=ListBox.Items[ListBox.SelectedIndex + index].Value;

//把被选中项的前一条或下一条的值用临时变量中的取代

ListBox.Items[ListBox.SelectedIndex].Test=lt.Test;

//把被选中项的前一条或下一条的值用临时变量中的取代

ListBox.Items[ListBox.SelectedIndex].Value=lt.Value;

//把鼠标指针放到移动后的那项上

ListBox.Items[ListBox.SelectedIndex].Value=lt.Value;

9. 移动指针到指定位置：

(1).移至首条

//将被选中项的索引设置为0就OK了

ListBox.SelectIndex=0;

(2).移至尾条

//将被选中项的索引设置为ListBox.Items.Count-1就OK了

ListBox.SelectIndex=ListBox.Items.Count-1;

(3).上一条

//用当前被选中的索引去减 1

ListBox.SelectIndex=ListBox.SelectIndex - 1;

(4).下一条

//用当前被选中的索引去加 1

ListBox.SelectIndex=ListBox.SelectIndex + 1;

listBox显示最下面的一行。listBox1.SelectedIndex = listBox1.Items.Count - 1;

listBox删除所选择的行 listBox1.Items.Remove(listBox1.SelectedItem);

combo box用法： 参考技术A int Cur=m_ListGroup.GetNextItem(-1,LVNI_ALL|LVNI_SELECTED);
//m_ListGroup 是CList，获得的是列表中选中的第几行
if (Cur<0)//如果是0行，退出
return;
CString strGroup=m_ListGroup.GetItemText(Cur,1);获得Cur行第2列的内容 参考技术B int Cur=m_ListGroup.GetNextItem(-1,LVNI_ALL|LVNI_SELECTED);
//m_ListGroup 是CList，获得的是列表中选中的第几行
if (Cur<0)//如果是0行，退出
return;
CString strGroup=m_ListGroup.GetItemText(Cur,1);获得Cur行第2列的内容

晕 列表就一行？用这个也可以啊~~本回答被提问者和网友采纳