早教吧 育儿知识 作业答案 考试题库 百科 知识分享

求解释这段VB代码的意思PrivateSubCombo1Click()Text1.FontName=Combo1.List(Combo1.ListIndex),这段代码是什么意思EndSubPrivateSubFormLoad()Combo1.AddItem"宋体"Combo1.AddItem"隶书"Combo1.AddItem"黑体"Combo1.

题目详情
求解释这段VB代码的意思Private Sub Combo1_Click() Text1.FontName = Combo1.List(Combo1.ListIndex) ,这段代码是什么意思 End Sub Private Sub Form_Load() Combo1.AddItem "宋体" Combo1.AddItem "隶书" Combo1.AddItem "黑体" Combo1.AddItem "楷体" Combo1.ListIndex = 0 '把第一个条目作为初始项 Text1.FontSize = 30 '放大字体 Text1.FontName = Combo1.List(0) '初始字体为"宋体" End Sub Private Sub Text1_Change() End Sub
▼优质解答
答案和解析
Text1.FontName = Combo1.List(Combo1.ListIndex) ,这段代码是什么意思 是设置Text1的字体,具体字体是根据Combo1的选择而定的。