『壹』 vb 在名稱為Form1的窗體上,畫1個名稱為Label1的標簽,其標題為"等級考試",能根據標題內容自動調整標簽的
你在窗體上加一個名為TEXT1的文本框,然後向文本框輸入字元看看
Private Sub Form_Load()
Label1.Alignment = 2 '注意這行版,可以在設計權時完成
Label1.AutoSize = True '注意這行,可以在設計時完成
End Sub
Private Sub Text1_Change()
Label1 = Text1.Text '給你測試的
End Sub
『貳』 要使from1窗體的標題欄顯示「歡迎使用vb程序設計的正確語句是」
form1.caption=「歡迎使用vb程序設計的正確語句是"
『叄』 VB6想讓提示框的標題是Text1
MsgBox(prompt[, buttons] [, title] [, helpfile, context])
MsgBox 函數的語法具有以下幾個命名參數:
部分
描述
Prompt
必需的。字元串表達式,作為顯示在對話框中的消息。prompt 的最大長度大約為 1024 個字元,由所用字元的寬度決定。如果 prompt 的內容超過一行,則可以在每一行之間用回車符
(Chr(13))、換行符 (Chr(10))
或是回車與換行符的組合 (Chr(13) &
Chr(10)) 將各行分隔開來。
Buttons
可選的。數值表達式是值的總和,指定顯示按鈕的數目及形式,使用的圖標樣式,預設按鈕是什麼以及消息框的強制回應等。如果省略,則 buttons 的預設值為
0。
Title
可選的。在對話框標題欄中顯示的字元串表達式。如果省略 title,則將應用程序名放在標題欄中。
Helpfile
可選的。字元串表達式,識別用來向對話框提供上下文相關幫助的幫助文件。如果提供了 helpfile,則也必須提供 context。
Context
可選的。數值表達式,由幫助文件的作者指定給適當的幫助主題的幫助上下文編號。如果提供了 context,則也必須提供 helpfile
『肆』 請教VB中一個窗體標題的問題
你是說label控制項的caption嗎。在Private
Sub
Form_Resize()過程中寫:Label1.Left
=
(Form1.Width
-
Label1.Width)
/
2
其它控制項類似。
『伍』 vb在窗體上畫一個文本框和一個命令按鈕(命令按鈕的標題設置為"顯示信息"),運行
(制1)
PrivateSubCommand1_Click()
Print"AAAAAAA"
Text1.Text="BBBBBB"
EndSub
(2)
PrivateSubCommand1_Click()
Text1.Move0,0
Text1.Text="歡迎使用"
EndSub
(3)
PrivateSubForm_Load()
Me.Move1000,2000,6000,3000
EndSub
『陸』 VB程序如何隱藏標題欄,請仔細看補充說明
應該可以的,你可以新建個工程,單獨測試這個功能, 如果不能正常的話,問題就在VB本身了, 如果新建工程能, 說明你設計的程序,有些地方影響了這個..具體要看窗體屬性設置,以及代碼部分了.
補充:
Private Sub Form_Load()
Me.BorderStyle = 0
Me.Caption = ""
End Sub
如果是有菜單的窗體,可以參考VB吧里CBM666老師的方法,將菜單放到另個窗體中,在本窗體調用,這樣你這個窗體才能不顯示標題欄的.
參考內容:http://post..com/f?ct=335675392&tn=PostBrowser&sc=2021429919&z=214393323&pn=0&rn=50&lm=0&word=vb#2021429919
『柒』 關於VB的一個小問題,標簽名稱.Caption = "欲顯示的文本"
比如你要顯示 text1的內回容答
Private Sub Form_Load()
Label1.Caption = Text1.Text
End Sub
Private Sub Text1_Change()
Label1.Caption = Text1.Text
End Sub
『捌』 有關vb標題程序代碼的設置
Private Sub Form_Load()
Form1.Caption = "窗體"
End Sub
是可以的
『玖』 vb: 如何控制msgbox的文本內容和標題
msgbox直接使用時制不加括弧
如果作為「a = msgbox(「」)」時必加括弧
表達式估計就是指「a = 」的部分
具體名字是什麼我忘記了,反正帶返回值的就要加括弧,不帶返回值就直接用。
舉個例子就是:
MsgBox "此方程不是一元二次方程。" ,,"輸入錯誤" 『最後兩個是幫助部分,可以同時預設a = MsgBox("此方程不是一元二次方程。" ,,"輸入錯誤",,) 『這里不用空格 』默認產生的消息框[只顯示確定按鈕][第一個按鈕為默認按鈕][用戶必須響應消息框才能繼續在當前應用程序中工作]
區別就在這里,使用時注意下。
『拾』 設計一個窗體,窗體的標題為「VB程序設計」,運行程序時單擊窗體在窗體上輸出「VB程序設計」
Dim x As Integer
Private Sub Form_Click()
If x = 0 Then
x = x + 1
Me.Caption = "歡迎你的到來"
Me.Width = 4700
Me.Height = 3500
Label1.Caption = "VB程序設計內容"
Else
x = 0
Call Form_Load
End If
End Sub
Private Sub Form_Load()
Me.Caption = "VB程序設計"
Me.Width = 4800
Me.Height = 3600
Label1.Caption = ""
End Sub