1樓:
貌似是考迴圈語句的?那就
'先把multiline設為true(很重要!)'新建文字框text1,按鈕command1,輸入:
private sub command1_click()text1.text = ""
for i = 0 to 3
text1.text = text1.text + space(i) + "********" + vbcrlf
'(依次輸出,space(i)為i個空格)next i
end sub
執行,text1輸出:
2樓:匿名使用者
text1.text = "********" & vbcrlf & " ********" & vbcrlf & " ********" & vbcrlf & " ********"
text1的multiline屬性需要設定為truevbcrlf 必須用,用chr(13)或chr(10)都不行的好運
3樓:匿名使用者
單行還是多行?
如果是輸入這種固定格式就直接multiline設為true然後text1.text = "********" & vbcrlf & "********" & vbcrlf & "********" & vbcrlf & "********"
不過沒看出來這有什麼用~~~
4樓:匿名使用者
在text控制元件的passwordchar處填入*
VB程式設計
第一種比較容易看的 private sub command1 click dim req as vbmsgboxresult req msgbox are you continue to?vbabortretryignore vbquestion,功能測試 print req end sub 第二種...
vb程式設計題求123410的值求大神詳細
sub s dim i st st 1 for i 1 to 10 st st i st next print end sub vb程式 求s 1 2 3 4 5 6 7 8 99 的值是多少?99的階乘 復接近10的156次方,也就是說,是一制個155位的數值,這個數值在vb的數值型別中,是無法精...
vb程式設計問題
private sub command1 click dim i,j as integer,s as double,n as double for i 1 to 100 n 1 for j 1 to i n n j next j s s n next i print 1 2 100 send sub...