コンボボックス 各種プロパティ

##########   アクティブな項目の文字列を取得  ##########

    Dim strProj As String
    
    strProj = frmMain.ComboProj.Text  
	

##########   文字列からアクティブな項目を設定  ##########

    Dim i As Integer
  
    For i = 0 To frmMain.ComboProj.ListCount - 1

        If frmMain.ComboProj.List(i) = WIN32API_Get_INI_strValue("ComboProj", "未選択") Then
        
            'コンボボックスのアクティブな項目を設定
            frmMain.ComboProj.ListIndex = i
            
        End If
    
    Next i
	

---

<戻る>

PC用眼鏡【管理人も使ってますがマジで疲れません】 解約手数料０円【あしたでんき】 Yahoo 楽天 NTT-X Store

無料ホームページ 無料のクレジットカード 海外格安航空券 ふるさと納税 海外旅行保険が無料！ 海外ホテル