ISSUE.Presenting the data on screen : 有时文本框不显示文本字符串

如何解决ISSUE.Presenting the data on screen : 有时文本框不显示文本字符串

我有一个用户表单，它有 36 个文本框、9 个标签和 9 个组合框。当我放置键值和命令按钮时，它开始循环查找键值，然后显示每个文本框、标签和组合框的相对值。

顺便说一句，“有时”某些文本框在第一次读取时不会显示文本（字符串不是整数），而是第二次。

run: async (client,message,args) => {

        async function getinfo() {
        let lol1 = args[0];
        let lol2 = args.slice(1).join(' ');
    
    
        const whothefuq = new discord.MessageEmbed()
              .setTitle("test1:")
              .addField("test2",` ${lol1} / ${lol2}`)
              .setColor("RANDOM")
              .setTimestamp()
          message.channel.send(whothefuq)
        
        }
    
        getinfo();
    }

以下也是我的顾虑。

控制属性这是最可疑的部分，因为大多数情况发生在以下部分。但是，根据 MS 的指导，我找不到任何错误。

With Sheets("Datum")
    LastRow = .Range("A" & Rows.count).End(xlUp).Row
    j = 1
    For i = 2 To LastRow
        If TextBox_No.Value = Left$(.Cells(i,"A"),4) Then
            Controls("Label" & (j + 9)) = Int(Right(.Cells(i,2))
            TextBox_Date = Format(.Cells(i,"B"),"yyyy-mm-dd")
            ComboBox1 = .Cells(i,"C")
            Controls("TextBox" & ((4 * j) - 3)).Text = .Cells(i,"D")
            Controls("TextBox" & ((4 * j) - 2)).Text = .Cells(i,"E")
            Controls("ComboBox" & (j + 1)).Text = .Cells(i,"H")
        j = j + 1
        End If
    Next i

End With

空字符串在'userform initialize'阶段，我把下面的代码放在“”上，如果有影响我尝试删除，但症状还是一样。

Controls("TextBox" & ((4 * j) - 3)).Text = .Cells(i,"D")
Controls("TextBox" & ((4 * j) - 2)).Text = .Cells(i,"E")
Controls("ComboBox" & (j + 1)).Text = .Cells(i,"H")

检查这个问题几天后，我得出结论，这是“在屏幕上显示数据的问题”，因为文本加载时没有显示在文本框中。

我想听听您的建议或意见来解决问题，感谢大家关注这个问题。