1樓:匿名使用者
非常簡單,你看插圖,一切都在圖中。**如下:
在窗體中新增一個label1、兩個預設command1和command2。一切屬性預設、不用修改。
private sub command1_click()
if command1.caption = "有邊框" then
label1.borderstyle = 1
command1.caption = "無邊框"
else
label1.borderstyle = 0
command1.caption = "有邊框"
end if
end sub
private sub command2_click()
if command2.caption = "不透明" then
label1.backstyle = 1
command2.caption = "透明"
else
label1.backstyle = 0
command2.caption = "不透明"
end if
end sub
private sub form_load()
label1.caption = "visual basic 程式設計教程"
label1.font.size = 36
command1.caption = "有邊框"
command2.caption = "不透明"
label1.borderstyle = 0
label1.backstyle = 0
end sub
【回答】
1. 在資源管理器中,雙擊工程中的「project1.vbp」(即副檔名為vbp的檔案)可以正確開啟工程。
2. 在儲存檔案之後,如果發現檔名錯了,不能在windows中直接修改工程中的檔名。
2樓:匿名使用者
1, 雙擊副檔名為vbp 的檔案可以開啟工程。
2,不可以。
3樓:匿名使用者
1、點選字尾為.vbp的檔案可以開啟工程。
2、不能在windows中直接修改工程中的檔名,這樣會造成工程檔案無法載入這個檔案。
vb程式設計問題!
4樓:匿名使用者
dim b() as string
b() = split(k, ",")
vb程式設計難嗎?
5樓:a九尾妖姬
畢竟檢視化了的程式設計都是不難學的。自己按照書本上或者網上的一些例子做幾個小的軟體,再試著做一些大點的複雜點的軟體,對**有一定的語感之後,就可以去網上讀一些比較難的**,一些**是很珍貴的,儲存下來,以後你程式設計的時候可以用,因為過程還是那個過程,屬性還是那個屬性,不同的是物件。
1,學習程式設計的基本要求
2,vb的功能及特點
3,學習vb程式設計的方法
對學習者知識的要求:
首先,學習程式設計要具備一定的數學基礎.計算機與數學有很大的聯絡,綜觀計算機歷史,計算機的數學模型(圖靈機,由alan turing提出)和體系結構(由john von neuman提出)等都是由數學家提出的,
最早的計算機也是為數值計算而設計的.因此,要學習好計算機就要有一定的數學基礎.不過對於初學者來說,在數學基礎方面的要求並不是很高,從我個人的角度來看,有高中數學水平就差不多了.
6樓:沈媛婷辣
如果你學過其他的程式語言,學vb也不會太難.程式設計重要的不是你用哪種語言,而是你的程式設計思想.vb屬於視覺化的開發語言,都已模組化了,學起來比較容易上手。
自己按照書本上或者網上的一些例子做幾個小的軟體,再試著做一些大點的複雜點的軟體,對**有一定的語感之後,就可以去網上讀一些比較難的**,一些**是很珍貴的,儲存下來,以後你程式設計的時候可以用,因為過程還是那個過程,屬性還是那個屬性,不同的是物件。
vb程式設計問題 10
7樓:漆豆鄂雅彤
窗體的load事件是在窗體駐入記憶體的時候產生的,這個時侯窗體還沒有顯示,所以你的輸出當然看不到了。
可以把**放到按鈕事件或resize事件(resize事件有可能被多次執行)中。如果非要在load事件中,可以把窗體的autoredraw屬性設定為true。
8樓:潮蕭殳野
我知道你錯誤在那裡了
你輸入的字元在asc()函式中是分大小寫的,例如大寫a的ascii碼是65,小寫a則是97如過你需要輸入的是小寫,你應該在input()函式後加上以下**:
select
case
strs1
case
"a"to
"z"strs1
=asc(strs1
-32)
case
"a"to
"z"strs1
=strs1
endselect
如果你要的是大寫則加入:
select
case
strs1
case
"a"to
"z"strs1
=asc(strs1
-32)
case
"a"to
"z"strs1
=strs1
endselect
應該可以了
9樓:聽不清啊
原程式多處單詞拼寫錯誤。現已糾正,並執行通過:
private sub command1_click()label1.visible = falselabel2.visible = truetext1.
visible = falsecommand1.visible = falsecommand2.visible = truecommand3.
visible = truelabel2.caption = text1.text & "同學你好,祝你學好vb程式設計!
"label2.forecolor = vbredlabel2.fontname = "黑體"
label2.fontsize = 16
end sub
private sub command2_click()label1.visible = truelabel2.visible = falsetext1.visible = true
command1.visible = truecommand2.visible = falsecommand3.visible = falsetext1.text = ""
end sub
private sub command3_click()endend sub
private sub form_load()label1.visible = truelabel2.visible = falsetext1.visible = true
command1.visible = trueend sub
10樓:匿名使用者
一般標籤都是label,你怎麼用的是laber
private sub command2_click()
laber1.cisible = true 應為label1.visible=true
vb程式設計問題!(急)
11樓:
公共:dim a '關0開1 form load:a = 1 開關按鈕:
if a = 1 then a = 0 command1.enabled = false text1.text = ""
end if
if a = 0 then
a = 1 command1.enabled = true text1.text = "0" end if
vb程式設計問題!!!!
12樓:鹿玉花權酉
dimb(10)
asdouble
forx=0
to10
'賦值,你也可以用換成別的
b(x)=x
next
forx=10
to0step
-1 '逆序輸出
b(x)
next
vb程式設計問題
13樓:科技程式迷
常量是不可以在執行時進行賦值的。
private const pi as single = 3.1415
private sub form_load()text3.locked = true '將輸出資訊的文字框設定為只讀
text4.locked = true
text5.locked = true
text6.locked = true
end sub
private sub command1_click()dim r as single, h as singler = val(text1.text)
h = val(text2.text)
text3.text = r * 2 * pi '圓周長text4.text = r * r * pi '底面積text5.
text = (r * 2 * pi) * h '側面積text6.text = (r * r * pi) * h '體積end sub
沒有看到你的程式介面,所以我就做了一個上來:
14樓:電腦愛好者度雲
r=text1.text
h=text2.text
pi就不用了,因為圓周率就是pi
15樓:兔兔**
r=text1.text
這樣就可以了。
16樓:匿名使用者
圖呢,r=text1.text等
vb程式設計問題,VB程式設計問題
private sub command1 click text1 for i 1 to 45 7 for j 1 to 45 6 2for k 1 to 45 3 5if i j 2 k 5 45 thenn n 1 end if next next next text1 n end sub pri...
VB程式設計題目,vb程式設計題目
private sub mand1 click dim i as integer,j as integer,k as integer dim a 1 to 10 as integerdim max as integer,min as integer,pj as single dim sumnum a...
VB程式設計的問題
if ssl then ssl tt option explicit private subform load timer1.interval 500 這裡可以改成別的時間段,我是以0.5秒變化一次來寫的endsub private subtimer1 timer iflabel1.forecolo...