求助大佬
vb吧
全部回复
仅看楼主
level 2
界面上方要有滚动的“欢迎使用成绩管理界面”的字样,滚动时碰到左、右边界要弹回
2020年06月22日 06点06分 1
level 4
文字改成动态移动的?
2020年06月22日 07点06分 2
level 7
有个思路 可以通过改变标签控件的left值从而使标签移动 以下是代码 不过还没有调试过 如果有错误欢迎指出[呵呵]
dim k%
Private Sub form_load
k=100
timer1.interval=100
end sub
Private Sub Timer1.time
if label1.left+label1.width=form1.width then
k=-100
else if label1.left=0 then
k=100
end if
label1.left=label1.left+k
end sub
2020年06月22日 08点06分 5
大佬,这个我运行后,它向右动出边界,然后就没了[委屈]
2020年06月22日 09点06分
把if后面紧接着一句的等于号改为大于号
2020年06月22日 11点06分
else if中的等于号改为小于号
2020年06月22日 11点06分
还有标签的边界尽量和字的边界重合 我调试着没问题了
2020年06月22日 11点06分
1