
VB 当鼠标单击textbox数组控件任何一个textbox后,这个textbox的字体变红色。代码怎么写? 10
展开全部
假设textbox数组名为text1,代码如下:
Private Sub Text1_Click(Index As Integer)
For i = 0 To Text1.UBound
Text1(i).ForeColor = &H0
Next
Text1(Index).ForeColor = &HFF&
End Sub
有问题HI我.
Private Sub Text1_Click(Index As Integer)
For i = 0 To Text1.UBound
Text1(i).ForeColor = &H0
Next
Text1(Index).ForeColor = &HFF&
End Sub
有问题HI我.
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询