windows 多行Excel VBA用户窗体文本框

k3bvogb1  于 2023-02-25  发布在  Windows
关注(0)|答案(1)|浏览(157)

我正在Excel中制作一个用户表单,以便通过指定范围的整数将F值转换为C值。我的程序工作正常,因为它很简单,但是我似乎无法让用户表单上的txt框显示除了最后记录的结果之外的任何内容。我怎样才能让每个整数值打印在用户表单的txt框中,就像使用debug print命令打印一样?我附上了几张图片来说明这个问题。
另外,请原谅拼写问题。在我进行格式设置之前,我很快就试着让代码工作起来了。

[enter image description here](https://i.stack.imgur.com/2eABz.png)
[enter image description here](https://i.stack.imgur.com/PoGAT.png)
[enter image description here](https://i.stack.imgur.com/QOgBR.png)

我试过使用不同的命令,如vbNewLine和vbCrLf,但似乎都不起作用。当txt框较小时,滚轮的功能,所以我知道这不可能是TXT框的问题。

vhipe2zx

vhipe2zx1#

我找到了解决方案。在我的代码中,我将TxtR =*****改为TxtR = TxtR +新信息,它按预期工作。谢谢!

Private Sub CommandButton1_Click()
Dim i As Integer
Dim max As Integer
Dim min As Integer
Dim Cel As Single

max = Val(txtMax.Value)
min = Val(txtMin.Value)

For i = min To max
    Cel = (i - 32) * 5 / 9
    txtR = txtR & i & "F   " & Cel & "C" & vbCrLf
Next i
End Sub

相关问题