几个VB上机的题目
属性设置1、在任何情况下,按回车键都相当于单击“是”按钮;按【ESC】键都相当于单击“否”按钮。2、在窗体(名称为Form1,KeyPreview属性为True)上画一个...
属性设置
1、在任何情况下,按回车键都相当于单击“是”按钮;按【ESC】键都相当于单击“否”按钮。
2、在窗体(名称为Form1,KeyPreview属性为True)上画一个列表框(名称为List1)和一个文本框(名称为Text1),如图26-5所示。编写窗体的KeyDown事件过程。程序运行后,如果按【A】键则从键盘上输入要添加到列表框中的项目(内容任意,不少于三个);如果按【D】键,则从键盘上输入要删除的项目,将其从列表框中删除。
3、弹出式菜单的建立。 展开
1、在任何情况下,按回车键都相当于单击“是”按钮;按【ESC】键都相当于单击“否”按钮。
2、在窗体(名称为Form1,KeyPreview属性为True)上画一个列表框(名称为List1)和一个文本框(名称为Text1),如图26-5所示。编写窗体的KeyDown事件过程。程序运行后,如果按【A】键则从键盘上输入要添加到列表框中的项目(内容任意,不少于三个);如果按【D】键,则从键盘上输入要删除的项目,将其从列表框中删除。
3、弹出式菜单的建立。 展开
5个回答
展开全部
1、在任何情况下,按回车键都相当于单击“是”按钮;按【ESC】键都相当于单击“否”按钮。
设置 Button 的 Default 属性 为 true,按回车键都相当于单击“是”按钮;
设置 Button 的 Cancel 属性 为 true,按【ESC】键都相当于单击“否”按钮;
2.if keycode=65 then
list1.additem "1"
list1.additem "11"
list1.additem "1111"
endif
if keycode=68 then
list1.clear
endif
3.在窗体的MOUSE_Down里if button=2 then popumenu MenuName'MenuName你的菜单的名称
设置 Button 的 Default 属性 为 true,按回车键都相当于单击“是”按钮;
设置 Button 的 Cancel 属性 为 true,按【ESC】键都相当于单击“否”按钮;
2.if keycode=65 then
list1.additem "1"
list1.additem "11"
list1.additem "1111"
endif
if keycode=68 then
list1.clear
endif
3.在窗体的MOUSE_Down里if button=2 then popumenu MenuName'MenuName你的菜单的名称
展开全部
1、在任何情况下,按回车键都相当于单击“是”按钮;按【ESC】键都相当于单击“否”按钮。
设置 Button 的 Default 属性 为 true,按回车键都相当于单击“是”按钮;
设置 Button 的 Cancel 属性 为 true,按【ESC】键都相当于单击“否”按钮;
祝你顺利
设置 Button 的 Default 属性 为 true,按回车键都相当于单击“是”按钮;
设置 Button 的 Cancel 属性 为 true,按【ESC】键都相当于单击“否”按钮;
祝你顺利
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
第一题有人答了,第二提没图!第三题:
if button=2 then ......
if button=2 then ......
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
第一题很简单,就按楼上所说的做,第二题给出图片先,第三个也不难,
语法格式为:object.PopupMenu menuname,flags,x, y,boldcommand
具体请参考:http://www.examda.com/ncre2/VB/fudao/20070301/114454257.html
语法格式为:object.PopupMenu menuname,flags,x, y,boldcommand
具体请参考:http://www.examda.com/ncre2/VB/fudao/20070301/114454257.html
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
自己揣摩吧
随便一本书都有的
随便一本书都有的
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询