代碼如下：
1、方法壹：
text1.passwordchar = "*"
sub command1_click()
label1.caption =text1.text
end sub
2、方法二：
sub command1_click()
label1.caption = string("*",len(text1.text))
end sub
擴展資料
VB書寫代碼的格式：
1、VB代碼中不區分字母的大小寫。
2、同壹行可以書寫多條語句，語句間用冒號“：”分隔。
3、壹條語句可以寫在同壹行，也可以寫在多行。續行符號是壹個空格加下劃線“_”。
4、註釋語句以Rem開頭，也可以使用單引號“‘”。後者註釋內容可直接出現在相關語句的後面。
6、VB6中新增了“塊註釋/取消塊註釋”：在代碼模式下，右擊工具欄，在彈出菜單裏把“編輯”項選中?
7、變量和常量的命名規則：有數字，字母，下劃線組成；字母作首字符；不超過255個字符；不能以VB關鍵字和系統常量做名字