求大神把性别文本框修改成列表框。谢谢！

108079955

请哪位老师帮我看看，怎么把表示性别的文本框修改为旁边的列表框表示。

先谢谢老师了。

laterite

https://club.excelhome.net/thread-1451605-1-1.html ，是个不错的教程，建议看一下

02761752696

性别就两项内容，用复合框ComboBox1不是更方便？
供参考

108079955

laterite 发表于 2023-4-18 08:49
https://club.excelhome.net/thread-1451605-1-1.html ，是个不错的教程，建议看一下

谢谢  老师

tanglf188

是这个意思吗？这是组合框不是列表框

108079955

02761752696 发表于 2023-4-18 09:19
性别就两项内容，用复合框ComboBox1不是更方便？
供参考

你说的对。非常感谢老师的帮助。不过我是小白，我也不知道现在怎么修改呀 ？能不能帮我修改一下了？
Private Sub CommandButton2_Click()
  On Error Resume Next
Dim i As Integer
With Sheets("Sheet1")
i = .Range("a65536").End(xlUp).Row + 1
For j = 1 To 5
.Cells(i, j) = Controls("TB" & j).Text
Next
End With
MsgBox "记录添加成功!"
For j = 1 To 6
Controls("TB" & j).Text = ""
Next
End Sub
这是新增记录   在这里怎么修改呀

108079955

tanglf188 发表于 2023-4-18 09:30
是这个意思吗？这是组合框不是列表框

非常感谢老师的无私付出。非常好，特表感谢老师！