标签: paste

我需要能够从一个应用程序复制一个或多个名称(使用普通的复制命令),然后能够双击DataGridView中的文本单元格将数据粘贴到网格单元格中.有关如何实现这一目标的任何想法？我正在尝试最小化键盘使用此功能.

我在一个.txt文件中有一些信息,如下所示:

cars.txt

    Ford               1000
    Mercedes           2000
    Lada               3000
    Chevrolet          5000

我想阅读这个.txt文件的一些元素,并将它们转换为用逗号分隔的一行.我将其保存在另一个文件中,所以我需要类似的东西(添加了NAME字符串):

NAME,Mercedes,Lada

我试过以下代码:

conn=file("cars.txt",open="r")
control<-readLines(conn)
data<-strsplit(control,"\t")
c<-1
cars<-c()
for (j in 1:4)
{
    cars[[c]]<-data[[j]][1]
    cd<-cd+1
}
carsd<-paste(cars,sep=",")
print(carsd)

但没有任何结果,任何帮助？

谢谢

我刚刚熟悉VBA和我的代码

For k = 3 To ThisWorkbook.Sheets.Count
ThisWorkbook.Sheets(k).Activate
ActiveSheet.Cells(11, 2).Select

lLastRow = Cells(Rows.Count, 1).End(xlUp).Row
ActiveSheet.Range("A5:" & "A" & CStr(lLastRow)).Copy
' ThisWorkbook.Sheets(1).Cells("B" & CStr(lFirstRow) & ":B" & CStr(lLastRow)).Select
ThisWorkbook.Sheets(1).Activate
ActiveSheet.Cells(lFirstRow, 2).Select
Selection.Paste
'Selection.PasteSpecial Paste:=xlPasteValues
'Selection.PasteSpecial Paste:=xlPasteFormats
lFirstRow = lFirstRow + lLastRow
Next k

当"Selection.Paste"行出现时,出现"运行时错误438.对象不支持此属性或方法".有什么问题？:(我试过使用paste special,激活工作表并选择单元格(不是范围),使用Cstr,但没有改变

我需要逐行折叠数据。

seq = structure(c("h", "d", "s", "s", "f", "k", "s", "s", "f", "d", 
"d", "d", "l", "l", "d", "d"), .Dim = c(4L, 4L), .Dimnames = list(
NULL, c("act1.055", "act1.056", "act1.057", "act1.058")))

我的数据如下所示：

     act1.055 act1.056 act1.057 act1.058
[1,] "h"      "f"      "f"      "l"     
[2,] "d"      "k"      "d"      "l"     
[3,] "s"      "s"      "d"      "d"     
[4,] "s"      "s"      "d"      "d" 

如果我做

paste(seq, collapse = "")
[1] "hdssfkssfdddlldd"

这不是我想要的。

我需要的是

hffl
dkdl 
ssdd 
ssdd

如果可能，在矩阵中。

我试图找到一种格式化数字函数的方法，通过拆分变量并在它们之间添加数学运算符。就像是

y <- data.frame(1:5, 2:6, 3:7,4:8)
names(y) <- c('a', 'b', 'c', 'd')

并将其转化为如下所示的公式：

~a+b+c+d

我试过：

x <-c(y)
z <- paste('a', 'b', 'c', 'd', sep='+')
as.numeric(as.character(z))

它不起作用，我很确定这是因为我正在使用的“字符”分隔符。我该怎么做呢？

我通常想替换vim中的一些内容。复制后，我选择要替换的内容，然后粘贴我复制的内容。但是接下来要替换的内容会被复制到剪贴板，我无法替换下一个地方。我希望剪贴板中的内容在我粘贴到某个选定的地方时不会改变。

考虑以下向量

x <- paste0(LETTERS,1:26)

我想在保留数字的同时用北约语音字母(alpha,bravo,charli等)替换这些字母.是否有一个载体r,类似于LETTERS具有完整的北约语音字母？

我有 3 个文本文件。我想读取它们并将它们存储在不同的变量中，然后使用粘贴将它们连接起来并在控制台中打印它们。我尝试了以下代码，但它抛出了一个错误：

文件未找到

这是我的代码

#!/bin/sh
value_1=`cat file_1.txt`
value_2=`cat file_2.txt`
value_3 = paste $value_1 $value_2
echo "$value_3"

我在 Vim 中发短信时遇到问题putting。

假设我想将我的/* Comment */行粘贴到该$('table').append行下方...

/* Comment */

for (var i=1; i<=lineLength ; i++) {
    $('table').append('<tr></tr>');
    for (var j=1; j<=lineLength; j++) {
    $('table tr:nth-last-child(1)').append('<td></td>');
    }
}

在大多数文本编辑器中，我的工作流程是

1. 选择/* Comment */，点击剪切。
2. 将光标移动到第一行代码末尾并按回车键。
3. 文本编辑器自动缩进，我只需点击粘贴即可。

IE

/* Comment */

for (var i=1; i<=lineLength ; i++) {
    $('table').append('<tr></tr>');
    | <==Pipe is position of cursor before paste; pasted lines are inserted here.
    for (var j=1; j<=lineLength; j++) {
    $('table tr:nth-last-child(1)').append('<td></td>');
    }
}

但对于 vim，我似乎必须这样做：

1. 移动到/* …

我TDBMemo在 Delphi 7 中使用一个控件。我想防止用户将CTRL+V.

此解决方案不起作用：

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
 if (Key=#22) or (Key=#3) then Key:=#0;   // 22 = [Ctrl+V] / 3 = [Ctrl+C]
end;

所以，我尝试了别的东西：

if (Key=#86) then Key := #0; // this is ok, doesnt allow letter v.

但是当我尝试：

if (Key=#17) AND (Key=#86) then Key := #0; // #17 is supposed to be CTRL value...

它不起作用。