Question

如何自动在图片中添加一些文字？

- 我有一堆产品，我想在图片下方添加说明和价格。我想通过在vb.net中编写一些代码来完成这项工作

因为我有超过2000个图像，其名称是增量数字。

以下是示例图片： sample

喜欢这张图片。

Answer 1

你可以使用（如果你不想使用数据库）a RichTextBox Control

使用此代码将图像添加到RichTextBox：

   'add openfiledial to add image to RichTextBox
    img = Image.FromFile(OpenFileDialog1.FileName)
    Clipboard.SetImage(img)
    Richtextbox1.Paste()
   'add some text beneath your image.

将richTextBox保存到文件：

   Private sub Btn_save_click

   'add a saveFileDialogBox
   SaveFileDialog1.ShowDialog

   Private Sub SaveFileDialog1_DialogResultOk
   richTextBox1.SaveFile(saveFiledialog1.FileName, _
        RichTextBoxStreamType.RichText)

这是一个解决方案，但还有其他解决方案。评论如果你需要它们

从文件加载文字

  Richtextbox1.text=file.readalllines(use file location here/openfiledialog.filename)

使用数据库是完美的答案

正如你所说，你有一个包含价格的文本文件......我建议你使用MSSQL / ACCESS DATABASE / MYSQL

现在根据文本文件生成记录。使用此方法（首先在rtb中加载文本文件）

  Dim con as new SqlConnection(Your connectionstring here)
  Con.open
  Dim cmd as new sqlcommand("Insert into [table name-remove brackets if   required](columnname) values("@price")",con)
  Dim i as integer
  For each line in RichTextbox1.Lines
  cmd.parameters.add("@price", sqldbtype.varchar).value=Richtxtbox1.lines(i).text
  cmd.executenonquery
  Next
  Con.close

如何以编程方式为图片添加标题

1 个答案: