dbcontrols的问题,很急,不会的朋友说两句废话也可以.

Question

StatusBar 控件常数
StatusBar 样式常数常数 值 描述 
sbrNormal 0 正常。StatusBar 被分成面板。 
sbrSimple 1 简化。StatusBar 只有一个大面板和简化文本。 
面板对齐常数常数 值 描述 
sbrLeft 0 文本靠左。 
sbrCenter 1 文本居中。 
sbrRight 2 文本靠右。 
面板自动调整大小常数常数 值 描述 
sbrNoAutoSize 0 非自动调整大小。 
sbrSpring 1 在面板中划分附加空间。 
sbrContents 2 符合于目录。 
面板斜面常数常数 值 描述 
sbrNoBevel 0 无斜面。 
sbrInset 1 斜面插入。 
sbrRaised 2 斜面凸起。 
面板样式常数常数 值 描述 
sbrText 0 显示文本和/或位图。 
sbrCaps 1 显示 Caps Lock 状态。 
sbrNum 2 显示 Number Lock 状态。 
sbrIns 3 显示 Insert 键状态。 
sbrScrl 4 显示 Scroll Lock 状态。 
sbrTime 5 以 System 格式显示时间。 
sbrDate 6 以 System 格式显示日期。 
sbrKana 7 Kana。当激活滚动锁定时，显示黑体字母 KANA，反之当停用滚动锁定时，则显示暗淡的字母 KANA。 
'**************sbrIns 3 显示 Insert 键状态。 *********
'**************让需要按Insert 键时,发送一个sendkeys***
Private Sub Command1_Click()
    SendKeys "vbKeyInsert"
End Sub

Answer 1

对不起,我是在Form1中控制Form2中的Text1,尽管您提供的代码不能用,我仍然谢谢您!

Answer 2

不知有沒有這樣的寫法
sendkey "{insert}"

Answer 3

通过CHECK1模拟INSERT状态
Private Sub Text1_KeyPress(KeyAscii As Integer)
    If Check1.Value And Text1.SelLength = 0 Then
        Text1.SelLength = 1
    End If
End Sub

Answer 4

Text1是只读的,得不到焦点,我想使用SendMessage,哪位大侠再出手?.
谢谢!

Answer 5

Text1是只读的,得不到焦点,我想使用SendMessage,哪位大侠再出手?.
谢谢!