请问TabStrip中的某一个标签失去焦点如何知道呀? 请问TabStrip中的某一个标签失去焦点如何知道呀?还有TabStrip 整个控件失去焦点呢??? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 TabStrip1.SelectedItem.Index 发生改变就说明选中的标签已经发生变化Private Sub TabStrip1_LostFocus() MsgBox "失去焦点"End Sub Private Sub TabStrip1_Click() MsgBox TabStrip1.SelectedItem.IndexEnd SubPrivate Sub TabStrip1_LostFocus() MsgBox "hehe"End Sub 谢谢各位,可是SelectItem.index 是刚得到标签的Index 可是我想知道刚失去焦点标签的Index TabStrip1.SelectedItem.Index保存到变量里!dim a as string Private Sub TabStrip1_Click() if a="" then a=TabStrip1.SelectedItem.Index else if val(a)<> TabStrip1.SelectedItem.Index then msgbox "原焦点是" & a &" a=TabStrip1.SelectedItem.Index endif endifEnd Sub 如何制作滑块 如果让列表框的SubItems显示超过256的字符? 谁有VB5?跑了一天都没买到 如何去除textbox文本框控件默认的右键菜单? 如何判断MSCOMM控件发送数据是否结束?急!! 我有一个recordset,里面有2000多条记录,其中字段"ABC"里面有很多条记录都是一样的? VB中如何实现软件自动全屏显示 一个关于msgbox的问题 算法问题:看似非常简单,实现有点难度。(内详) 来呀来呀来呀,VB6关于数组的程序困扰。 VB生成VF的表 请教怎样用代码实现三层菜单
MsgBox "失去焦点"
End Sub
MsgBox TabStrip1.SelectedItem.Index
End SubPrivate Sub TabStrip1_LostFocus()
MsgBox "hehe"
End Sub
Private Sub TabStrip1_Click()
if a="" then
a=TabStrip1.SelectedItem.Index
else
if val(a)<> TabStrip1.SelectedItem.Index then
msgbox "原焦点是" & a &"
a=TabStrip1.SelectedItem.Index
endif
endif
End Sub