新聞中心
vb里怎么設(shè)置文字自動滾動?
做一個label標簽,添加一個timer控件。設(shè)置好timer控件的時間間隔為50,在timer事件里面添加如下代碼,標簽滾動到了最后會從最開始的地方開始滾動label1.left=label1.left+10iflabel1.left>form1.widththenlabel1.left=0endif

VB.NET中怎么在圖片上直接輸出文字。向VB中有Print的方法?
兩種方法: 圖片框上蓋個Label 向其輸入內(nèi)容。
載入圖片,通過內(nèi)存直接 DrawImage繪制個新圖,然后在圖上蓋文字。最后賦值給圖片框。VB6的print 實質(zhì)是向圖片框打印文字,不管有無圖都能在上面Print. 考慮速度和實現(xiàn)難度問題,如果純粹顯示,最好直接蓋個Label最簡單。第二種方法 需要考慮文字大小、顏色、坐標定位等等。如果一行文字顯示不下,不會自動換行,得自己切。vb菜單編輯器怎樣做下劃線?
VB中用代碼方式給文字添加下劃線和刪除線,代碼如下: //Underline屬性添加下劃線 Private Sub Check1_Click() Label1.Font.Underline = IIf(Check1.Value = vbChecked, True, False) End Sub //Strikethrough屬性添加刪除線 Private Sub Check2_Click() Label1.Font.Strikethrough = IIf(Check2.Value = vbChecked, True, False) End Sub
vb怎么設(shè)置text文字粗體?
VBText控件中使字體加粗和傾斜的代碼是: 加粗 Label1.FontBold = True 斜體 Label1.FontItalic = true 拓展資料: TextBox控件:
a. 控制Textbox輸入格式,我想大多人都遇到這個問題,在TextBox作為輸入接口時,有時我們希望用戶只能輸入數(shù)字、大寫、字母等,一般的做法是對用戶輸入的字符這個檢查。但是如果我們使用API,將很容易實現(xiàn)這些功能,比如:
1、只允許輸入數(shù)字:
Const ES_NUMBER = &H2000 Public Function NumbersOnly(tBox As TextBox) Dim DefaultStyle As Long DefaultStyle = GetWindowLong(tBox.hwnd, GWL_STYLE) NumbersOnly = SetWindowLong(tBox.hwnd, GWL_STYLE, DefaultStyle Or ES_NUMBER) End Function 2、只允許大寫:
Public Function UpperCaseOnly(tBox As TextBox) Dim DefaultStyle As Long DefaultStyle = GetWindowLong(tBox.hwnd, GWL_STYLE) UpperCaseOnly = SetWindowLong(tBox.hwnd, GWL_STYLE, DefaultStyle Or ES_UPPERCASE) End Function 3、只允許小寫:
Public Function LowerCaseOnly(tBox As TextBox) Dim DefaultStyle As Long DefaultStyle = GetWindowLong(tBox.hwnd, GWL_STYLE) LowerCaseOnly = SetWindowLong(tBox.hwnd, GWL_STYLE, DefaultStyle Or ES_LOWERCASE) End Function 當然上邊三個函數(shù)可以合成一個函數(shù),因為他們方法是一樣的,只是風格參數(shù)不同而已。
到此,以上就是小編對于vb滾動字幕怎么做的問題就介紹到這了,希望這4點解答對大家有用。
分享標題:vb滾動字幕如何做
鏈接URL:http://fisionsoft.com.cn/article/coooged.html


咨詢
建站咨詢
