用vb60設計程式,在窗體上的標籤label中

2021-03-03 23:36:59 字數 949 閱讀 8442

1樓:veket的小號

private sub form_load()label1.caption = "歡迎進入vb的程式設計世界"

label1.font = "文泉驛等寬正黑" '不要意思咱機子上沒有"楷體"

label1.fontsize = 14.25label1.fontbold = truelabel1.backcolor = vbredend sub

2樓:匿名使用者

首先:選中標籤,在它的屬性裡面找到font (後面一半預設是宋體),點一下font,「宋體」後面出現省略號,點省略號,在彈出的對話方塊裡改。

然後:再雙擊窗體,輸入

private sub form_load()label1.backcolor = vbredend sub

然後點執行,就可以了

3樓:宇智波東東東

好狠,這是計算機應用職專的課程吧。。。。

vb6.0程式中設計一個窗體,在窗體上新增一個標籤和一個文字框以及一個命令按鈕,要求文字框中只能

4樓:浪花飄零

按要求在窗體上新增一個標籤和一個文字框以及一個命令按鈕,雙擊命令按鈕,刪除所有**,複製如下**到程式中private sub ***mand1_click()if val(text1) mod 2 = 0 thenlabel1 = "偶數"

else

label1 = "奇數"

end if

end sub

private sub text1_keypress(keyascii as integer) '判字元

if keyascii < 48 or keyascii > 57 then keyascii = 0 '0-9字元之外遮蔽

end sub

若滿意請及時採納,謝謝

vb6 0中MessageBox怎麼用

很簡單比如 private sub command1 click if text1.text 20100344 thenmsgbox 登陸成功 shell c documents and settings administrator 桌面 登入系統元件 bin bg1.exe endelse msg...

設計程式vb隨機產生10到100之間(包括10和

private sub command1 click on error resume next dim a 5 as integer randomize int upperbound lowerbound 1 rnd lowerbound for i 0 to 3 b c 0 for j 1 to ...

如何VB設計程式,到指定使用次數或指定日期後無法使用該程式

要是說到指定日期打不開 你可以使用day date 來獲得指定日期,用month date 來獲得月份 用 year date 來獲得年份 比如你想在它2011年6月19日打不開 可以這樣寫 option explicit private sub form load if year date 201...