关于VB的几道编程题 谢谢帮忙·

1-4:在名称为Form1的窗体上建立二个名称分别为Cmd1、Cmd2,标题为“按钮一”、“按钮二”的命令按钮(如图1所示)。要求程序运行后,如果单击“按钮一”,则把“按... 1-4:在名称为Form1的窗体上建立二个名称分别为Cmd1、Cmd2,标题为“按钮一”、“按钮二”的命令按钮(如图1所示)。要求程序运行后,如果单击“按钮一”,则把“按钮二”移到“按钮一”上(如图2所示),使两个按钮重合。

1-5:在名称为Form1的窗体上画一个命令按钮,名称为Command1,其标题为“移动本按钮”,如图所示。要求编写适当的事件过程,使得程序运行是,每单击按钮一次,按钮向左移动100。要求:程序中不得使用变量,事件过程中只能写一条语句。

在名称为Form1的窗体上画一个名称为L1的标签,标题为“请确认”;再画两个命令按钮,名称分别为C1、C2,标题分别为“是”、“否”,高均为300,宽均为800。如图所示。
请在属性窗口中设置适当属性满足以下要求:
1) 窗体标题为“确认”,窗体标题栏上不显示最大化和最小化按钮;
2) 在任何情况下,按回车键都相当于单击“是”按钮;按ESC键都相当于单击“否”按钮。

1-7:在名称为Form1的窗体上画一个名称为Lab的标签,设置高度为450,宽度为1500,标签上显示内容为“标签”。要求程序运行后,若双击窗体则执行语句Lab.Caption=“双击”,若单击窗体则执行语句Lab.Caption=“”。

1-8:在名称为Form1的窗体上画两个标签(名称分别为Label1和Label2,标题分别为“书名”和“作者”)、两个文本框(名称分别为Text1和Text2,Text属性均为空白)和一个命令按钮(名称为Command1,标题为“显示”),如图1所示。然后编写命令按钮的Click事件过程。程序运行后,在两个文本框中分别输入书名和作者,然后单击命令按钮,则在窗体的标题栏上先后显示两个文本框中的内容,如图2所示。要求程序中不得使用任何变量。

1-9:在名称为Form1的窗体上画一个标签(名称为Label1,标题为“输入信息”)、一个文本框(名称为Text1,Text属性为空白)和一个命令按钮(名称为Command1,标题为“显示”),如图1所示。然后编写命令按钮的Click事件过程。程序运行后,在文本框中输入“计算机等级考试”,然后单击命令按钮,则标签和文本框消失,并在窗体上显示文本框中的内容。运行后的窗体如图2所示。要求程序中不得使用任何变量。

1-10:在名称为Form1的窗体上画一个名称为L1的标签,标题为“口令”;画两个文本框,名称分别为Text1、Text2,都没有
初始内容;再画三个命令按钮,名称分别为C1、C2、C3,标题分别为“显示口令”、“隐藏口令”、“复制口令”。在开始运行时,向Text1中输入的所有字符,都显示“*”,单击“显示口令”按钮后,在Text1中显示所有字符,再单击“以隐藏口令”后,Text1中的字符不变,但显示的都是“?”,单击“复制口令”后,把Text1中的实际内容复制到Text2中,如图所示。
要求:
1) 在属性窗口中,把窗体的标题改为“口令窗口”;
2) 建立适当的事件过程,完成上述功能。每个过程中只允许写一条语句,且不能使用变量。

麻烦大家把过程写一下··
展开
 我来答
swx1995
2009-09-02 · TA获得超过2696个赞
知道大有可为答主
回答量:1477
采纳率:0%
帮助的人:2359万
展开全部
1-4:在名称为Form1的窗体上建立二个名称分别为Cmd1、Cmd2,标题为“按钮一”、“按钮二”的命令按钮(如图1所示)。要求程序运行后,如果单击“按钮一”,则把“按钮二”移到“按钮一”上(如图2所示),使两个按钮重合。

private sub cmd1_click()
cmd2.move cmd1.left,cmd1.top,cmd1.width,cmd1.height
end sub

1-5:在名称为Form1的窗体上画一个命令按钮,名称为Command1,其标题为“移动本按钮”,如图所示。要求编写适当的事件过程,使得程序运行是,每单击按钮一次,按钮向左移动100。要求:程序中不得使用变量,事件过程中只能写一条语句。

private sub command1_click()
command1.left = command1.left - 100
end sub

在名称为Form1的窗体上画一个名称为L1的标签,标题为“请确认”;再画两个命令按钮,名称分别为C1、C2,标题分别为“是”、“否”,高均为300,宽均为800。如图所示。
请在属性窗口中设置适当属性满足以下要求:
1) 窗体标题为“确认”,窗体标题栏上不显示最大化和最小化按钮;
2) 在任何情况下,按回车键都相当于单击“是”按钮;按ESC键都相当于单击“否”按钮。

1)点击窗体,属性里面设置Caption为确认,设置MaxButton=False,MinButton=False
2)点击“是”按钮(c1),设置Default=true
点击“否”按钮(c2),设置cancel=true

1-7:在名称为Form1的窗体上画一个名称为Lab的标签,设置高度为450,宽度为1500,标签上显示内容为“标签”。要求程序运行后,若双击窗体则执行语句Lab.Caption=“双击”,若单击窗体则执行语句Lab.Caption=“”。

private sub form_click()
lab.caption = ""
end sub

private sub form_dblclick()
lab.caption = "双击"
end sub

1-8:在名称为Form1的窗体上画两个标签(名称分别为Label1和Label2,标题分别为“书名”和“作者”)、两个文本框(名称分别为Text1和Text2,Text属性均为空白)和一个命令按钮(名称为Command1,标题为“显示”),如图1所示。然后编写命令按钮的Click事件过程。程序运行后,在两个文本框中分别输入书名和作者,然后单击命令按钮,则在窗体的标题栏上先后显示两个文本框中的内容,如图2所示。要求程序中不得使用任何变量。

private sub command1_click()
me.caption = text1.text & text2.text
end sub

1-9:在名称为Form1的窗体上画一个标签(名称为Label1,标题为“输入信息”)、一个文本框(名称为Text1,Text属性为空白)和一个命令按钮(名称为Command1,标题为“显示”),如图1所示。然后编写命令按钮的Click事件过程。程序运行后,在文本框中输入“计算机等级考试”,然后单击命令按钮,则标签和文本框消失,并在窗体上显示文本框中的内容。运行后的窗体如图2所示。要求程序中不得使用任何变量。

private sub command1_click()
print text1.text

label1.visible = false
text1.visible = false
end sub

1-10:在名称为Form1的窗体上画一个名称为L1的标签,标题为“口令”;画两个文本框,名称分别为Text1、Text2,都没有
初始内容;再画三个命令按钮,名称分别为C1、C2、C3,标题分别为“显示口令”、“隐藏口令”、“复制口令”。在开始运行时,向Text1中输入的所有字符,都显示“*”,单击“显示口令”按钮后,在Text1中显示所有字符,再单击“以隐藏口令”后,Text1中的字符不变,但显示的都是“?”,单击“复制口令”后,把Text1中的实际内容复制到Text2中,如图所示。
要求:
1) 在属性窗口中,把窗体的标题改为“口令窗口”;
2) 建立适当的事件过程,完成上述功能。每个过程中只允许写一条语句,且不能使用变量。

1)点击窗体,设置窗体的Caption为口令窗口,设置text1的passwordchar属性为*
2)
private sub c1_click()
text1.passwordchar=""
end sub

private sub c2_click()
text1.passwordchar="?"
end sub

private sub c3_click()
text2.text = text1.text
end sub
--
2022-12-05 广告
图形化编程简单理解为用积木块形式编程,scratch和python也是其中的一种,属于入门级编程,以其简单生动的画面获得无数学生的喜爱,深圳市创客火科技有限公司是一家做教育无人机的公司,旗下有编程无人机,积木无人机及室内外编队,每款飞机含有... 点击进入详情页
本回答由--提供
华夏日长兴
2009-09-02 · TA获得超过9592个赞
知道大有可为答主
回答量:6305
采纳率:85%
帮助的人:3718万
展开全部
还真有不嫌分少的
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
tianqing20wen

2009-09-02 · TA获得超过2.4万个赞
知道大有可为答主
回答量:8226
采纳率:88%
帮助的人:5108万
展开全部
题多分少。多一点自然很多人帮你做
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 2条折叠回答
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式