vb的编程题

答案:3 悬赏:50 手机版

解决时间 2021-05-10 04:09

提问者网友：浩歌待明月
2021-05-09 21:37

最佳答案

五星知识达人网友：枭雄戏美人
2021-05-09 22:02

Private Sub Command1_Click()
Timer1.Enabled = True
Timer2.Enabled = False
Text1 = ""
Text1.Text = "你当前点击的是“移动”命令按钮"
End Sub

Private Sub Command2_Click()
Timer1.Enabled = False
Timer2.Enabled = False
Text1 = ""
Text1.Text = "你当前点击的是“停止”命令按钮"
End Sub

Private Sub Command3_Click()
Timer2.Enabled = True
Timer1.Enabled = False
Text1.Text = "你当前点击的是“加快”命令按钮"
End Sub

Private Sub Command4_Click()
Timer1.Enabled = False
Timer2.Enabled = False
Image1.Left = 7560
Text1.Text = "你当前点击的是“还原”命令按钮"
End Sub

Private Sub Command5_Click()
Image1.Picture = LoadPicture("C:\Documents and Settings\Administrator\桌面\1.JPEG")
Text1.Text = "你当前点击的是“更换图标”命令按钮"
End Sub

Private Sub Form_Load()
Image1.Left = 7560
End Sub

Private Sub Timer1_Timer()
Image1.Left = Image1.Left - 100
End Sub

Private Sub Timer2_Timer()
Image1.Left = Image1.Left - 200
End Sub

全部回答

1楼网友：归鹤鸣
2021-05-09 22:28

是啊，你是遇到什么问题了啊

2楼网友：大漠
2021-05-09 22:11

晕倒什么意思。

起码给点文字说明把？

给张图没能完全明白你啥意思

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息