用vb:设计一个窗体,在窗体上添加命令按钮。运行程序时,每次用鼠标单击命令按钮,使命令按钮向右移动100 5

设计一个窗体,在窗体上添加命令按钮。运行程序时,每次用鼠标单击命令按钮,使命令按钮向右移动100缇,单击窗体,使窗体向左移动300缇。... 设计一个窗体,在窗体上添加命令按钮。运行程序时,每次用鼠标单击命令按钮,使命令按钮向右移动100缇,单击窗体,使窗体向左移动300缇。 展开
 我来答
zcxv1221
2010-04-15 · TA获得超过880个赞
知道小有建树答主
回答量:178
采纳率:0%
帮助的人:229万
展开全部
Private Sub Command1_Click()
Command1.Left = Command1.Left + 100
End Sub

Private Sub Form_Click()
Me.Left = Me.Left - 300
End Sub
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
百度网友740e59274
2010-04-15 · TA获得超过783个赞
知道小有建树答主
回答量:549
采纳率:0%
帮助的人:0
展开全部
Private Sub Command1_Click()
Command1.move Command1.Left + 100,Command1.top
End Sub

Private Sub Form_Click()
move Left - 300,top
End Sub
本回答被网友采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
东林太云山
2010-04-18
知道答主
回答量:28
采纳率:0%
帮助的人:14.3万
展开全部
Private Sub Command1_Click()
Label1.Left = Form1.Width
If Label1.Left <= Form1.Width Then
Label1.Left = Label1.Left - 300
Else
Label1.Left = Form1.Width
End If
End Sub

Private Sub form1_Click()
Label1.right = Form1.Width
If Label1.right<= Form1.Width Then
Label1.right = Label1.right- 300
Else
Label1.right= Form1.Width
End If
End Sub
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
陆庆骏
2010-04-19
知道答主
回答量:7
采纳率:0%
帮助的人:0
展开全部
拿两分我也不懂
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

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

类别

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

说明

0/200

提交
取消

辅 助

模 式