06 2010 档案

摘要:'如果一行显示不完,则多行显示 Private Sub rbKey0TextReload(ByVal rbKey0 As RadioButton) Dim textSize As Size = TextRenderer.MeasureText(rbKey0.Text, rbKeyA.Font) '文字的大小 Dim radiobuttonSize As Size = rbKey0.Size '选框... 阅读全文
posted @ 2010-06-05 13:14 扬中源 阅读(1156) 评论(0) 推荐(0) 编辑