Question

如何变更VBA窗体的图片

Answer 1

写一段宏就可以了。

sub change()
Private Sub UserForm_Initialize()
Application.ScreenUpdating = False
Dim fA()
Dim i%, n%
Dim dName$
ChDrive "c"
ChDir "C:\Photographs\Zelda"
dName = Dir("*.jpg")
Do While dName <> ""
n = n + 1
ReDim Preserve fA(1 To n)
fA(n) = dName
dName = Dir()
Loop
For i = 1 To n
ComboBox1.AddItem fA(i)
Next
ComboBox1.ListIndex = 0
Application.ScreenUpdating = True
End Sub
end sub

追问

那么如果我要调整窗体里面的一个文本框输入的字数数量呢？

追答

说来话长

追问

如图所示，我要改变文本框里的字符数量，它限制字数为6个字符，而我要的是7个字符，可以在哪里改

追答

文件发出来吧

你问题太多了

追问

如何 上传文件，只有传图片的功能

追答

私我

追问

你太高级了，系统不让私信你。好惨

追答

👇
q

追问

+ 你了