发布网友 发布时间:5小时前
共0个回答
示例如下,如需要其他方式的移动稍微更改代码即可,也可以与我再联系 Const 步长 = 100 Const 步时 = 0.5 Private Sub Form_Load()Timer1.Interval = 1000 * 步时 End Sub Private Sub Timer1_Timer()Text1.Left = Text1.Left - 步长 If Text1.Left < 0 Then Text1.Left = Me.ScaleWid...
用vb 实现文本框的移动? 求指导怎么移动啊,自动移动,就把timer1控件时间间隔属性设为100,然后,Private Sub Timer1_Timer()Text1.Left = Text1.Left + 10 '向左移动 End Sub
vb中的left怎么用啊'left,就是控件最左边缘在屏幕中的位置, 你这样想,如果控件的left=0了,就说明控件紧挨着窗体的左边缘了, 可是这时候,让它转换到右边去,就会不完美, 比如这个标签的宽度(Label1.Width )是100的话,那么,如果label1的left值是-100时,就是完全移动,直到消失在窗体的最左边了..这时候就可以执行后面...
vb中用变量表示控件名回答:Dim i As Integer For i = 1 To 10 '多少个你自己定 Load Label1(i) Label1(i).Caption = i '属性自己定 Label1(i).Left = Label1(i - 1).Left + 2000 '属性自己定 Label1(i).Visible = True '设置为可视 Next i
vb文本框怎样才能自动滚动把TextBox放在PictureBox内(就是嵌在里面)大小要比PictureBox大 自己加个VScroll 别用TextBox的ScrollBar 然后在点击VScroll时分多次移动TextBox 看上去就象平滑滚动
vb编程中某控件向左移时left属性值是正的还是负的控件LEFT属性是针对你窗体规定的0坐标定的。左移的话就是原来的LEFT值减少。。正和负和位置有关,和移动么关系。。例如默认窗体最左边为0,负的就出窗体,正的在窗体内。我觉得你想
vb编程里,如何实现点击窗体中一个文本框出现日历控件,然后可以选择相应...首先在默认form1窗体上画一个文本框text1、再画一个日历控件MonthView1,记得是MonthView1控件,你自己排列好它们两个的位置即可,一切都按默认(不用改属性)。然后复制以下代码到form1的代码窗口里运行即可看到结果啦(如图):Private Sub Form_Load()MonthView1.Visible = False End Sub Private Sub ...
在VB中,left 属性指的是什么?还有interval 属性指什么?left: 一个空间的左边界距离父控件左边界的距离。interval: 定时器控件(Timer)计时的毫秒数。
VB中timer控件的用法先设置计时器的 Enabled=false 然后在单击“开始”按钮的事件中设置计时器的 Enabled=true 然后在计时器的Timer事件中写移动标签的代码 if label1.Left+label1.Width >= 0 then label1.Left=label1.Left-80 '修改80 可以改变移动的速度 else label1.Left=this.Width end if 再在单击“停止”...
vb使按钮左右移动取得1按钮的右边位置,left属性+width属性,2按钮的左位置,就是left属性。再定位3的left就可以了。Dim a Private Sub Command2_Click()Timer1.Enabled = True End Sub Private Sub Form_Click()Timer1.Enabled = False End Sub Private Sub Form_Load()Timer1.Interval = 100 a = 20 End Sub...