选择和数字输入的CSS样式

我正在使用R Shiny，并且尝试在ui中为selectInput和numericInput设置相同的高度。
我发现这条线:

 tags$style(type="text/css", ".selectize-input {line-height: 20px;}"),

这会改变我所有selectInputs的高度。

是否有与numericInput类似的行？

谢谢

最佳答案

好吧，它没有特定的类，例如selectInput。但是您仍然可以使用更通用的类form-control获得相同的结果。不过，我们需要使用height而不是line-height，无论如何，这对于selectInput都可以正常工作。

ui <- fluidPage(
  tags$style(type = "text/css", ".form-control.shiny-bound-input,
.selectize-input {height: 70px;}"),
  selectInput(inputId = "another_id",
              label = "bar",
              choices = c(1, 2)),
  numericInput(inputId = "some_id",
              label = "foo",
              value = 1)
)

server <- function(input, output, session) {}

shinyApp(ui, server)

编辑:

如果要将某些CSS应用于特定输入，则需要使用其id，因此该样式并不适用于共享同一类的所有元素。在上面的示例中，如果您只想更改numericInput为id的some_id的高度，则可以使用#some_id选择此元素，从而得到以下代码:

tags$style(type = "text/css",
           "#some_id.form-control.shiny-bound-input {height: 70px;}")

关于选择和数字输入的CSS样式，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/49873705/