用VB編制設定文字字型的程式怎麼設定?主要用到的工具箱裡的哪些東西

2021-05-12 04:37:16 字數 5783 閱讀 8901

1樓:匿名使用者

用vb編制一個設定文字字型

的程式主要用到的工具箱裡的optionbutton 控制元件對顯示字型文字控制元件的fnot屬性進行設定。用***bobox 控制元件或listbox控制元件設定顯示字型及它的尺寸。

optionbutton 控制元件,optionbutton 控制元件顯示一個可以開啟或者關閉的選項。

***bobox 控制元件,組合框控制元件將文字框和列表框的功能結合在一起。有了這個控制元件,使用者可通過在組合框中輸入文字來選定專案,也可從列表中選定專案。

組合框的樣式

此處有三種組合框樣式。每種樣式都可在設計時或執行時來設定,而且每種樣式都使用數值或相應的 visual basic

常數來設定組合框的樣式。

font 屬性,返回一個 font 物件。

為了標識一個具體的要使用其屬性的 font 物件應使用一個物件的 font 屬性。例如,下面的**將改變一個 font

物件的 bold 屬性設定,該font 物件被 textbox 物件的 font

屬性所標識:

txtfirstname.font.bold = true

2樓:匿名使用者

private sub ***bo1_click()text1.fontname = ***bo1.textend sub

private sub ***bo2_click()text1.fontsize = val(***bo2.text)end sub

private sub form_load()***bo1.additem "宋體"

***bo1.additem "黑體"

***bo1.additem "楷體_gb2312"

***bo1.text = "宋體"

for i = 12 to 72 step 2***bo2.additem str(i)next i

***bo2.text = "12"

end sub

vb程式設計題——設計一個用於設定字型屬性的程式 具體如下

3樓:匿名使用者

把以下**用記事本儲存為字尾名為.frm的檔案中,用vb開啟。

******************************====

version 5.00

begin vb.form form1

caption = "form1"

clientheight = 3195

clientleft = 60

clienttop = 345

clientwidth = 4680

linktopic = "form1"

scaleheight = 3195

scalewidth = 4680

startupposition = 3 '視窗預設

begin vb.***mandbutton ***mand3

caption = "***mand3"

height = 375

left = 1920

tabindex = 4

top = 1920

width = 855

endbegin vb.***mandbutton ***mand2

caption = "***mand2"

height = 375

left = 1920

tabindex = 3

top = 1200

width = 855

endbegin vb.***mandbutton ***mand1

caption = "***mand1"

height = 375

left = 1920

tabindex = 2

top = 480

width = 855

endbegin vb.listbox list2

height = 2400

left = 2880

tabindex = 1

top = 360

width = 1815

endbegin vb.listbox list1

height = 2400

left = 120

tabindex = 0

top = 360

width = 1695

endend

attribute vb_name = "form1"

attribute vb_globalnamespace = false

attribute vb_creatable = false

attribute vb_predeclaredid = true

attribute vb_exposed = false

function isprime(byval n as long) as boolean

dim i as long

for i = 2 to int(n / 2)

if n mod i = 0 then isprime = false: exit function

next

isprime = true

end function

private sub ***mand2_click()

dim i as integer

redim a(0) as integer

for i = 0 to 29

if isprime(list1.list(i)) then

a(ubound(a)) = list1.list(i)

list2.additem a(ubound(a))

redim preserve a(ubound(a) + 1)

end if

next

***mand1.enabled = true

***mand2.enabled = false

end sub

private sub ***mand3_click()

endend sub

private sub form_load()

***mand1.caption = "排序"

***mand2.caption = "篩選"

***mand3.caption = "退出"

***mand1.enabled = false

randomize

dim i as integer

for i = 1 to 30

list1.additem int(rnd * 1900 + 100)

next

end sub

急!!!vb程式設計:編寫利用組合框對文字的字型和大小進行設定的程式

4樓:匿名使用者

private sub ***bo1_click()text1.fontname = ***bo1.textend sub

private sub ***bo2_click()text1.fontsize = val(***bo2.text)end sub

private sub form_load()***bo1.additem "宋體"

***bo1.additem "黑體"

***bo1.additem "楷體_gb2312"

***bo1.text = "宋體"

for i = 12 to 72 step 2***bo2.additem str(i)next i

***bo2.text = "12"

end sub

怎樣修改vb**的字型大小?

5樓:遠巨集

修改vb**的bai

字型、大小、以

du及顏色可以zhi參考下面的**dao

:privatesubform_load

label1。字型="回常規";將字型改為答常規字型label1。字形大小=50」字形大小

改變字型顏色dao為紅色為前樓=vbred'label1。標籤自動改變大小與文字內容

endsub

6樓:

開啟visual basic,選bai擇選單欄的「工du具」選單下-「選zhi項",進入**編輯器常用設定界dao面:

滑鼠單擊「編輯器格內式」,進入設容

置字型型別和大小的介面,入下圖所示:

在「字型」中可以選擇需要的字型型別,在「大小」中選擇合適的字型大小。

7樓:手機使用者

工具選單下的選項,

選中編輯器格式

在右邊有字型

字型下面就是字號。

應該行吧

8樓:死在記憶中

工具 ----選項-----編輯器格式

vb中怎麼加入一個標籤

9樓:匿名使用者

1、首先我們

新建一個工程,並新建一個標準exe工程。

2、這時候我們找到工具箱中標籤框。

3、這時候我們可以直接雙擊控制元件即可成功繪製。

4、或者我們可以選中他,然後在頁面上繪製。

5、如果對它的外觀不滿意,我們在屬性視窗中修改。

6、雙擊控制元件即可進入**視窗。完成效果圖。

10樓:剛淑敏於琬

1、label

控制元件不可以水平,上下居中

2、不過可以用

picturebox

控制元件做到

3、拖動一個

picturebox

控制元件到工程,並命名為

pictextshow,把

autodraw

設為true,加上以下**就可以實現:

option

explicit

private

subform_load()

pictextshow.currentx=(pictextshow.scalewidth-pictextshow.textwidth("要顯示的文字"))/2

pictextshow.currenty=(pictextshow.scaleheight-pictextshow.textheight("要顯示的文字"))

pictextshow.print

"要顯示的文字"

endsub

這樣文字就可以在**框中間顯示了。

11樓:匿名使用者

1)執行vb6.0,新建一個標準exe工程,將滑鼠移到下圖左側工具箱的a按鈕處。

2)雙擊該按鈕,窗體上就會出現一個label控制元件。

3)可對它進行屬性設定,並移動到窗體需要的位置。接著可繼續按前方法新增label控制元件。

4)label 控制元件, label 控制元件是圖形控制元件,可以顯示使用者不能直接改變的文字。

數字字型和文字字型分別設定,word數字字型和文字字型分別設定

在word中,漢字使用的一般都是中文字型,而數字和字 母使用的都是西文字型。因此,在字型中分別設定,然後在輸入的時候就會自動切換。如果是對內容已經輸入完成的word檔案,需要對它的文字和數字的字型進行分別設定,辦法如下 1 按ctrl a,先將全文選中,再將字型改為需要的漢字字型。2 再次對word...

用vb程式設計計算1 2 3 4 5 6 n的值,n由文字框輸

樓上的程式,個人認為有點小問題,修改如下 private sub form click dim n as integer dim sum as integer sum 0 n val inputbox 輸入一個整數 sum 0 for i 1 to n 此處修改sum sum 1 i 1 i 此處修...

怎麼用PS工具製作凹陷下凹文字效果的字型

需要什麼樣的,有的凹陷效果可以在圖層樣式裡做出來,例如加內陰影 斜面與浮雕等。怎麼用ps工具製作凹陷 下凹文字效果的字型 需要什麼樣的,有的凹陷效果可以在圖層樣式裡做出來,例如加內陰影 斜面與浮雕等。ps字型凹陷效果 ps怎麼設定凹陷字型效果 ps字型凹陷效果 新建背景檔案,填充顏色。用文字工具打字...