1樓：天蠍魔君
option explicit
dim aa$, i&
dim ai as integer
private sub command1_click()aa = text1.text
me.autoredraw = true
me.currentx = 1000: me.currenty = 1000 'label的位置
for i = 1 to len(aa)
if mid(aa, i, 1) = "y" thenai = me.forecolor
me.forecolor = qbcolor(int(rnd * 16))
else
me.forecolor = ai
end if
me.print mid(aa, i, 1);
next i
end sub
參考資料
label 可以實現不了，直接列印可以嗎？
希望對你有幫助！
2樓：匿名使用者
label控制元件做不到
你用richtextbox控制元件吧
請勿追問，不再回復
3樓：我叫明輝
label控制元件做不到,不可能同時出現2種顏色。
vb與vba有什麼區別？
4樓：
vba是vb的一個子集，也可以講是vb的簡化版。
1.vb的應用程式編譯後可以在系統下直接執行，vba不行必須在office下執行。
2.vba統計學中的曲線圖有現成的「巨集」程式設計序比較方便，但沒有個性化，修改比較麻煩。
vb畫圖功能非常強大什麼都能畫，但程式設計序比較麻煩。
3.vba統計學中的計算程式有現成的「巨集」使用方便，如數字排序，而vb必須程式設計序（冒泡法）， vba可以用「巨集」，也可以程式設計序等。
4. 通用大程式一般用vb，自己用比較小的專業程式一般用vba比較容易。
5樓：風同雪
vba是vb的精簡版
關於vb裡的len函式
6樓：哈徳韋
第一個答案是2,是因為n 是integer型別,雖然用了n = str(n),在str(n)返回了一個字串" 156"後,在賦值給n時又被自動型別轉換為integer型.
這時用len()函式去求integer型n的長度,即是求integer型別的記憶體中所佔的位元組數.正是2.
而第二個答案是4,是因為len()函式返回的是str(n)的長度,而str(n)返回的是" 156",它的長度正是4.
注意,凡是用str()函式將數字轉換成字串的,返回的字串都會在數字前加一個空格!
" 156"的長度就是3個數字加一個空格,所以是4.
7樓：手機使用者
dim n as integer
n = 156
n = str(n)
n = len(n)
print n
上面這段**定義了n為整型變數,n被賦值為:156;首先str(n)將整型變數n轉換成了字串,再由len(n)取變數n的位元組數,無論n的值是多少由於n是整型數值,整型數值佔用2位元組空間,由於str()和len()分開運算,len()函式在取值的時候n變數不包含空位符
,所以用len函式取得的值是2,列印結果是2.來看看你的下一段**:
dim n as integer
n = 156
n = len(str(n))
print n
這段**定義了n是一個整型數值,那麼整型數值佔位2位元組空間,無論n被賦值多少都只佔用2位元組空間,由於使用了len(str(n))一次性去取字串的佔位空間數,我們知道str()在將數值轉變成字串型別的時候會在字元前面隱含一個空位的空間用來表示數值正負,這個空位符的字串也被len當成2位元組運算,所以print n 結果為4
關於vb退出程式的問題
8樓：匿名使用者
end是vb整個應用程式，所有**停止，視窗解除安裝
exit是模組，可以是迴圈體，函式，過程 比如："exit sub"vb中還有窗體退出還有，unload xx, me.unload等 如果只有一個窗體也相當於退出程式
9樓：匿名使用者
end是整個程式結束
exit是退出當前子程式，可以帶返回引數（一個整數）
10樓：匿名使用者
單獨使用end，則結束整個程式
end還可結束一個過程、條件語句等（如end sub、end function、end if）,它用於告訴編譯器：該過程、if語句到此結束，後面的內容則是其它的東西，不屬於該過程、if語句的範疇
exit 則用於中途中斷某個過程、迴圈體等
關於vb中print的用法?
11樓：大野瘦子
print方法可以在窗體上顯示文字字串和表示式的值，並可在其它圖形物件或印表機上輸出資訊。
語法格式：[物件]·print [spc(n)|tab(n) expression charpos]
語法說明：
在vb中，print方法是用來輸出資訊的專用過程，顯示的文字是作為影象來處理的，因此，print方法顯示的文字字串也往往作為圖形文字。visual basic 允許在窗體、圖形框和印表機用print方法顯示文字字串。
12樓：修繡虹
回答1、print方法 print方法可用於窗體、**框、立即視窗、印表機等物件。用來顯示文字字元和表示式的值。 表示式：
object.print，obiect是物件的名稱，物件可以是窗體(form)、立即視窗(debug)、**框(picturebox)、印表機(printer)等。 print關鍵字可以用」？
」裡代替。 表示式表是有若干表示式組成，各表示式之間可以用分隔符號逗號(,)、分號(:)或tab、spc函式等，這些可以混用。
2、與print方法有關的函式 tab&emsp:tab函式和print方法一起使用，對輸出游標進行定位，格式為tab(n)。tab函式的作用是計算數值型表示式n的值。
說明：n表示下一個輸出位置的列號，當前顯示位置超過n時，自動下移一行(理論)。但我自己測試沒顯示出來，即將tab(30)更換為tab(300),執行程式時，性別沒有顯示出來。
每個tab函式對應一個輸出項。 spc在print方法或print#語句中，用spc函式跳過n個空格，格式為：spc(n)。
關於vb的問題！關於VB的問題
在文字框的text屬性裡設為 中國。不就ok了。剛測試過，沒問題的，你在form里加個command1，點選後，可以實現你說的效果，有問題，訊息問我。private declare sub sleep lib kernel32 byval dwmilliseconds as long private...
關於vb的if語句的寫法，關於VB的IF語句的寫法
根據表示式的值有條件地執行一組語句。語法 if condition then statements else elsestatements 或者，可以使用塊形式的語法 if condition then statements elseif condition n then elseifstateme...
vb入門問題，關於vb的小問題
也不知道你是不是喜歡學習程式設計。如果不喜歡就應付考試就可以了。喜歡的話，一開始不知道看什麼就上圖書館找書看去吧，看得多了，你就慢慢知道學什麼了。慢慢來吧，做一些實用的小程式，為以後工作打基礎吧。關於vb的小問題 setmynum是一個變數。val表示把括號後面的數轉化為10進位制的數值形式。h是1...