1樓：網友
private sub text1_keyup(keycode as integer, shift as integer)
127061-3116e5-3e5193 用這組明租序列號試試。
dim tmp_serial
dim block() as stringif keycode = 86 then
tmp_serial =
block() split(tmp_serial, "激坦兆-",6)
on error resume next
block(0)
block(1)
block(2)
end if
end sub
在你的後面加上信配。
2樓：網友
這樣改就行。
private sub text1_change()if = 1" then exit sub= 1"
replace(, "
if len( >磨洞 6 then
mid(, 7)
left(, 6)
len(end if
茄好"end sub
private sub text2_change()if = 1" then exit sub= replace(, "瞎納枯-",if len( >6 then
mid(, 7)
left(, 6)
len(end if
end sub
如何在vb中用 * 替代文字框中輸入的密碼，就是在文字框中每輸入乙個數字對應顯示的就是* ？？？？？？？？
3樓：網友
passwordchar 屬性。
返回或設定乙個值，該值指示所鍵入的字元或佔位符在 textbox 控制項中是否要顯示出來；返回或設定用作佔位符。
語法。 [=value]
passwordchar 屬性的語法包含下面部分：
部分 描述。
object 物件表示式，其值是「應用於」列表中的乙個物件。
value 乙個指定佔位符的字串表示式。
說明。為了在對話方塊中建立乙個密碼域應使用此屬性。雖然能夠使用任何字元，但是大多數基於 windows 的應用程式使用星號 (*chr(42))。
此屬性不影響 text 屬性；text 準確地包括所鍵入或**中所設定的內容。將 passwordchar 設定為長度為 0 的字串 ("預設值），將顯示實際的文字。
能夠將任意字串賦予此屬性，但只有第乙個字元是有效的，所有其它的字元將被忽略。
注意 如果 multiline 屬性被設為 true，那麼設定 passwordchar 屬性將不起效果。
passwordchar 屬性示例。
本例說明 passwordchar 屬性是如何影響 textbox 控制項顯示文字的方法的。要試用此例，先將下面的**貼上到包含 textbox 的窗體的宣告部分，然後按 f5 鍵 並單擊窗體。每次單擊窗體，文字將在星號 (*密碼和普通文字之間轉換。
private sub form_click ()
if = then
end if
end sub
4樓：網友
private sub form_load()=
end sub
或者直接在屬性視窗設定這個屬性。
5樓：勢廣君
textbox屬性中有個屬性是：passwordchar ，在這裡敲入*就可以。
vb:使用者在text文字框中輸入的資料是什麼型別的？
6樓：匿名使用者
是字串型的，如果想引用成其他型別，需要再轉換。
7樓：匿名使用者
沒有，你需要的話，用函式轉比如轉整數的用val(
8樓：匿名使用者
字串型別。需要自己做轉換。
在vb的文字框中，想讓輸入的字元都顯示為*，如何程式設計？
9樓：網友
用**： = "*"
或直接把文字框的passwordchar屬性設為*
vb怎樣將text1中輸入字母在text2中自動轉換成數字
private sub text1 change dim s as string,m as stringfor i 1 to len text1.text m lcase mid text1.text,i,1 if asc m 97 and asc m 122 then s s asc m 96 e...
vb中如何把在text1中輸入的資料，從列表框list1中刪除
private sub command1 click for i list1.listcount 1 to 0 step 1 if list1.list i text1.text then list1.removeitem i next end sub 我叫明輝 private sub comman...
用vb編寫為列表框新增刪除選項，用VB編寫一個為列表框新增刪除選項
一棵無所不知的小白菜 1 首先開啟vb軟體，繪製好相應的控制元件，兩個命令按鈕，一個列表框，一個文字框。2 接下來大概更改一下各個控制元件的屬性。3 然後編寫命令按鈕從鍵盤輸入文字框，並能能夠新增專案 4 編寫刪除 記得要遍歷查詢。5 執行後便可以看到這樣的程式。即編寫一個為列表框新增刪除選項成功。...