vb.net轉(zhuǎn)移焦點(diǎn) vb tab鍵 焦點(diǎn)跳轉(zhuǎn)

VB.Net 給其他程序焦點(diǎn)

Public RunProcess As Process

創(chuàng)新互聯(lián)公司是一家專業(yè)提供寶清企業(yè)網(wǎng)站建設(shè),專注與網(wǎng)站設(shè)計(jì)、成都做網(wǎng)站、H5開發(fā)、小程序制作等業(yè)務(wù)。10年已為寶清眾多企業(yè)、政府機(jī)構(gòu)等服務(wù)。創(chuàng)新互聯(lián)專業(yè)的建站公司優(yōu)惠進(jìn)行中。

RunProcess.start("djiwqjidjwqi")

AppActivate(RunProcess.Id())

vb.net設(shè)置windows焦點(diǎn)程序

給你個(gè)參考的例子，窗體打開時(shí)可能大小有變化，軟件名可能有變化

先加個(gè)控件ListBox1，運(yùn)行后雙擊ListBox1上程序名

Public Class Form1

Public myProcess() As Process

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim myProcesses() As Process = Process.GetProcesses()

Dim jh As New ArrayList

For Each bs As Process In myProcesses

If CInt(bs.MainWindowHandle) 0 Then

ListBox1.Items.Add(bs.ProcessName)

jh.Add(bs)

End If

Next

ReDim myProcess(jh.Count - 1)

jh.CopyTo(myProcess)

End Sub

Declare Function ShowWindow Lib "user32" Alias "ShowWindow" (ByVal hwnd As Integer, ByVal nCmdShow As Long) As Integer

Private Sub ListBox1_MouseDoubleClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ListBox1.MouseDoubleClick

Dim a As Process = myProcess(ListBox1.SelectedIndex)

Try

Dim dd = ShowWindow(a.MainWindowHandle, H1)

AppActivate(a.Id)

Catch ex As Exception

End Try

End Sub

End Class

VB.NET中頁面初期顯示時(shí)按下enter鍵讓焦點(diǎn)在五個(gè)textbox控件上順序移動(dòng)該怎么辦？求大神指點(diǎn)，謝謝！

這樣不好，應(yīng)該使用 Table 鍵，按照 Table 鍵順序來切換。因?yàn)榛剀囃脕泶_定你要按下頁面的確定按鈕。如果非要使用回車：

Private Sub 文本框按下回車鍵(sender As Object, e As KeyEventArgs) Handles TextBox3.KeyDown, TextBox2.KeyDown, TextBox1.KeyDown

If e.KeyCode = Keys.Enter Then

Select Case sender.name

Case "TextBox1"

TextBox2.Focus()

Case "TextBox2"

TextBox3.Focus()

Case "TextBox3"

TextBox1.Focus()

End Select

End If

End Sub

當(dāng)前題目：vb.net轉(zhuǎn)移焦點(diǎn) vb tab鍵 焦點(diǎn)跳轉(zhuǎn)
網(wǎng)站鏈接：http://www.muchs.cn/article2/dohsoic.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供企業(yè)網(wǎng)站制作、自適應(yīng)網(wǎng)站、定制開發(fā)、網(wǎng)站內(nèi)鏈、做網(wǎng)站、虛擬主機(jī)

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請(qǐng)盡快告知，我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng)，如需處理請(qǐng)聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來源： 創(chuàng)新互聯(lián)