checkboxçå¤éæ¡æ¡ç大å°æ¯æ²¡æ³æ¹çï¼ ä½æå«çæ¹æ³å¯ä»¥å°è¯ï¼ æçæ¹æ³æ¯è¿æ ·åçï¼ å 建ä¸ä¸ªLabelï¼ç¶ååå¨ä¸é¢æ个âââï¼ æ¥ä¸æ¥å°±å»è°åä½å¤§å°ï¼å ç²ï¼ æåååç¹ç¨åºï¼ Private Sub Label1_Click() If Label1.Caption = "â" Then Label1.Caption = "" Else Label1.Caption = "â" End Sub è¿æ ·åå°±OKäºï¼ è¿æ³åæç¹åï¼ä¸è¿ç®¡ç¨ï¼å¯ä»¥åå¾å¾å¤§å¾å¤§ã
checkbox的复选框框的大小是没法改的, 但有别的方法可以尝试, 我的方法是这样子的: 先建一个Label,然后再在上面打个“√”, 接下来就去调字体大小,加粗, 最后再写点程序: Private Sub Label1_Click() If Label1.Caption = "√" Then Label1.Caption = "" Else Label1.Caption = "√" End Sub 这样子就OK了, 这法子有点土,不过管用,可以做得很大很大。本回答被提问者采纳