[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
  1. Add-Type -AssemblyName System.Windows.Forms
  2. $form = New-Object System.Windows.Forms.Form
  3. $form.Text = '双击查询'
  4. $Form.FormBorderStyle = "FixedToolWindow"
  5. $form.StartPosition = 'CenterScreen'
  6. $form.Font = New-Object System.Drawing.Font("微软雅黑", 10, [Drawing.FontStyle]::Bold)
  7. $form.ClientSize = '160, 260'
  8. $listBox = New-Object System.Windows.Forms.Listbox
  9. $listBox.Size = '160,260'
  10. $listBox.SelectionMode = 'MultiExtended'
  11. $listBox.DataSource = '张三', '李四', '王五', '赵六'
  12. $form.Controls.Add($listBox)
  13. $Script:selectedItems = $null
  14. $listBox.add_DoubleClick({
  15.     if($listBox.SelectedItems.Count -ne 1){ return }
  16.     $Script:selectedItems = $listBox.SelectedItems
  17.     $form.Close()
  18. })
  19. $listBox.add_MouseDown({
  20.     if($_.Button -ne 'Middle'){ return }
  21.     $Script:selectedItems = $listBox.SelectedItems
  22.     $form.Close()
  23. })
  24. $result = $form.ShowDialog()
  25. $Script:selectedItems
复制代码

TOP

回复 5# 5i365


    listbox的高没必要和form相同,调大一点,260改成300

TOP

返回列表