单选项和复选框默认选中是怎么实现的？

要实现单选和复选框默认选中，只需要增加一个checked="checked"属性即可。例如一下代码：
默认选中的单选：<input type="radio" checked="checked" name="" value="" />
默认选中的复选：<input type="checkbox" name="" checked="checked" />

WindowsMediaPlayer1URL = AppPath & "\I Kissed A Girlmp3"（换成你想要的歌曲，并与程序同文件夹）
WindowsMediaPlayer1Controlsplay

可以。
vbDefaultButton1
0
第一个按钮为默认值
vbDefaultButton2
256
第二个按钮为默认值
vbDefaultButton3
512
第三个按钮为默认值
vbDefaultButton4
768
第四个按钮为默认值
例如：
MsgBox
"真的要退出吗？",vbYesNo
+
vbDefaultButton2
'默认为No
MsgBox
"文件已存在，还要拷贝吗？",vbAbortRetryIgnore
+
vbDefaultButton2
'默认为Retry
MsgBox
"还有文件没保存，是否保存？",vbYesNoCancel
+
vbDefaultButton3
'默认为Cancel
MsgBox
"出现错误。代码1347850041",vbAbortRetryIgnore
+
vbDefaultButton4
+
vbMsgBoxHelpButton
'默认为Help
………………………………

1、打开VB60软件，在默认界面上，选择标准exe文件，打开。

2、点击左侧工具栏，选择ListBox，在Form1窗体上绘制出该组件，如图所示。

3、继续在Form1窗体上，按照相同的办法，绘制出一个button按钮，如图所示。

4、然后启动该项程序，可以看到d出了一个Form窗体，上面有listBox和按钮。

5、然后用鼠标点击一下listBox组件，可以看到，此时，该控件获得了焦点。

---