1樓：數學與計算機程式設計
private sub command1_click()
label1.top = label1.top - val(text3.text)
text2.text = label1.top
end sub
private sub command2_click()
label1.top = label1.top + val(text3.text)
text2.text = label1.top
end sub
private sub command3_click()
label1.left = label1.left - val(text3.text)
text1.text = label1.left
end sub
private sub command4_click()
label1.left = label1.left + val(text3.text)
text1.text = label1.left
end sub
private sub command5_click()
label1.top = val(text2.text)
label1.left = val(text1.text)
end sub
private sub form_load()
me.autoredraw = true
text1.text = label1.left
text2.text = label1.top
text3.tabindex = 0
end sub
設計介面：
2樓：網海1書生
假定那三個文字框分別是text1、text2、text3，「確定座標」按鈕為command1，紅色字的標籤為label1，下面的四個按鈕假定分別是command2、command3、command4、command5（本來這些都是需要你提供的，現在只好猜了，如果不對自己修改）。**如下：
private sub command1_click() '確定座標
label1.move val(text1.text), val(text2.text)
end sub
private sub command2_click() '向上
label1.top = label1.top - val(text3.text)
end sub
private sub command3_click() '向下
label1.top = label1.top + val(text3.text)
end sub
private sub command4_click() '向左
label1.left = label1.left - val(text3.text)
end sub
private sub command5_click() '向右
label1.left = label1.left + val(text3.text)
end sub
vb程式設計如何讓標籤移到右上角
3樓：匿名使用者
vb程式設計讓標籤移到右上角可使用move方法實現。
move 方法，用以移動 mdiform、form 或控制元件。不支援命名引數。
說明只有 left
引數是必須的。但是，要指定任何其它的引數，必須先指定出現在語法中該引數前面的全部引數。例如，如果不先指定 left 和 top 引數，則無法指定 width
引數。任何沒有指定的尾部的引數則保持不變。
實現**：
private sub form_click()
dim left, top, width, height
top = 0
left = me.scalewidth - label1.width
width = label1.width
height = label1.height
label1.move left, top, width, height
end sub
4樓：而後在等你
label.left=0
label1.top=0
5樓：
label1.left=form1.scalewidth -label1.width
label1.top=0
6樓：
修改top和left屬性移動
一個控制元件在窗體上的 位置由top和left屬性決定，其大小由什麼屬性決定？？
7樓：匿名使用者
通常，控制元件的大小由width和height屬性決定。
8樓：所乃欣
選設定startupposition為0（手動） 然後再設定left屬性和top屬性
9樓：阿波羅的同行者
大小由寬度和高度決定
寬度：width
高度：height
10樓：想請教你們哈
width 和 hight
11樓：匿名使用者
hight 和 weight
12樓：
width 寬度 height 高度
13樓：匿名使用者
width和hight
如何用vb實現座標圖
14樓：匿名使用者
vb可使用line 方法在窗體或**框實現座標圖。
line 方法，在物件上畫直線和矩形。
scalemode 屬性，當使用圖形方法或調整控制元件位置時，返回或設定一個值，該值指示物件座標的度量單位。
currentx、currenty
屬性，返回或設定下一次列印或繪圖方法的 水平 (currentx) 或垂直
(currenty) 座標。設計時不可用。
line 方法示例**：
option explicit
dim i as long
dim x, y, fnt, txt, dd
private sub form_load()
picture1.autoredraw = true
picture1.scalemode = 6 'mm
picture1.scale (-15, 110)-(105, -10) '
picture1.drawwidth = 1
picture1.drawwidth = 1
picture1.line (0, 0)-(0, 100), vbred
picture1.line (100, 0)-(100, 100), vbred
picture1.line (0, 0)-(100, 0), vbred
picture1.line (0, 100)-(100, 100), vbred
for i = 1 to 10
picture1.line (10 * i, -1)-(10 * i, 0), vbred
next
for i = 1 to 10
picture1.line (-1, 10 * i)-(0.5, 10 * i), vbred
next
x = 40
y = -3
fnt = 12
txt = "vb實現座標圖"
dd = prnt(x, y, fnt, txt)
end sub
public function prnt(x as variant, y as variant, fnt as variant, txt as variant)
picture1.currentx = x
picture1.currenty = y
picture1.fontsize = fnt
picture1.print txt
end function
15樓：手機使用者
在vb中繪製實時曲線是比較難的，一般要應用第三方控制元件或是windows api函式來完成，但是如果你對實時曲線的要求不是很高，只要能表示出當前的一般情況的話，我們可以直接應用vb提供給我們的空間來完成。
原則上講，直接在form裡繪製曲線都是可以的，msdn上面很多例程就是直接在form裡面繪製圖形的，form作為繪製圖形的容器，不過一般應用中form中不可避免的會有很多其他控制元件，所以我們選擇picturebox作為繪製曲線的容器。
實時曲線的繪製一般藉助於timer控制元件來完成，使用timer控制元件，定期將串列埠或是其他儀器中監測到的資料送往picturebox1，而曲線的繪製一般畫成折線圖，採用picturebox1的line方法繪製.具體實現如下:
1.選擇需要顯示的窗體picture1，加入**框picture1，根據實際需要設定**的大小並移到合適的位置，並在**的外面畫好量程----時間座標系；然後加上timer控制元件以及兩個commandbutton，介面就基本設定好了。
2.建立座標系，根據picture1的大小和高度設定畫出座標系的x軸和y軸:
16樓：牛a和牛c間徘徊
vb的左上角的座標是0,0 如果你輸入了(x,y)line (0, y)-(容器.width, y), , bf '橫線
line (x, 0)-(x, 容器.height), , bf '豎線
容器為你要畫點的控制元件,上面的兩條**會畫出一個橫線和一個豎線,交點就是你給的座標
vb中的move方法
17樓：12345額時代
move：用以移動 mdiform、form 或控制元件，不支援命名引數。操作方法如下：
1、首先新建一個工程，調整好軟體的介面大小。給介面裡面新增一個**。
2、然後點選滾動條，畫到介面裡面，這樣介面就構建好了。
3、接下來給**空間新增**，拉動右邊的滾動條，找到picture。在picture右邊的按鈕給他新增**。
4、之後要做出設定，拉動滾動條，找到autoredraw，和autosize。都設定為true就是這隻他的自動重畫，自動適應大小。
5、然後雙擊**控制元件。**視窗自動進入。在右上角選擇scroll，change和scroll同時都要，兩個都寫進**（picture1.
left = -(hscroll1.value / hscroll1.max) * picture1.
width）。
6、最後執行一下，如圖滑動滾動條，就可以看到全部的影象了。
18樓：鞏峻甄霽
可移動控制元件在窗體上的位置，
也可移動窗體在螢幕上的位置。
move
左，頂，右，底
19樓：小李無刀
引數是左，上，寬，高，引數的位置不能調，當然調了也只是以那個位置去嘛
20樓：匿名使用者
顯然是可以執行的,效果當然也是不一樣的.
並不是你在函式引數裡用了跟引數名稱有關係的變數就可以改變move方法對引數的呼叫方式,top+1000, left+1000等在執行時只會被解釋成幾組(計算後)數字,move方法呼叫並執行時仍然會按其預先定義的順序獲取其需要的引數,即不管你後面的順序怎麼放,第一個逗號前值的都會被解釋成left,不知道我說清楚了沒有.
object.move方法
語法:object.move left,top,width,height
引數：left必需的。單精度值，指示object左邊的水平座標（x軸）。
top可選的。單精度值，指示object頂邊的垂直座標（y軸）。width可選的。
單精度值，指示object新的寬度。height可選的。單精度值，指示object新的高度。
怎樣利用晚上時間來學習，怎麼利用早上和晚上的時間來學習英語？
利用晚上的時間學習是很好的事情啊，比如說像六七點鐘吃過飯之後就可以靜靜的坐在屋裡好好的學習自己的專業知識，提升自己的能力，最好選擇比較安靜的房間，這樣學習能更專注一點。你可以一天上九節課兩節晚自習 你可以一天寫完兩支筆芯做至少三套卷子 你可以早起十分鐘晚睡十分鐘記幾個單詞和成語 你可以用玩手機的時間...
怎麼利用高三之後的暑假來提升自己
畢業旅遊，可以作為一個選項，當然不推薦窮遊，不推薦一個人出門。畢竟剛剛成年，社會經驗有限。在保障安全的情況下，遊覽祖國大好河山。這個暑假不考駕照的話，進入大學以後會很麻煩。很多大學在外地的同學還需要辦理暫住證等證件。所以不要想著進入大學後在考駕照。大學學裡面玩的時間可能都不夠，四年下來說不定還過不了...
如何利用X射線衍射分析法來鑑別晶態和非晶態材料
晶體和非晶態在x射線衍射中的訊號大不相同,其圖譜大不相同 晶體 都有尖銳的衍射峰。非晶體 沒有衍射峰,最多隻有寬包。如何利用x射線衍射分析法來鑑別晶態和非晶態材料 晶態與抄 非晶態很好說明,看到我們bai的玻璃了麼?透明的du,裡面是非晶態的 還有已經玻璃,裡面好zhi像有很多 dao雪花狀的,那些...