VB编程-鼠标与键盘事件过程

来源:百度知道 编辑:UC知道 时间:2024/06/05 13:24:50
在窗体上画若干控件,然后画两个列表框,其中一个用来列出当前窗体上控件的名称,另一个列表框列出15种鼠标光标的形状。程序运行后,从第一个列表框中选择控件或窗体;从第二个列表框中选择鼠标光标形状,为选择的控件或窗体设置所需要的鼠标光标形状。
要求:两个列表框隐藏,只在需要时显示出来。

提供一个思路:
开始设置时Combo1.和Combo2.visiable=false
控件Combo1.AddItem 控件名 Combo2.AddItem 鼠标光标形状
需要时visiable=true
for 循环语句
if 控件.name=Combo1.Text then
控件.MousePointer=Combo2.Text
endif

visiable