Css 是否更改fileInput中标签文本的大小/间距？

我正在开发一个R Shining应用程序，我在其中构建了一个文件输入函数，如下所示：

  csvFileInput <- function(name_space, file_name="file", label = "Input file") {
    ns <- NS(name_space)
    # doc here: https://shiny.rstudio.com/reference/shiny/latest/fileInput.html
    fileInput(ns(file_name), label)
  }

csvFileInput非常简洁地总结了使用CSS设计样式的三种方法。如果您最终设计了多个元素的样式，通常最好通过样式表（即实际的.CSS文件）添加CSS，该样式表需要放置在名为“www”的子目录中，而“www”又位于您的应用程序目录中

如果只对一个元素进行样式设置（“元素”表示函数的UI输出），并且希望样式设置应用于整个元素，则可以将该元素包装在
div
标记中，并使用
style
属性，如下所示：

div(
   fileInput("file1", "Choose CSV File",
               accept = c(
               "text/csv",
               "text/comma-separated-values,text/plain",
               ".csv")
   ), style="font-size:80%; font-family:Arial;"
)

如前所述，如果您只想设置元素的一个组件的样式，那么您需要使用浏览器中的开发人员工具来确定可以针对哪些HTML进行样式设置。对于fileInput标签，实际的
HTML标记是我们的目标。如果您希望避免需要样式表，那么可以通过本文中描述的第三种方法添加必要的CSS，即通过
标记
函数。您可以将以下代码添加到UI（位于
fluidPage
顶部），以更改字体并在标签下方添加填充：

tags$head(
  tags$style(HTML(
    "label { font-size:80%; font-family:Times New Roman; margin-bottom: 
    20px; }"
  ))
)

非常简洁地总结了三种使用CSS设置样式的方法。如果您最终设计了多个元素的样式，通常最好通过样式表（即实际的.CSS文件）添加CSS，该样式表需要放置在名为“www”的子目录中，而“www”又位于您的应用程序目录中

如果只对一个元素进行样式设置（“元素”表示函数的UI输出），并且希望样式设置应用于整个元素，则可以将该元素包装在
div
标记中，并使用
style
属性，如下所示：

div(
   fileInput("file1", "Choose CSV File",
               accept = c(
               "text/csv",
               "text/comma-separated-values,text/plain",
               ".csv")
   ), style="font-size:80%; font-family:Arial;"
)

如前所述，如果您只想设置元素的一个组件的样式，那么您需要使用浏览器中的开发人员工具来确定可以针对哪些HTML进行样式设置。对于fileInput标签，实际的
HTML标记是我们的目标。如果您希望避免需要样式表，那么可以通过本文中描述的第三种方法添加必要的CSS，即通过
标记
函数。您可以将以下代码添加到UI（位于
fluidPage
顶部），以更改字体并在标签下方添加填充：

tags$head(
  tags$style(HTML(
    "label { font-size:80%; font-family:Times New Roman; margin-bottom: 
    20px; }"
  ))
)